Undtagelse opstod

Hejsa - jeg har et lille problem!
Den siger: "Undtagelse opstod" p.g.a. denne kode:

<%
'Her åbnes en connection til databasen
tempConn = "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("XX.mdb") & ";UID=admin;PWD=;"
%><%
       
        'Her åbnes databasen over nyheder
        usersSQL = "SELECT * FROM points WHERE klan = '" & request.form("klan") & "'"
        Set users = Server.CreateObject("ADODB.Recordset")
users.Open usersSQL, tempConn, adOpenKeyset, adLockOptimistic
       
if request.form("tp") = "+" then
  :::-> users("points") = users("points") + Request.form("antal")
else

users("points") = users("points") - Request.form("antal")
end if

users.Update
users.Close
rs.close
%>

---------

:::-> = der hvor den siger at fejlen er!

Nogen der kan hjælpe?