12/08/2003, 11:55
|
 | | | Fecha de Ingreso: diciembre-2002 Ubicación: santiago-chilito
Mensajes: 1.931
Antigüedad: 21 años, 4 meses Puntos: 2 | |
| hola yo pase por el mismo problema , bueno es la falta de conocimiento " la mia por supuesto" yo uso el control data de ado , lo que tube que hacer es conectar una grilla asi filtraba los datos , en general es una busqueda mas rapida , porque no necesitas poner todo el nombre para buscar ,solo las letras y filtra despues automaticamente te lo pasa a un text que tengas("conectado tambien a la base de datos")..
bueno ahi te mando una busqueda sql , sin control :
general
Dim db As DAO.Database
Private RS As DAO.Recordset
boton:
Private Sub ACEPTAR()
'MsgBox Text14.Text
Dim SQL As String
Dim PASO As String
PASO = Text14.Text
SQL = "SELECT * FROM AUTOS WHERE PATENTE ='" & PASO & "'"
Set RS = db.OpenRecordset(SQL, dbOpenSnapshot)
If Not (RS.BOF And RS.EOF) Then
'MsgBox "registro encontrado"
CARGARCONTROLES
Else
MsgBox "NO ENCONTRADO"
End If
saludos ojala te sirva: |