<%
Dim username
Dim password

username = Replace(Request.Form("username"), "'", "''")
password = Replace(Request.Form("password"), "'", "''")



Dim cn
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("public/archivio.mdb")
Dim sql
sql = "SELECT ID FROM archivioutenti WHERE username='" &username&_
"' AND password='" &password& "'"
Dim rs
Set rs = cn.Execute(sql)

Dim autenticato
if rs.eof then
autenticato = false
else
autenticato = true
end if
rs.Close
cn.Close
Set rs = Nothing
Set cn = Nothing


Dim cod
cod=Request.Querystring("cod")

SQL="SELECT * FROM tabella1 WHERE id="&cod
Set rec = Server.CreateObject("ADODB.Recordset")
Set Rec=Conn.Execute(SQL)


if autenticato = true then
Session("autenticato") = "OK"
Response.Redirect("prenota.asp?cod=" & cstr(cod)
else
Response.Redirect("login.asp")
end if
%>



questo è un codice di processo di autenticazione in questa riga

Response.Redirect("prenota.asp?cod=" & cstr(cod)

sto provando, se l'utente ha inserito i suoi dati giusti, ad inviarlo nella pagina di riferimento di quel codice

ma l'errore è questo


Microsoft VBScript compilation error '800a03ee'

Expected ')'

/processlogin.asp, line 44

Response.Redirect("prenota.asp?cod=" & cstr(cod)
------------------------------------------------^


potrei fare una request.querystring ma nn so dove metter le mani

fatemi sapere grazie