Busqueda con adodc en visual

[Avellaneda]

Iniciado por ivandgc

Buenas tengo una base de datos sql server 2000 conectada con visual basic 6.0 nesecito realizar una busquedad de un registro desde un textbox y que el resultado me llene los restantes textbox, gracias por sus respuestas.

saludos.
Ivan Gonzalez

Buenas, un ejemplo podría ser este

Código:

  With Adodc1.Recordset
    .MoveFirst
    .Find "Cliente = '" & Text1.Text & "'"
    If .EOF Then
        MsgBox "no encontrado"
    Else
        Text2.Text = ("Nombre")
        Text3.Text = ("Direccion")
        ' ....
    End If
End With

Nota: si el campo 'Cliente' es numérico, le quitas las comillas simples:
.Find "Cliente = " & Text1.Text