Fejl i login-system
<%strBrugernavn = Request.Form("brugernavn")
strKodeord = Request.Form("kodeord")
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("../sdhdatab.mdb")
set rs = Conn.execute("SELECT * FROM medlemmer WHERE nick=" & strBrugernavn)
If rs.EOF OR rs.BOF Then
Response.write "Forkert brugernavn"
Else
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("../sdhdatab.mdb")
set rs = Conn.execute("SELECT * FROM medlemmer WHERE kodeord=" & strKodeord)
If rs.EOF or rs.BOF Then
Response.write "Forkert kodeord"
Else
Session("admin") = strBrugernavn
Response.redirect "index2.asp"
End if
End if
%>
Når jeg prøver at logge ind, får jeg denne fejl:
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.
/projects/sodah/ext_admin_sys/validate.asp, line 8
- hvori ligger fejlen? :)
BTW, linie 8 er:
set rs = Conn.execute("SELECT * FROM medlemmer WHERE nick=" & strBrugernavn)
