Buscar

Mari
16 de Septiembre del 2003
Hola y gracias por su ayuda!

Yo introduzco por teclado una cédula y presiono un botón para que la busque, pero cuando no existe me retorna este mensaje de error:
El valor de BOF o EOF es true, o el actual registro se eliminó; la operación solicitada requiere un registro actual.

Cosa que no es cierta porque tengo datos en la base de datos.

Envío lo que tengo:

If cedula.Text <> "" Then
sql = "select * from clientes where cedula like '" & cedula.Text & "'"
Set datos = conexion.Execute(sql)
If (cedula.Text <> cedula) Then
MsgBox "Ésta cédula no está en la base de datos. Intente con otra cédula.", vbCritical
cedula.SetFocus
Else
fecha = datos.Fields("fecha")
nombre = datos.Fields("nombre")
cedula = datos.Fields("cedula")
precio = datos.Fields("precio")
End If
End If