error '800a138f'

Fejlen:

Microsoft JScript runtime error '800a138f'

Object expected

/3SEM04/login.asp, line 15



Koden:

<%@Language=JavaScript%>

<%

bnavn = Request.Form("brugernavn");
pass = Request.Form("password");


conn = Server.CreateObject("ADODB.Connection");
DBPath = "DBQ=" + Server.mappath("ASP.mdb");
conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; " + DBPath);

rs = conn.execute("SELECT * FROM brugere WHERE brugernavn = '"+bnavn+"' AND password ='"+pass+"' AND aktiv = 'ja'");

If(!rs.EOF)
    {
    Session("oplysnavn")= rs.Fields("navn");
    Session("oplysbnavn")= rs.Fields("bnavn");
    Session("oplysaka")= rs.Fields("aka");   
    }

If(!rs.EOF)
    {
    Session("login") = "ja";
    Response.redirect("vis_forum_oversigt.asp");
Else
    Response.redirect("opret_bruger_form.asp");
    }   

conn.Close();

%>