Passara valori ad altre pagine.

[paolae]

Ciao Ragazzi, come state? tutti bene? siete già caldiiii??? (diceva una rock star tempo fa)

Qualcuno può aiutarmi? spiego il problema:

Allora, ho realizzato un piccolo carrello e-commerce e nel form dei dati anagrafici, ho inserito uno script ajax dove in automatico mi elenca e concatena le regioni-province-comuni.

1) pagina form (il cliente inserisce tutti i dati)
2) pagina riepilogo dati (mostra a video tutti i dati e se voglio, li invia via email con script cdonts)

Fin qui tutto bene, vi posto il codice della 2° pagina del riepilogo dati (quella che raccoglie i dati dalla form : (ridotto all'osso)

<%
Session("regione") = request.form("regione")
Session("provincia") = request.form("provincia")
Session("comune") = request.form("comune")

Set MyConn=Server.CreateObject("ADODB.Connection")
MyConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("/db/db.mdb")

 SQL = "select * from regioni where id_regione="&request.form("id_regione")&" "
 SQL2 = "select * from province where id_provincia="&request.form("id_provincia")&" "
 SQL3 = "select * from comuni where id_comune="&request.form("id_comune")&" "

Set RS = MyConn.Execute(SQL)
Set RS2 = MyConn.Execute(SQL2)
Set RS3 = MyConn.Execute(SQL3)

While Not RS.EOF
%>

<input type="hidden" name="regione"><%=rs("regione")%>
<input type="hidden" name="provincia"><%=rs2("provincia")%>
<input type="hidden" name="comune"><%=rs3("comune")%>

</option><%
RS.MoveNext
Wend

   id_regione = Request.form("id_regione")
   id_provincia = Request.form("id_provincia")
   id_comune = Request.form("id_comune")

   regione = Request.form("regione")
   provincia = Request.form("provincia")
   comune = Request.form("comune")
    
RS.Close
Set RS = Nothing
MyConn.Close
Set MyConn = Nothing

response.Redirect "registrazione.asp" 
%>

**************************************************************
Ora vorrei sapere come fare per portarmi i valori in un'altra pagina.(per intenderci, la pagina di Admin, dove visualizzo tutti i dettagli relativi all'ordine effettuato)

Vorrei portarmi questi 3 valori: regione,provincia,comune.

La logica direbbe di ricreare le 3 items  + le 3 session e passare le variabili, ma non ho ben capito come fare.

************************************************** ************

La 3° pagina (admin) dove vorrei riportarmi i valori è la seguente:

<%

Session("regione") = request.form("regione")
Session("provincia") = request.form("provincia")
Session("comune") = request.form("comune")


Set MyConn=Server.CreateObject("ADODB.Connection")
MyConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("/db/db.mdb")

SQL = "select * from regioni where id_regione="&request.form("id_regione")&" "

Set RS = MyConn.Execute(SQL)

Session("regione") = request.form("regione")

session("regione") = rs("regione")
regione = Request.QueryString("regione")

While Not RS.EOF
%>
		
 <tr>
<input type="hidden" name="regione"><%=rs("regione")%>
<input type="hidden" name="province"><%=rs("province")%>
<input type="hidden" name="comuni"><%=rs("comuni")%>

	
</option><%
RS.MoveNext
Wend


   id_regione = Request.form("id_regione")
   id_provincia = Request.form("id_provincia")
   id_comune = Request.form("id_comune")

   regione = Request.form("regione")
   provincia = Request.form("provincia")
   comune = Request.form("comune")
     
    
RS.Close
Set RS = Nothing
MyConn.Close
Set MyConn = Nothing
%>

Sono un pò confusa

[Roby_72]

Le session una volta create le puoi usare fino alla scadenza del timeout della session.
Quindi ti basta leggere ed usare il loro valore, ad esempio:

regione = Session("regione")

Roby

[paolae]

Ciao Roby,

è proprio quello che ho fatto, ma mi restituisce il seguente errore:

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'id_regione='.

/report2.asp, line 16


Forse perchè è errato scrivere cosi?

session("regione") = rs("regione")

[Roby_72]

Nella query devi mettere la session... non la request.

Roby

[optime]

posta un po di codice intorno alla riga 16 (evidenziando la 16)

[paolae]

Ahhhhhhhhhhh, quindi la query è sbagliata...ecco perchè mi da errore.
In effetti l'ho copiata dalla pagina precedente (riepilogo dati)

<%
Session("regione") = request.form("regione")
Session("provincia") = request.form("provincia")
Session("comune") = request.form("comune")

Set MyConn=Server.CreateObject("ADODB.Connection")
MyConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("/db/db.mdb")

SQL = "select * from regioni where id_regione="&request.form("id_regione")&" "

Set RS = MyConn.Execute(SQL)

Session("regione") = request.form("regione")

session("regione") = rs("regione")
regione = Request.QueryString("regione")

		While Not RS.EOF
		%>
		
            <tr>
            <td><font size="2">Regione:</font></td><td><font color="#990000" size="2"><input type="hidden" name="regione"><%=rs("regione")%></font>
<font size="1"></font></td>
            </tr>
      
	
		</option><%
		RS.MoveNext
		Wend

   id_regione = Request.form("id_regione")
   id_provincia = Request.form("id_provincia")
   id_comune = Request.form("id_comune")

   regione = Request.form("regione")
   provincia = Request.form("provincia")
   comune = Request.form("comune")
    
    
RS.Close
Set RS = Nothing
MyConn.Close
Set MyConn = Nothing
%>

[optime]

Originariamente inviato da paolae
Ahhhhhhhhhhh, quindi la query è sbagliata...ecco perchè mi da errore.
In effetti l'ho copiata dalla pagina precedente (riepilogo dati)

quindi hai risolto?

[paolae]

ecco fatto scusami:

 SQL = "select * from regioni where id_regione="&request.form("id_regione")&" "
 SQL2 = "select * from province where id_provincia="&request.form("id_provincia")&" "
 SQL3 = "select * from comuni where id_comune="&request.form("id_comune")&" "

Set RS = MyConn.Execute(SQL)
Set RS2 = MyConn.Execute(SQL2)
Set RS3 = MyConn.Execute(SQL3)

While Not RS.EOF
%>

<input type="hidden" name="regione"><%=rs("regione")%>
<input type="hidden" name="provincia"><%=rs2("provincia")%>
<input type="hidden" name="comune"><%=rs3("comune")%>

[Roby_72]

Non ho capito cosa hai fatto...
Nelle tre query vedo ancora la request e non la session...

Roby

[paolae]

ecco quà, ho fatto la prova solo con la 1° query:

<%
Session("regione") = request.form("regione")


Set MyConn=Server.CreateObject("ADODB.Connection")
MyConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("/db/db.mdb")

 
 SQL = "SELECT * FROM regioni where id_regione="& session("regione")
 
 
 'SQL2 = "select * from province where id_provincia="&request.form("id_provincia")&" "
 'SQL3 = "select * from comuni where id_comune="&request.form("id_comune")&" "

Set RS = MyConn.Execute(SQL)
'Set RS2 = MyConn.Execute(SQL2)
'Set RS3 = MyConn.Execute(SQL3)

While Not RS.EOF
%>

<input type="hidden" name="regione"><%=rs("regione")%>

ma mi da sempre l'errore:

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'id_regione='.

/report2.asp, line 16