vil det funke?

er vi enige?

<%
if Request.Form(\"usernname\") = \"\" or Request.Form(\"userpass\") = \"\"
then response.redirect \"login.asp\"
else
set myConn = Server.CreateObject(\"ADODB.Connection\")
myConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"users.mdb\")
strSQL = \"SELECT * FROM users\"&_
\" WHERE user_nname=\'\" & Request.Form(\"usernname\") & \"\'\"&_
\" AND user_pass=\'\" & Request.Form(\"userpass\") & \"\'\"
set rs = myConn.Execute(strSQL)
if not (rs.BOF or rs.EOF) then
userid = rs(\"user_id\")
session(\"userid\") = true           
myConn.Close
Set myConn = Nothing
response.redirect \"loginok.asp\"
else
response.write \"kender dig ikke\"
end if
end if
%>


<form action=\"login.asp\" method=\"post\">
<input type=\"text\" name=\"usernname\">
<input type=\"text\" name=\"userpass\">
<input type=\"submit\">
</form>