Filtrar un datagriedview por fechas
Publicado por Andres (44 intervenciones) el 04/10/2019 02:37:34
Hola, tengo un formulario y en el mismo quiero que se muestre en un datagriedview datos filtrados entre dos fechas. El codigo funciona, pero me muestra todo lo que esta en la base de datos y yo quiero que muestre un rango de fecha (Ej: 01/09/2019 al 30/09/2019).
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub cmdbuscar_Click()
adobuscarfechalc.RecordSource = "select * from LibroCompras where Fecha between #" & fechadesde.Text & "# and #" & fechahasta.Text & "#"
Set GrillaReporteLibroCompras.DataSource = adobuscarfechalc
ReporteLibroCompras
End Sub
Private Sub Form_Load()
LibroCompras
adobuscarfechalc.CursorLocation = adUseClient
adobuscarfechalc.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\BaseControlClientes.mdb;Persist Security Info=False"
Set GrillaReporteLibroCompras.DataSource = adoayudacompras
ReporteLibroCompras
habilitarbotones True, False
End Sub
Valora esta pregunta
0