Questo è il codice della pagine di login, mentre la pagine conmdbx.asp mi fa la connessione al db.
codice:
<%
user = request("user")
password = request("password")
sSQL = ""
sSQL = sSQL & "Select * "
sSQL = sSQL & "From Caricatori "
sSQL = sSQL & "Where LOGN = '" & user & "' AND PASSWORD = '" & password &"' "
set rsData = ConnMDB.Execute(sSQL)
if rsData.eof=true then
response.redirect "index.asp"
else
session("User") = user
session("IdCaricatore") = rsData("ID CARICATORE")
if rsData("ID CARICATORE") = "Admin" then
response.redirect "_admin/index.asp"
else
response.redirect "_user/index.asp"
end if
end if