SoloCodigo

mi duda es como hago para que cuando quiera hacer un reporte de una determinda fecha, por ejemple  "15/diciembre/2004" al "25/12/2004" las introduzca y estas me generren un reporte entre estas dos fechas.

Sé que con los filtros se puede hacer una consulta de tipo numérico, pero con un solo filtro. lo que no se es como meter esta consulta en un solo filtro ya que utilizo dos opciones en un solo filtro, pero no me acepta las opciones AND OR >= ó <=

hice esta consulta y me sale de maravilla. pero lo que quiero es que el usuario cuando introduzca estas dos fechas le genere solo los movimientos que se hicieron entre estos rangos-

Dim Inempleado As Long
Inempleado = (Val(InputBox("Esciba la Clave del Empleado", "Clave del Empledo")))
If Inempleado = 0 Then
    MsgBox ("No Se Escribío Una Clave Valida")
    Exit Sub
Else
    emple.Todo_Grouping
    emple.rsTodo_Grouping.Requery
    If emple.rsTodo_Grouping.EOF = True Then
        MsgBox ("El Empleado No Existe")
        emple.rsTodo_Grouping.Close
        Exit Sub
    End If
    REPTRABAJOS.Refresh
    REPTRABAJOS.Show
End If

 
Si Alguien me podria ayudar, de antemano Mil Gracias

 emple es la conexion que estoy haciendo con labase de datos lo que pasa es que son varios reportes los que estoy manejando, unas veces solo los uso por las tablas que se hacen referencia pero me dijeron que los agrupara a traves del dataenvironment y las consultas que se hacen a traves de SQL no si la puede regresar como generalmente la regresa en una consulta normal.

de todos modos lo estoy tratando de hacer a traves de lo que es el generador de SQL del environment, si pudieras decirme de un manual e sentecias para realizar las consultas
gracias

ya entendí, gracias la consulta la logre de este modo desde el comando de la conexion del dataenvironment

select * from produccion where situacion=? and fecha>=? and fecha<=?
 desde las "intrucciones de SQL"

"emple" es el nombre que le puse al DATAENVIRONMENT
"RevTer" se llama mi conexion "revizar terminados"
"RevTer_Grouping" donde los agrupe para que me mostrara en el reporte

y dentro del del botón coloque lo siguiente  

Private Sub Terminados_Click()
Dim M, N As String
 
M = InputBox("DESDE LA FECHA:", "Introduzca la Fecha", "Día/Mes/Año")
If (Len(M) > 8) Or (Len(M) <= 6) Or Len(M) = 7 Or M = "" Then
MsgBox "       No es Una fecha valida" & Chr(13) & "El Formato es (Dia/Mes/Año)", 0 + 64
Exit Sub
End If

N = InputBox("HASTA LA FECHA DE:", "Introduzca la Fecha", DateTime.Date)
If (Len(N) > 8) Or (Len(N) <= 6) Or Len(N) = 7 Or N = "" Then
MsgBox "       No es Una fecha valida" & Chr(13) & "El Formato es (Dia/Mes/Año)", 0 + 64
Exit Sub
End If

 
emple.RevTer_Grouping "ENTREGADO", M, N
REPENTREGADO.Refresh
REPENTREGADO.Show
End Sub


Gracias por dedicale un tiempo, ahora solo me gustaria que le hicieras unas observaciones y si pudieras me digeras en que puedo mejorar el aspecto de la programacion. Muchas gracias

Salu2. Un comentario, en este caso supongo que ya no te compensa cambiar nada, pero lo recomendable para guardar fechas bajo mi punto de vista es un string guardado como AAAAMMDD, esto te ayudará mucho para posteriores consultas y rapidez.

Es solo una opinion .