Login tæller

<%
Response.Buffer = true

set rs = Server.CreateObject(\"ADODB.Recordset\")
Set objConn = Server.CreateObject (\"ADODB.Connection\")
Set objRec2 = Server.CreateObject (\"ADODB.Recordset\")
conn = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
conn = conn & \"DBQ=\" & server.mappath(\"*****.mdb\")
Bruger = trim(Request.Form(\"FBruger\"))
Pass = trim(Request.Form(\"FPass\"))
SQL =\"SELECT * FROM Tuser WHERE UserID = \'\" & Bruger & \"\'\"
rs.Open SQL,conn
objConn.Open conn, SQL

objRec2.Open \"Tuser\", objConn, 0, 2, 2       
\'Undersøg om det er det rigtigt Password og send til loginsiden hvis det er forkert ellers sender den til Lektiesiden.

    If rs.EOF Then
        Succes =\"nej\"
        Response.Redirect \"dologin.asp?error=user\"
   
        Elseif rs(\"password\") = pass Then
      Session(\"Login\") = Bruger
            Succes =\"Ja\"
            objRec2(\"Logins\") = objRec2(\"Logins\") + 1
            objRec2.Update
           
            Response.Redirect \"goto.asp?id=1\"
           
            Else         
      Succes=\"nej\"
            Response.Redirect \"dologin.asp?error=pass\"
    End If
   

%>
Jeg har den ovenstående kilde til min login side. Det går også fint nok det med at man logger ind. Den smider folk tilbage hvis det er forkert brugernavn eller password, og den lægger da en til logins i databasen, men problemet med det er at den altid tilføjer til den sidste bruger det står i databasen. Håber på hjælp !!

-Ellebaek