Set Conn = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.Recordset")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db
If Request.Querystring("losen") = "nej" Then
mess = "alert('Fel lösenord!');return true;"
End If
If Request.Querystring("anv") = "nej" Then
mess = "alert('Det finns ingen användare med det användarnamnet!');return true;"
End If
Innan vi överstätter detta till dig så skall vi nog gå igenom koden lite. För följande kodsnutt.
<%Response.Buffer = "True"
Session.lcid = 1053
db = Server.MapPath("db/test.mdb")
Set Conn = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.Recordset")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db
Har absolut inget med följande kodsnutt att göra.
If Request.Querystring("losen") = "nej" Then
mess = "alert('Fel lösenord!');return true;"
End If
If Request.Querystring("anv") = "nej" Then
mess = "alert('Det finns ingen användare med det användarnamnet!');return true;"
End If
Du har utelämnat en delkod misstänker jag samt att Request.Querystring() inte har med databasen att göra vilket gör det svårt att kontrollera om lösenordet är fel eller om användaren finns i databasen så som man gör i denna kod.