ADODB.Field error '800a0bcd'

Question

I\'m getting an error in my .asp file, and I don\'t know how to solve this (I don\'t know ASP, it\'s an old project of my client, other developer did this). The error what i

Answer 1

Are you sure that you have records?

in line 105 you are asumming that the is a record, what if not?

why don't you add something like this:

   if rs.eof = false then
       xlink=rs("vi_link")
   end if

also,

in the sql line you have this:

RS.Open "SELECT * from  visitas where vi_data = date() and vi_ip='" &  xip & "'",cn,3,3

but I am not sure if date() should go like that, it should have '"& date() &"' or "& date() &" (not remember if date is considered string or numeric)

it should be like this:

RS.Open "SELECT * from  visitas where vi_data = '" & date() & "' and vi_ip='" &  xip & "'",cn,3,3