COMO BUSCAR REGISTRO EN UN FORMULARIO CON VARIOS CRITERIOS
Publicado por tommy (19 intervenciones) el 02/03/2018 01:08:02
Hola Estimados,
Voy a intentar explicar lo que estoy tratando de hacer, en un formulario tengo varios controles al primero lo llamo ctrlArticulo y al segundo ctrlFecha, en esos controles introduzco los datos que quiero filtrar, luego en un boton en el evento al hacer click tengo el codigo siguiente.
Private Sub Comando21_Click()
Dim miVar As String
miVar = "SELECT * FROM ARTICULOS WHERE ARTICULOS.DESC_ARTICULOS LIKE '*" & Me.ctrlArticulo & "*' AND ARTICULOS.FECHA_VENTA=#" & ctrlFecha & "#"
DoCmd.ApplyFilter miVar
End Sub
Cuando hago click en el boton no me da ningun error, el formulario se presenta filtrado y no me devuelve ningun dato, creo que el problema está en la parte del segundo criterio porque cuando hago la instruccion con el primer criterio ctrlArticulo me funciona asi miVar = "SELECT * FROM ARTICULOS WHERE ARTICULOS.DESC_ARTICULOS LIKE '*" & Me.ctrlArticulo & "*'
Les doy las gracias anticipadas!
Voy a intentar explicar lo que estoy tratando de hacer, en un formulario tengo varios controles al primero lo llamo ctrlArticulo y al segundo ctrlFecha, en esos controles introduzco los datos que quiero filtrar, luego en un boton en el evento al hacer click tengo el codigo siguiente.
Private Sub Comando21_Click()
Dim miVar As String
miVar = "SELECT * FROM ARTICULOS WHERE ARTICULOS.DESC_ARTICULOS LIKE '*" & Me.ctrlArticulo & "*' AND ARTICULOS.FECHA_VENTA=#" & ctrlFecha & "#"
DoCmd.ApplyFilter miVar
End Sub
Cuando hago click en el boton no me da ningun error, el formulario se presenta filtrado y no me devuelve ningun dato, creo que el problema está en la parte del segundo criterio porque cuando hago la instruccion con el primer criterio ctrlArticulo me funciona asi miVar = "SELECT * FROM ARTICULOS WHERE ARTICULOS.DESC_ARTICULOS LIKE '*" & Me.ctrlArticulo & "*'
Les doy las gracias anticipadas!
Valora esta pregunta


0