Novato pide ayuda para Busquedas en BD de access

[pepebuitron]

Hola amigos, soy novato pero con ganas de aprender.

Tengo una base de datos de access, la abro bien con VB 6, uso el control "DATA" y corre bonito el programa que es una agenda.

Deseo hacer búsquedas y las hace muy bien siempre y cuando busque por el Campo ID pero si lo quiero hacer por apellido "Me he matado buscando y no entiendo porque no puedo".

Pego mi código por si alguno me desea ayudar de favor.

Private Sub BuscarPorId_Click()
On Error Resume Next
Dim nReg As Long
nReg = InputBox("Ingresar el Número de Control Interno", "")
Agenda.Recordset.FindFirst "IdContacto = " & nReg
If Text1.Text = nReg Then
Else
MsgBox ("REGISTRO NO ENCONTRADO")
End If

End Sub

Cuando hago la búsqueda por apellido cambio el valor de la variable por String y desde luego el campo que se llama en mi caso ApellidoPaterno.

"HELP ME PLEASE"

[Insomnia]

Hola

Para realizar búsquedas yo me he acostumbrado a utilizar sentencias SQL, además, te recomendaría sustituir la el control DATA por el ADODC que en realidad es pasar de la tecnología DAO (obsoleta) a ADO (no tan obsoleta si hablamos de VB6, claro).

Respecto a tu consulta creo que te falta meter las comillas simples porque es un campo de texto, los campos numericos van sin nada, los de texto entre comillas simples y las fechas entre almohadillas

Código:

Agenda.Recordset.FindFirst "ApellidoPaterno= '" & nReg & "'"

Fíjate que incluyo la comillas simples

--Saludos--

[pepebuitron]

Iniciado por Insomnia

Respecto a tu consulta creo que te falta meter las comillas simples porque es un campo de texto, los campos numericos van sin nada, los de texto entre comillas simples y las fechas entre almohadillas

Código:

Agenda.Recordset.FindFirst "ApellidoPaterno= '" & nReg & "'"

Fíjate que incluyo la comillas simples

--Saludos--

Muchas gracias amigo, ya solo me falta meterle maquillaje y unos polvos en la nariz.
Definitivamente era eso de las comillas pues las puse y a la primera funcionó perfectamente bien.

No sé si abusando de tu ayuda, me quieras mandar algunos códigos de rutina que uses para seguir aprendiendo un poco mas.
Mi correo es [email protected]

Muchas gracias nuevamente