Informes con múltiples criterios (strwhere)

Saludos, tengo la siguiente pantalla:
https://doc-0s-8o-docs.googleusercontent.com/docs/secure/2pt8tjrcgaqi9qi4omu06286vmdl6bm6/4f0aklrird9ffojark56gdsp4ja9bhu5/1271980800000/03561922563139663008/03561922563139663008/0B08oET2GzzbFNWUyOWJlYzQtYzI3My00ZjU2LTk5N2YtYmEyYjBkNzAyNjA3?nonce=o9ref5elb1r1s&user=03561922563139663008&hash=93jvvn543bmqbv26ejjdro3up1vf0dvn
Necesito generar un informe que me indique según un periodo determinado en la siguiente pantalla los gastos correspondientes al técnico especificado:
https://doc-0k-8o-docs.googleusercontent.com/docs/secure/2pt8tjrcgaqi9qi4omu06286vmdl6bm6/rcgv4a136ega12udq4j8qhkreir47895/1271980800000/03561922563139663008/03561922563139663008/0B08oET2GzzbFMWYzODJjZTEtODU2OS00MDQwLTkzZmMtMjBhNTAyMjk4NDlm?nonce=ato0843vkr9p2&user=03561922563139663008&hash=vpt1cpqjcietpk0mh3lko0fen5bh5oav
Sin embargo, por más que intento no logro ver los datos entre las fechas especificadas, este el código que he probado. Ya no se me ocurre como resolverlo, estoy embotada :'(
Private Sub Comando1_Click()
 Dim strDocName, strWhere As String
 strDocName = "Factura"
 'SELECT * FROM Gastos WHERE Tecnico.IdTecnico = Forms!Tecnicos!IdTecnico AND Gastos.FechaGasto>= Me.Desde AND Gastos.FechaGasto<=Me.Hasta //Lo que debe mostrar
 strWhere = "[IdTecnico]=" & Forms!Tecnicos!IdTecnico '// Esto si funciona
 'strWhere = strWhere & " AND [fechagasto]>= " & [Desde] '//No funciona
 'strWhere = strWhere & " AND [fechagasto]<= " & [Hasta] '//No funciona
  'strWhere2 = [FechaGasto] >= " & Desde & " And [FechaGasto] <= " & Hasta &"
 'strWhere = "[IdTecnico]=" & Forms!Tecnicos!IdTecnico And "[fechagasto]>= " & [Desde] & " And [fechagasto]<= " & [Hasta]& //Lo primero q intente

 DoCmd.Close
 DoCmd.OpenReport strDocName, acPreview, , strWhere
End Sub

Espero que puedan ayudarme!

1 Respuesta

Respuesta
1
Te sugiero pruebes lo siguientes:
...
strWhere = strWhere & " AND [fechagasto]>= #" & format([Desde],"mm/dd/yyyy") & "#"
strWhere = strWhere & " AND [fechagasto]<= #" & format([Hasta] ,"mm/dd/yyyy") & "#"
...

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas