29/05/2009, 16:31
|
| | | Fecha de Ingreso: noviembre-2008
Mensajes: 49
Antigüedad: 16 años, 5 meses Puntos: 0 | |
| consulta filtrar por fechas
Buenas tardes tengo un pequeño problema con una consulta en visual basic 6
he creado un datagrid con ado
y en un boton he metido esta consulta
pero al correrla no me encuentra ningun registro
talvez me pueden ayudar a corregirla
gracias
codigo:
Private Sub Command4_Click()
Dim FECHA As String
FECHA = InputBox("FECHA DE BUSQUEDA")
Adodc1.RecordSource = "select * from averias where fecha like '%" & FECHA & "%'"
Adodc1.Refresh
If Adodc1.Recordset.RecordCount = 0 Then
MsgBox ("no hay registro que coincida con su busqueda")
End If
End Sub |