Login: hvad går det galt?

Er ny udi ASP, og har forsøgt mig med et login "dele af koden er "lånt"", men det virker ikke...

Er der et klogt hoved, der kan se fejlen? Koden ser således ud:<% @Language="VbScript"%>
<html>
<head>
<title> Startside </title>
</head>
<body>
<%
SET RS = Server.CreateObject("ADODB.Connection")
rs.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")

If Request("mode") = "Check" then

strUsername = Trim(Replace(request("username"),"´","´´" ))
strPassword = Trim(Replace(request("password"),"´","´´" ))

  Sql = "Select Count(*) as Found from user where (username = '" & strUsername  & "') and (password ='" & strPassword  & "')"
  Set LO = RS.Execute(Sql)
  if LO("Found") = 0 then
    Session("login") = ""
    error = "Forkert brugernavn eller adgangskode - prøv igen!"
  else
  strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("database.mdb")
  Set myConn = Server.CreateObject("ADODB.Connection")
  myConn.Open strDSN
  strSQL = "SELECT * FROM user where (username = '" & Request("username") & "') and (password ='" & Request("password") & "')"
  Set ez = myConn.Execute(strSQL)
    Session("login") = "yes mate"
    Response.Redirect "startside.asp"
    EZ.Close
    RS.Close
    Conn.Close
  end if
end if
%>
<br><form method="POST" action="login.asp">
<input type="hidden" name="mode" VALUE="Check">
Denne side kræver login:<br>
<br>

Username:
<input class="text" type="text" name="username" size="15" style="font-family: Verdana; font-size: 8 pt" value="<%=strbrugernavn%>"></font>
<br><font class="header">
Password:
<input class="text" type="password"  name="password" size="15" style="font-family: Verdana; font-size: 8 pt" value="<%=strpassword%>"></font>
<br>
<input class="text" type="submit" value="Login" name="submit" style="font-family: Verdana; font-size: 8 pt"></font>
<%=error%>
</form>



</body>
</html>