15/05/2004, 13:06
|
| | | Fecha de Ingreso: febrero-2002 Ubicación: Santiago
Mensajes: 253
Antigüedad: 23 años Puntos: 0 | |
| 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........... |