Uso de While y EOF

[marcocho2005]

Hola
tengo un pequeño problema al tratar de mostrar mis registros en una tabla
hago lo siguiente:

<%
Set RsDatos = Server.CreateObject("ADODB.RecordSet")
SQL="Select * From Tabla"
RsDatos.Open SQL, Conexion, 3
If RsDatos.RecordCount > 0 Then
While Not RsDatos.EOF
--Mostrar Registros
RsDatos.MoveNext
Wend
End If
%>

al ejecutar la pagina ASP me despliega el siguiente error:
El Actual registro es EOF o BOF o fue eliminado
Es necesario un registro actual.


¿¿¿QUE PUEDO HACER???
marcocho

[Myakire]

En logar de preguntar RsDatos.RecordCount > 0, pregunta If Not RsDatos.EOF

[skatomundo]

Código:

Set RsDatos = Server.CreateObject("ADODB.RecordSet")
SQL="Select * From Tabla"
RsDatos.Open SQL, Conexion, 3
if not rsDatos.eof then
  do until rsDatos.eof
        response.write(rsdatos("campo1"))
        'blablabla..
  RsDatos.MoveNext
  loop
End If
rsDatos.close

[Neuron_376]

El metodo RecordCount tiende a fallar dentro de ASP, en Visual Basic siempre corre bien, pero en ASP normal tiende a fallar, con el SCRIPT que te pudieon abajo es seguro que cubres el problema, el error que te aparecia de todas formas significa que estas intentando acceder a un objeto Recordset que no ha regresado ningun valor, es probable que si tenias valores, pero cuando corriste RsDatos.RecordCount causo un error en el objeto.

Bueno, Bay

[pablinweb]

Para que el if si el while ya lo cubre?

Código:

Set RsDatos = Server.CreateObject("ADODB.RecordSet")
SQL="Select * From Tabla"
RsDatos.Open SQL, Conexion
do while not RsDatos.eof
        response.write(RsDatos("campo1"))
        'blablabla..
  RsDatos.MoveNext
loop
rsDatos.close

[Neuron_376]

Tienes razon en eso...

[skatomundo]

"until"

Else

wend

[marcocho2005]

ok gracias a todos