codice:
Pagina = Request.Form("Pagina")
NomeUtente = Request.Form("NomeUtente")
UserName = Request.Form("UserName")
Pass = Request.Form("Pass")
Set rsScrivi = CreateObject("ADODB.Command")
rsScrivi.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.MapPath("MILS.MDB")&"; Persist Security Info = False"
sql = "INSERT into Login (Utente,User,Password,Page) "
sql = sql & " VALUES' " NomeUtente&"', '"&UserName&"' ,'"&Pass&"' ,'"&Pagina&"')"
rsScrivi.CommandText = sql
rsScrivi.Execute
Set rsScrivi = Nothing