LOGear visitas usando HTTP_REFERER

[maestro]

Intento LOGear las paginas desde las que provienen las visitas a mi sitio usando HTTP_REFERER y este codigo.

url=Request.ServerVariables("HTTP_REFERER&quo t;)
SQL="SELECT * FROM remitentes"
rs.Open SQL, oConn,1,2
rs.movelast
rs.addnew
rs("url")=url
rs.update
rs.close

Esto funciona bien pero solo si existe algun registro en la tabla, si por el contrario la tabla esta vacia me da un error al intentar hacer el rs.movelast.

¿Como puedo controlar esto ?, habia probado con:
if rs.bof=rs.eof then rs.movefirst
Pero creo que tampoco es la solucion.

Jose Maria Fernandez
<a href="mailto:[email protected]">Webmaster @expansionweb.net</a>
<a target="_blank" href="Http://www.expansionweb.net">Http://www.expansionweb.net</a>

[vic78]

Prueba esto

url=Request.ServerVariables(&quot;HTTP_REFERER&quo t;)
SQL=&quot;SELECT * FROM remitentes&quot;
rs.Open SQL, oConn,3,3
rs.addnew
rs(&quot;url&quot;)=url
rs.update
rs.close

Ya q' al hacer el select *, ya de antemano el apuntador se movio hasta el ultimo registro, ya no necesitas movelaste

Saludos

[maestro]

Pues parece ser que no se mueve porque sigue dandome el error, es este:

ADODB.Recordset error '800a0bcd'
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/asp_pruebas/referer.asp, line 23


Jose Maria Fernandez
<a href="mailto:[email protected]">Webmaster @expansionweb.net</a>
<a target="_blank" href="Http://www.expansionweb.net">Http://www.expansionweb.net</a>

[maestro]

Ya he dado con ello.
El problema es que si estamos en BOF y EOF a la vez no podemos hacer un movenext ni un movelast ni un movefirst, porque no existe ningun registro.

Asi que lo que he hecho es darle directamente al rs.update que se supone que crea el registro automaticamente en este caso.

El codigo queda asi:
url=Request.ServerVariables(&quot;HTTP_REFERER&quo t;)
SQL=&quot;SELECT * FROM remitentes&quot;
rs.Open SQL, oConn,1,2
if rs.EOF and rs.BOF then
rs.addnew
rs(&quot;url&quot;)=url
rs.update'rs.addnew
response.write(&quot;edsfsfd&quot;)
else
rs.movelast
rs.addnew
rs(&quot;url&quot;)=url
rs.update
end if
rs.close

Jose Maria Fernandez
<a href="mailto:[email protected]">Webmaster @expansionweb.net</a>
<a target="_blank" href="Http://www.expansionweb.net">Http://www.expansionweb.net</a>