% Invia=Request("Invia") If Not Nullo(Invia) Then Nome=SQLEncode(Ucase(Request("Nome"))) Cognome=SQLEncode(Ucase(Request("Cognome"))) Indirizzo=SQLEncode(Ucase(Request("Indirizzo"))) CAP=SQLEncode(Request("CAP")) Citta=SQLEncode(Ucase(Request("Citta"))) Provincia=SQLEncode(Request("Provincia")) Paese=SQLEncode(Ucase(Request("Paese"))) Telefono=SQLEncode(Request("Telefono")) Email=SQLEncode(Request("Email")) User_Login2=SQLEncode(Request("User_Login2")) User_Password2=SQLEncode(Request("User_Password2")) SQL="UPDATE tbl_clienti SET Nome='" & Nome & "', Cognome='" & Cognome & "', Indirizzo='" & Indirizzo & "', CAP='" & CAP & "', Citta='" & Citta & "', Provincia='" & Provincia & "', Paese='" & Paese & "', Telefono='" & Telefono & "', Email='" & Email & "', User_Login='" & User_Login2 & "', User_Password='" & User_Password2 & "' WHERE ID=" & session("ID_Utente") DBConn.Execute(SQL) End If SQL="SELECT * FROM tbl_clienti WHERE ID=" & session("ID_Utente") Set RS=DBConn.Execute(SQL) Provincia=RS("Provincia") %>
|