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!
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 de jeddy
1