Skrive til mdb

Har stiret mig blind. Får ingen fejlmeddelse og den skriver ikke Ip'en til databasen.
Nogle gode ideer?

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/brugerdata.mdb")
Conn.Open DSN
strSQL = "SELECT * FROM brugerip Where Ip = '" & Request.ServerVariables("REMOTE_ADDR") & "'"
Set rs=Conn.Execute(strSQL)
If NOT rs.EOF Then
Response.Write "Din Ip er registreret." & "<br>"
Else
strSQL = "Insert into brugerip (Ip) values('" & Request.ServerVariables("REMOTE_ADDR") & "')"
End If
Conn.Close
Set Conn = Nothing
%>