Problema con el BOF o EOF

[amigaa]

Se me acaba de presentar un problema que no se como resolver,
cuando corro mi aplicación me aparece este error:

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.
Este es mi código.

Private Sub Form_Load()
cn.Provider = "microsoft.jet.oledb.4.0"
cn.ConnectionString = "monitor2.mdb"
cn.Open
rs.Open "select * from monitor", cn, adOpenKeyset, adLockOptimistic
rs.MoveFirst
refrescar
desabilitar
end sub

**** En mi base de datos si tengo registros.
Ojala y me puedan ayudar.

[rafapaskual]

Hola, si en la base de datos tienes registros comprueva el SQL y la conexion con el depurador. De todas maneras suele ser mejor comprobar antes de cualquier operacion con el recordset si hay registros, con por ejemplo
IF not (rs.eof and rs.bof) then
rs.movefirst
.....
saludos!

[jachguate]

Este es un conocido bug del motor de conección. Te recomiendo bajar la última versión de la página de microsoft.

Hasta luego.

;)

[amigaa]

Gracias por la ayuda...

[Renegado]

Private Sub Form_Load()
cn.Provider = "microsoft.jet.oledb.4.0"
cn.ConnectionString = "monitor2.mdb"
cn.Open
rs.Open "select * from monitor", cn, adOpenKeyset, adLockOptimistic
on error goto Error
rs.MoveFirst
on error goto 0
refrescar
desabilitar
exit sub
Error:
end sub


En Ultimo caso controla los Errores para que no te salga el error
El valor de BOF o EOF es True...........