error '80020009'

This is my error i am getting..

error '80020009'

/signup.asp, line 59


this is line 57-61

rs.open strsql,conn,3,2
act = request.QueryString("act") +1 -1
if act = rs.fields("active") then
rs.fields("status") = 1
rs.update


please let me know how to fix this thank you!

 

did you try:

if rs.eof then __ else __ end if ' can not find one

 

You don't have any records to show or update.
Use it like that:

rs.open strsql,conn,3,2
If not rs.EOF Then
   act = request.QueryString("act") +1 -1
   if act = rs.fields("active") then
   rs.fields("status") = 1
   rs.update
End If

Code (markup):

Also, if it's your really full code of the updating term, you should use "Conn.Execute" instead - much more fast & easy.

Good Luck