si no existe un registro

[lorenaap]

Hola a Todos
Por favor alguien podria ayudarme ... correr para correr los registros con esta opción que se muestra a bajo
<% Do until rs1.eof%>
<tr>
<td bgcolor="#E3E2E2" valign="top"><p align="left"><font face="VERDANA" size="1"><%=Rs1.Fields("ACTIV IDAD").Value %> </font></td>
<%rs1.MoveNext
loop
rs1.close
Set Rs1= Nothing%>

el problema es cuando en una fila de la tabla x no existe una fila de datos y en la pagina asp se ve el siguiente error

ADODB.Field error '80020009'

El valor de BOF o EOF es True, o el actual registro ha sido eliminado; la operación solicitada por la aplicación requiere un registro actual.

?

[AlZuwaga]

Hola, intentá lo siguiente:

<% if rs1.bof and rs1.eof then %>

<tr>
<td bgcolor="#E3E2E2" valign="top"><p align="left"><font face="VERDANA" size="1">No existe el registro</font></td>

<% else %>

<% Do until rs1.eof%>
<tr>
<td bgcolor="#E3E2E2" valign="top"><p align="left"><font face="VERDANA" size="1"><%=Rs1.Fields("ACTIV IDAD").Value %> </font></td>
<%rs1.MoveNext
loop
rs1.close
Set Rs1= Nothing%>

<% end if %>