Originariamente inviato da Mattatore2
Ho creato nella pagina index.asp un form dove l'utente (che precedentemente si è registrato) compilerà le caselle "utente" e "password" per accedere alla sua pagina personale. Ora nella pagina login.asp vorrei mettere un semplice codice che riconosce l'utente e lo spedsce alla sua pagina, o se non lo riconosce lo riporta ad un'altra. I dati dell'utente si trovano nel database "dbcollezione" nella tabella "tabcollezione".
Potete aiutarmi a scriverlo? GRAZIE MILLE!
codice:
<%
USERID = request.form("userid")
PWD = request.form("pwd")
DB_PATH= "/database/dbcollezione.mdb"
QUERY = "SELECT * FROM tabcollezione WHERE userid='" & USERID & "' AND pwd='" & PWD & "' "
dim strConn
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)};"
strConn=strConn & "DBQ=" & Server.MapPath(DB_PATH)
Conn.Open strConn
Set RS = Server.CreateObject("ADODB.Recordset")
RS.Open QUERY, Conn, 3, 3
if rs.eof then
RESULT = false
else
RESULT = true
end if
if RESULT = false then
session ("logged") = false
response.Redirect("pagina per utente non loggato.asp")
response.end
end if
if RESULT = true then
session ("logged") = true
response.Redirect("pagina personalizzata.asp")
response.end
end if
RS.Close
Set RS = Nothing
Conn.Close
Set Conn = Nothing
%>