nessuna selezione (nessuna WHERE) ---> mostra tutto. ergo, il programma si comporta beneOriginariamente inviato da matteo66
vi posto il codice....forse è meglio:
sql = "SELECT * FROM rma"
ari
nessuna selezione (nessuna WHERE) ---> mostra tutto. ergo, il programma si comporta beneOriginariamente inviato da matteo66
vi posto il codice....forse è meglio:
sql = "SELECT * FROM rma"
ari
chiedo scusa...il codice completo della pagina:
<% option explicit %>
<%Response.Buffer = TRUE%>
<%
Response.Cookies("nomeCookie")("ragionesociale") = ragionesociale
Response.Cookies("nomeCookie").Expires = Now() + 365
Dim conn,rs,id,indirizzo,cap,citta,provincia,colli,ema il,vettore,corriere,corriere2,fatture,commenti,par titaiva,telefono,fax,descrizione,descrizione2,desc rizione3,descrizione4,descrizione5,ragionesociale, datarichiesta,quantita,quantita2,quantita3,quantit a4,quantita5,codice,codice2,codice3,codice4,codice 5,difetto,difetto2,difetto3,difetto4,difetto5,cons uno,consdue, sql
Dim dtCorr
dim IndirizzoIP
dtCorr = date()
dim item
IndirizzoIP = Request.ServerVariables("REMOTE_ADDR")
ID= request("ID")
datarichiesta= request("datarichiesta")
ragionesociale = request("ragionesociale")
indirizzo = request("indirizzo")
cap = request("cap")
citta = request("citta")
provincia = request("provincia")
telefono = request("telefono")
email = request("email")
fax = request("fax")
fatture = request("fatture")
partitaiva = request("partitaiva")
colli= request("colli")
corriere= request("corriere")
corriere2= request("corriere2")
commenti= request("commenti")
vettore= request("vettore")
quantita = request("quantita")
quantita2 = request("quantita2")
codice = request("codice")
codice2 = request("codice2")
descrizione = request("descrizione")
descrizione2 = request("descrizione2")
difetto = request("difetto")
difetto2 = request("difetto2")
consuno = request("consuno")
consdue = request("consdue")
set conn=Server.CreateObject("adodb.connection")
conn.open"Driver={Microsoft Access Driver (*.mdb)}; dbq=" & server.MapPath("/DB/DB.mdb")
sql="select * from rma where ragionesociale='" & ragionesociale & "'"
set rs=Server.CreateObject("adodb.recordset")
rs.open sql, conn, 1, 3
if not rs.eof then
response.write "Spiacenti, ma " & ragionesociale & " " & "è già usato da un altro utente, scegline un altro!" & "
"
response.write "<a href=javascript:history.back()>Torna indietro</a>
"
rs.close
conn.close
set rs=nothing
set conn=nothing
response.end
else
rs.addnew
rs("ragionesociale")=ragionesociale
rs("indirizzo")=indirizzo
rs("cap")=cap
rs("citta")=citta
rs("provincia")=provincia
rs("telefono")=telefono
rs("fax")=fax
rs("email")=email
rs("fatture")=fatture
rs("partitaiva")=partitaiva
rs("colli")=colli
rs("vettore")=vettore
rs("corriere")=corriere
rs("corriere2")=corriere2
rs("commenti")=commenti
rs("quantita")=quantita
rs("quantita2")=quantita2
rs("codice")=codice
rs("codice2")=codice2
rs("descrizione")=descrizione
rs("descrizione2")=descrizione2
rs("difetto")=difetto
rs("difetto2")=difetto2
rs("datarichiesta")= dtCorr
rs.Fields("consuno")= consuno
rs.Fields("consdue")= consdue
rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>:::Registrazione Modulo Rma:::</title>
<style>
<!--
div.Section1
{page:Section1;}
-->
</style>
</head>
<%
set conn=Server.CreateObject("adodb.connection")
conn.open"Driver={Microsoft Access Driver (*.mdb)}; dbq=" & server.MapPath("/DB/DB.mdb")
set rs=Server.CreateObject("adodb.recordset")
rs.open "select id,indirizzo,cap,citta,provincia,colli,email,vetto re,corriere,corriere2,fatture,commenti,partitaiva, telefono,fax,descrizione,descrizione2,descrizione3 ,descrizione4,descrizione5,ragionesociale,datarich iesta,quantita,quantita2,quantita3,quantita4,quant ita5,codice,codice2,codice3,codice4,codice5,difett o,difetto2,difetto3,difetto4,difetto5,consuno,cons due from rma", conn
set conn = server.createObject("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.mapPath("\DB\DB.mdb")
sql = "SELECT * FROM rma"
set rs = conn.execute(sql)
if not rs.eof then
%>
<table>
<%
do while not rs.eof
%>
</tr>
<tr>
<td><%=rs("quantita")%></td>
<td><%=rs("codice")%></td>
<td><%=rs("descrizione")%></td>
<td><%=rs("difetto")%></td>
</tr>
<tr>
<td><%=rs("quantita2")%></td>
<td><%=rs("codice2")%></td>
<td><%=rs("descrizione2")%></td>
<td><%=rs("difetto2")%></td>
</tr>
<%
RS.MOVENEXT
LOOP
%>
</table>
<%
END IF
rs.close
set rs = nothing
conn.close
set conn = nothing
%>
<table border="1" width="640" id="table18" style="border-width: 0px">
<tr>
<td style="padding-left:4px; padding-right:4px" width="124" bordercolor="#C0C0C0" bgcolor="#D6DAE7">
<font color="#000080" size="2" face="Verdana">N°Colli</font><font color="#000080" size="2">:</font></td>
<td style="padding-left:4px; padding-right:4px" bordercolor="#C0C0C0"><font color="#000080">
<font size="2"><%response.write(colli)%></font></td>
</tr>
</table>
<table border="1" width="640" id="table19" style="border-width: 0px">
<tr>
<td style="padding-left:4px; padding-right:4px" width="124" bordercolor="#C0C0C0" bgcolor="#D6DAE7">
<font color="#000080" size="2" face="Verdana">Vettore scelto da
cliente</font><font color="#000080" size="2">:</font></td>
<td style="padding-left:4px; padding-right:4px" bordercolor="#C0C0C0"><font color="#000080">
<font size="2"><%response.write(vettore)%></font></td>
</tr>
</table>
<table border="1" width="640" id="table22" style="border-width: 0px">
<tr>
<td style="padding-left:4px; padding-right:4px" width="124" bordercolor="#C0C0C0" bgcolor="#D6DAE7">
<font color="#000080" size="2" face="Verdana">Porto Franco</font><font color="#000080" size="2">:</font></td>
<td style="padding-left:4px; padding-right:4px" bordercolor="#C0C0C0"><font color="#000080">
<font size="2"><%response.write(consuno)%></font></td>
</tr>
</table>
<table border="1" width="640" id="table23" style="border-width: 0px">
<tr>
<td style="padding-left:4px; padding-right:4px" width="124" bordercolor="#C0C0C0" bgcolor="#D6DAE7">
<font color="#000080" size="2" face="Verdana">Note</font><font color="#000080" size="2">:</font></td>
<td style="padding-left:4px; padding-right:4px" bordercolor="#C0C0C0">
<font color="#000080">
<font size="2"><%response.write(commenti)%><font color="#000080"></font></font><font size="2">
</font></td>
</tr>
</table>
<table border="1" width="640" id="table85" style="border-width: 0px">
<tr>
<td style="padding-left:4px; padding-right:4px" bordercolor="#FFFFFF">
<font face="Verdana" size="1" color="#000080">Il
committente da conferma di ricezione e presa visione
delle condizioni generali (MOD CGVI 01) allegate.</font></td>
</tr>
</table>
<table border="1" width="640" id="table86" style="border-width: 0px">
<tr>
<td style="padding-left: 4px; padding-right: 4px" bordercolor="#FFFFFF">
<font face="Verdana" size="2" color="#000080">Data:<%response.write(dtCorr)%></font></td>
<td style="padding-left: 4px; padding-right: 4px" bordercolor="#FFFFFF"></td>
<td style="padding-left: 4px; padding-right: 4px" bordercolor="#FFFFFF">
<font face="Verdana" size="2" color="#000080">Timbro
e Firma</font></td>
</tr>
</table>
</p>
<table border="1" width="640" id="table87" style="border-width: 0px">
<tr>
<td style="padding-left:4px; padding-right:4px" bordercolor="#FFFFFF">
<p align="justify">
<font face="Verdana" size="1" color="#000080">
CONDIZIONI DA APPROVARSI SPECIFICAMENTE: Agli
effetti degli art.1341/1342 del c.c. si dichiara di
approvare specificamente le disposizioni delle
clausole alle condizioni generali di vendita (MOD
CGVI 01) n.1. Prodotti, 2.Prezzi, 3.Ordini,
4.Spedizioni, 5.Pagamenti, 6.Insoluti,7.Garanzia, 8.Restituzione
prodotto,9.Gestione dati cliente,10.Norme di
chiusura.</font></td>
</tr>
</table>
<table border="1" width="640" id="table88" style="border-width: 0px">
<tr>
<td style="padding-left: 4px; padding-right: 4px" bordercolor="#FFFFFF">
<font face="Verdana" size="2" color="#000080">Data:<%response.write(dtCorr)%></font></td>
<td style="padding-left: 4px; padding-right: 4px" bordercolor="#FFFFFF"></td>
<td style="padding-left: 4px; padding-right: 4px" bordercolor="#FFFFFF">
<font face="Verdana" size="2" color="#000080">Timbro
e Firma</font></td>
</tr>
</table>
</font></font>[/b]
<font size="3" face="Verdana">
</p>
<font size="3" face="Verdana">
<font size="1" color="#000080"></form></font></font></body><body bgcolor="#D6DAE7" topmargin="0"></body><font size="3" face="Verdana"><table border="1" width="640" id="table99" style="border-width: 0px">
<tr>
<td style="border-style:none; border-width:medium; padding-left:4px; padding-right:4px" bordercolor="#FFFFFF">
<p align="justify">
<font size="3" face="Verdana">
<font face="Verdana" color="#000080">
<script>
<!--
function doit(){
if (!window.print){
alert("Browser non supportato!")
return
}
window.print()
}
//-->
</script>
</font></font>
<font face="Verdana" color="#000080" size="3">
La sua richiesta RMA è stata
inoltrata con
successo! </font>
<p align="justify">
<font size="3" face="Verdana">
<font face="Verdana" color="#000080">
<a href="javascript:doit()">
</a></font></font><font color="#000080"></script><script type="text/javascript">
var stile = "top=10, left=10, width=500, height=400, status=0, menubar=0, toolbar=0, scrollbars=1";
function Popup(apri) {
window.open(apri, "", stile);
}
</script>
</font><font face="Verdana" color="#FF0000">
è obbligatorio stampare il modulo e apporre il timbro ela firma negli spazi
di cui sopra, ed inviarlo al N°Fax:
l'annullamento della richiesta RMA.</font></td>
</tr>
</table>
</font>
</p>
<body bgcolor="#D6DAE7" topmargin="0">
</body>
</html>
scusatemi ma ho dovuto tagliare molte parti di codice (per lo piu' tabelle)..perchè non riuscivo a postare il messaggio.
lo dico per l'ultima volta, poi per me 3d chiuso. se tu vuoi vedere SOLO le cose che hai immesso nell'ultimo inserimento, DEVI fare in modo che nella WHERE ci sia un elemento in grado di indentificare questo ultimo inserimento.
ciao, vado a magna', se vedemo dopodomani
grazie...volevo sapere appunto questo...ma in che modo se è possibile saperlo...non sono molto ferrato con le ASP...mi aiuto con esempi qua e la...
nella where...cosa potrei indicare di preciso?
sql = "SELECT * FROM rma"
è nella select che dovrei inserire la where con la condizione per tutti i campi?
ho capito bene?
grazie ancora a tutti....
Optime il tuo consiglio è stato prezioso...mi bastava solo afferrare il concetto:
in effetti aggiungendo la clausola where nella sql...ho dato delle condizioni..ora mi funziona tutto.
THANKS
optime!
Permessi di invio
Rispondi quotando