Hvad dælen går der af databasen!!

Er der nogen der kan svare på hvoffor jeg ikke kan læse fra min database men saktens skrive til den!!! Det drejer sig om 20 ting jeg skal trække ud af databasen på 1 gang! og når jeg gør det så melder den fejl!!!!
Hvis jeg ikke tager megel fejl så skal man bruge RS("Variabel") = variabel2 for at trække ting ud! Det er som om felterne i databasen ikke eksistere.!

Min fejl meddelse er:

Microsoft OLE DB Provider for ODBC Drivers fejl '80040e21'

Errors occurred

/Sms/Default.asp, linje 46

Scriptet ser sådan ud:

set conn = server.createobject("adodb.connection")
DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtemp=dsntemp & "DBQ=" & server.mappath("/Sms/cgi-bin/base.mdb")
conn.Open DSNtemp
sqlstmt = "SELECT * from Bruger where brugerid ='"&Session("brugerid")&"'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sqlstmt, conn, 3, 3
Total = rs.recordcount

Response.Write Total
If NOT RS.EOF then
   
    RS("id") = id  '<<< linie 46
    RS("pass") = pass
    RS("navn1") = navn1
    RS("navn2") = navn2
    RS("navn3") = navn3
    RS("navn4") = navn4
    RS("navn5") = navn5
    RS("navn6") = navn6
    RS("navn7") = navn7
    RS("navn8") = navn8
    RS("navn9") = navn9
    RS("navn10") = navn10
    RS("nr1") = nr1
    RS("nr2") = nr2
    RS("nr3") = nr3
    RS("nr4") = nr4
    RS("nr5") = nr5
    RS("nr6") = nr6
    RS("nr7") = nr7
    RS("nr8") = nr8
    RS("nr9") = nr9
    RS("nr10") = nr10

    Conn.Close
    Set Conn = nothing

Response.Write "<center><input type='button' Value='"& navn1 &"' onclick=html.location'Default?nr="& nr1 &"'>"
Response.Write "<input type='button' Value='"& navn2 &"' onclick=html.location'Default?nr='"& nr2 &"'>"
Response.Write "<input type='button' Value='"& navn3 &"' onclick=html.location'Default?nr='"& nr3 &"'>"
Response.Write "<input type='button' Value='"& navn4 &"' onclick=html.location'Default?nr='"& nr4 &"'>"
Response.Write "<input type='button' Value='"& navn5 &"' onclick=html.location'Default?nr='"& nr5 &"'>"
Response.Write "<input type='button' Value='"& navn6 &"' onclick=html.location'Default?nr='"& nr6 &"'>"
Response.Write "<input type='button' Value='"& navn7 &"' onclick=html.location'Default?nr='"& nr7 &"'>"
Response.Write "<input type='button' Value='"& navn8 &"' onclick=html.location'Default?nr='"& nr8 &"'>"
Response.Write "<input type='button' Value='"& navn9 &"' onclick=html.location'Default?nr='"& nr9 &"'>"
Response.Write "<input type='button' Value='"& navn9 &"' onclick=html.location'Default?nr='"& nr10 &"'>"
Response.End
End If