Visual Basic - COMO PUEDO HACER UNA BUSQUEDA EN VB CON ACCESS

Life is soft - evento anual de software empresarial
 
Vista:

COMO PUEDO HACER UNA BUSQUEDA EN VB CON ACCESS

Publicado por HECTOR NICOLAS (18 intervenciones) el 09/04/2001 22:55:23
HOLA A TODOS,
QUIERO SABER COMO HACER UNA BUSQUEDA, DONDE TENGO
UN CAMPO INTRODUSCA UN VALOR {ALFANUMERICO} Y
ME PRESENTE MAS DEBAJO EL DATO QUE ESTOY BUSCANDO,
YA SEA EN UN GRID O EN LO QUE SEA,

SI ME PUEDES AYUDAR CON ESTO TE LO AGRADESCO,

HASTA LUEGO,

HECTOR NICOLAS
DOMINICAN REPUBLIC
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:COMO PUEDO HACER UNA BUSQUEDA EN VB CON ACCESS

Publicado por Willam Claure (20 intervenciones) el 10/04/2001 00:12:12
Amigo Hector
Lo que tienes que hacer es definir una consulta de busqueda en Access

Y despues realizar una busqueda en VB que ejecute la consulta que definiste como parametro el alfanumerico.

Ahora si necesitas enviame un E-Mail y te envio algunos ejemplos como este mas o menos.

Esta rutina busca una ciudad.
Private Sub gbciucodi_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
buscar_gbciu
If existe Then
gboficodi.SetFocus
Else
gbciucodi = ""
gbciucodi.SetFocus
End If
End If
End Sub

Public Sub buscar_gbciu()
Set qdf_gbciu = db.QueryDefs("buscar_gbciu")
qdf_gbciu.Parameters!codi = Trim(gbciucodi)
Set rst_gbciu = qdf_gbciu.OpenRecordset()
qdf_gbciu.Close
If Not (rst_gbciu.BOF And rst_gbciu.EOF) Then
gbciudesc = rst_gbciu("gbciudesc")
existe = True
Else
existe = False
MsgBox "No existe ciudad", 48, "Verifique"
End If
End Sub




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:COMO PUEDO HACER UNA BUSQUEDA EN VB CON ACCESS

Publicado por Germán Agostini (18 intervenciones) el 12/04/2001 04:06:48
Hay dos metodos uno en utilizando el comando FINDFIRST del objeto RECORDSET de el datacontrol

ejemplo
data1.recordset.findfirst "numero = 1"

o bien realizar un filtro son uns tecnica SQL
ejemplo
data1.recordsource = "select * from tabla where numero = 1"
data1.refresh

si tenes dudas escribime a la casilla de correo
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