Visual Basic - Boton buscar en vb6

Life is soft - evento anual de software empresarial
   
Vista:

Boton buscar en vb6

Publicado por Edgar Ediardo Vazquez Díaz (1 intervención) el 28/10/2007 21:36:12
Hola, tengo este codigo que funciona perfectamente buscando los datos que estan dentro del campo "nombre" que es de tipo caracter en una tabla que ise en acces. Lo que quiero aser es modificar el codigo para que me muestre los datos pero pidiendo el codigo llamando al campo "codigo" el cual es de tipo entero largo. Ise algunas modificaciones pero no me funcionan. EL codigo tal cual es para buscar por nombre es este:

Private Sub Buscar_Click()

Dim Buscando As String, Criterio As String
Buscando = InputBox("¿Que nombre quieres buscar?")
If Buscando = " " Then Exit Sub

Criterio = "nombre_estudiante like '*" & Buscando & "*'"

Adodc1.Recordset.MoveNext

If Not Adodc1.Recordset.EOF Then
Adodc1.Recordset.Find Criterio

End If
If Adodc1.Recordset.EOF Then
Adodc1.Recordset.MoveFirst
Adodc1.Recordset.Find Criterio
If Adodc1.Recordset.EOF Then
Adodc1.Recordset.MoveLast
MsgBox ("No encuentro ese nombre")
End If
End If

Por favor ayudenme para poder buscar pidiendo el codigo.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Boton buscar en vb6

Publicado por ivan (1041 intervenciones) el 28/10/2007 22:25:54
Mira que he leido ( y contestado ) burradas en este foro. punto

pero es que esta ya se pasa

saludos y suerte!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Boton buscar en vb6

Publicado por Pedro Luis (878 intervenciones) el 29/10/2007 13:23:49
El Like es para encontrar algo parecido como "mien" en "Comiendo", pero los numéricos solo pueden ser "=", ">" o "<", cambia el Like por igual y a lo mejor encuentras algo, y por supuesto quita las comillas de Buscando.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar