Cita:
Iniciado por APENA01 
estoy haciendo una busqueda con find
pero creo que me estoy equivocando en la sintaxis
talvez me pueden ayudar
porque me devuelve el nombre del campo no lo que contiene el campo
Private Sub Command1_Click()
With Adodc1.Recordset
.MoveFirst
.Find "Cliente = '" & txtCLIENTE.Text & "'"
If .EOF Then
MsgBox "no encontrado"
Else
txtORDEN.Text = ("ORDEN")
txtFECHA.Text = ("Direccion")
txtDESCRIPCIONDETRABAJO.Text = ("DESCRIPCIONDETRABAJO")
Combo2.Text = ("CONTRATA")
Combo1.Text = ("TECNICO")
txtLIQ.Text = ("LIQ")
txtRECIBEINSTALACION.Text = ("RECIBEINSTALACION")
End If
End With
End Sub
Tienes que indicar la propiedad Fields del recordset:
txtORDEN.Text = .Fields("ORDEN")
txtFECHA.Text = .Fields("Direccion")
...
