onderstaand script zorgt voor autorisatie, dat werkt prima. Als ik de eerste keer met een foute code inlog krijg ik de door het script gegenereerde actie voor me neus. Wanneer ik echter via de back knop in de browser 't meteen weer probeer komt ie met een script error retour:
weet iemand hoe ik dit moet verhelpen?
code:
Provider error '80004005'
Unspecified error
weet iemand hoe ik dit moet verhelpen?
code:
Code:
<%
If Request.Form("action") <> "validate_login" Then
%>
<%
Else
strSQL = "SELECT * FROM tblLoginInfo " _
& "WHERE username='" & Replace(Request.Form("login"), "'", "''") & "' " _
' & "AND password='" & Replace(Request.Form("password"), "'", "''") & "';"
Set cnnLogin = Server.CreateObject("ADODB.Connection")
cnnLogin.Open("DRIVER={Microsoft Access Driver (*.mdb)};" _
& "DBQ=" & Server.MapPath("QwertyLogin.mdb"))
Set rstLogin = cnnLogin.Execute(strSQL)
If Not rstLogin.EOF Then
%>
doe dit
<%
Else
%>
doe dat
<%
'Response.End
End If
' Clean Up
rstLogin.Close
Set rstLogin = Nothing
cnnLogin.Close
Set cnnLogin = Nothing
End If
%>