¿Como hacer una consulta para un rango de fechas? en vb.net con sql y Access
Publicado por Cristopher Alexis (12 intervenciones) el 11/12/2020 21:05:31
Hola buenas tardes amigos...
Escribo para pedir apoyo sobre un problema que se me presento recientemente, pues deseo llenar un Datagridview unos valores en un rango de fechas determinadas de la Fecha 1 a la Fecha 2.
el problema viene al momento de ejecutar la consulta sql con la base de datos access y encuentra valores de fechas parecidas por ejemplo yo busco de la fecha 23/11/2020 al 28/11/2020, pero me trae también datos de otras fechas parecidas pero de distinto mes como muestro a continuación:
me esta trayendo datos del 28/10/2020
este es el codigo que estoy empleando para la consulta SQL en access.
aquí se ejecuta la consulta y se llena en grid
tambien Probe con el Betwen pero me resulta lo mismo :(.
Aun no se mucho de sql, espero y me ayuden se los agradeceria muchisimo.
ya busque algunos metodos pero no encontre y no se me ocurre como :(.
espero su pronta ayuda de antemano muchas gracias :)
Escribo para pedir apoyo sobre un problema que se me presento recientemente, pues deseo llenar un Datagridview unos valores en un rango de fechas determinadas de la Fecha 1 a la Fecha 2.
el problema viene al momento de ejecutar la consulta sql con la base de datos access y encuentra valores de fechas parecidas por ejemplo yo busco de la fecha 23/11/2020 al 28/11/2020, pero me trae también datos de otras fechas parecidas pero de distinto mes como muestro a continuación:
me esta trayendo datos del 28/10/2020
este es el codigo que estoy empleando para la consulta SQL en access.
1
2
3
Dim sqlGeneralSemana As String = "SELECT [Fechas] as [Fecha],[CodigoBarra] as [Codigo de barra],[NumeroIN] as [Numero interno],Nombre,Puesto,[HoraEntada] as [Entrada]," _
& "[HoraSalidaComida] as [Salida a comer],[HoraEntradaComida] as [Entrada de comer],[HoraSalida] as [Salida],[HorasTotal] as [Horas trabajadas] FROM ConsultaEntradas2 " _
& "where Fechas >= '" & Format(txtFecha1.Value.Date.ToString, "short date") & "' and Fechas <= '" & Format(txtFecha2.Value.Date.ToString, "short date") & "'"
aquí se ejecuta la consulta y se llena en grid
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
filtros(TblConsultarHoras, sqlGeneralSemana)
Sub filtros(ByRef objeto As DataGridView, _
ByRef SQL As String)
Adaptador = New OleDbDataAdapter
Try
Adaptador.SelectCommand = New OleDbCommand(SQL, conexion_)
'Adaptador.Fill(tablaVR)
TablasBase = New DataSet
TablasBase.Tables.Add("TablaFilt")
Adaptador.Fill(TablasBase.Tables("TablaFilt"))
objeto.DataSource = TablasBase.Tables("TablaFilt")
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
tambien Probe con el Betwen pero me resulta lo mismo :(.
Aun no se mucho de sql, espero y me ayuden se los agradeceria muchisimo.
ya busque algunos metodos pero no encontre y no se me ocurre como :(.
espero su pronta ayuda de antemano muchas gracias :)
Valora esta pregunta
0