ho dei prodotti in un carrello da acquistare.....vorrei che quando clicco conferma ordine va in una pagina conferma.asp......dove mi da il riepilogo dell'ordine e il form per l'inserimento dei dati anagrafici per la spedizione....come fare? (ps il form dei dati anagrafici l'ho già creato)
di seguito il form del carrello
<form ACTION="carrello.asp" METHOD="post" onSubmit="return checkForm()">
<div align="center">
<table border="1">
<tr bgcolor="#dddddd">
<th>Codice</th>
<th>Descrizione</th>
<th>Marca</th>
<th align=center>Quantità</th>
<th>Prezzo</th>
<th>Elimina</th>
</tr>
<%
Dim prezzo_giusto
Set rs = Server.CreateObject("ADODB.RecordSet")
set conn = Server.CreateObject("ADODB.Connection")
str="DBQ=" & Server.mappath("/mdb-database") & "\" & "progetto_finale.mdb" & ";Driver={Microsoft Access Driver (*.mdb)}"
conn.open str
rs.ActiveConnection = conn
Rs.open "select * from prodotti,offerte where conta in(" & codici & ") and prodotti.codice=offerte.codice_prodotto"
while not rs.eof
qta=carrello(cstr(rs("conta")))
prezzo_giusto = rs("nuovo_prezzo")
%>
<tr>
<td>In offerta <%=rs("codice")%></td>
<TD width=150><input type=hidden name=id value="<%=rs("conta")%>">
<%=rs("DESCRIZIONE")%> </TD>
<td><%=rs("marca")%></td>
<TD align=center><input type=text size=3 name=qta value="<%=qta %>"></TD>
<%totale=totale+prezzo_giusto*qta%>
<TD><%=formatCurrency(prezzo_giusto*qta) %> </TD>
<TD align=center><input type=checkbox name=elimina value="<%=rs("conta") %>">
</tr>
<% rs.MoveNext
wend
Rs.Close
Rs.open "select DISTINCT prodotti.* from prodotti,offerte where conta in(" & codici & ") and Not prodotti.codice in (SELECT codice_prodotto FROM offerte)"
while not rs.eof
qta=carrello(cstr(rs("conta")))
prezzo_giusto = rs("prezzo")
%>
<tr>
<td><%=rs("codice")%></td>
<TD width=150><input type=hidden name=id value="<%=rs("conta")%>">
<%=rs("DESCRIZIONE")%> </TD>
<td><%=rs("marca")%></td>
<TD align=center><input type=text size=3 name=qta value="<%=qta %>"></TD>
<%totale=totale+prezzo_giusto*qta%>
<TD><%=formatCurrency(prezzo_giusto*qta) %> </TD>
<TD align=center><input type=checkbox name=elimina value="<%=rs("conta") %>">
</tr>
<% rs.MoveNext
wend
%>
<TR>
<TD colspan=3 align=right>Totale:
<TD><%=formatCurrency(totale)%>
<TD></TR>
<%
Rs.Close
Set Rs=nothing%>
</table>
<input type=submit name="action" value="Aggiorna carrello">
<input type=submit onclick="return confirm('Sei sicuro di voler eliminare il contenuto del carrello ?')" name="action" value="Svuota carrello">
<input name="button" type=button onClick="location.href='conferma.asp'" value="Conferma ordine">
Torna alla Home Page </div>
</form>
Rispondi quotando