min recordset fejler noget

hej jeg har dette recordset, den kørte fint igår men nu giver den fejl ????

her er koden :
set tr = server.CreateObject("ADODB.Recordset")
    tr.Open "select * from hot_visiter where visit_ip='" & ip & "'", conn, 2, 2
   
if not tr.EOF then
                       
tr("visit_ip") = now()
tr.Update

else
tr.AddNew
tr("visit_ip") = ip
tr("visit_date") = now()
tr("visit_times") =  1
tr.update
end if

her er fejlen:
Error Type:
ADODB.Recordset.1 (0x80004005)
SQLState: 37000 Native Error Code: 0 [DataDirect][ODBCCUR lib] Syntax error or access violation

jeg bruger Surftown