Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Rango de fechas

Estas en el tema de Rango de fechas en el foro de Visual Basic clásico en Foros del Web. Hola, Tengo un informe echo en Crystal Report y quiero que cuando yo pulse un boton (que tengo en un formulario de visual basic )me ...
  #1 (permalink)  
Antiguo 10/05/2010, 09:20
Avatar de Sergio18  
Fecha de Ingreso: abril-2010
Ubicación: No quieras saberlo
Mensajes: 94
Antigüedad: 14 años
Puntos: 0
Rango de fechas

Hola,

Tengo un informe echo en Crystal Report y quiero que cuando yo pulse un boton (que tengo en un formulario de visual basic )me salga los datos que tenga en un cierto rango de fechas

He echo esto pero no hace nada:

Código vb:
Ver original
  1. CrystalReport1.DataFiles(0) = App.Path & "\prueba.mdb"
  2. CrystalReport1.ReportFileName = App.Path & "\PagosyDevoluciones.rpt"
  3. CrystalReport1.SelectionFormula = "{PagosDevoluciones.Fecha}>=date(" & 28 / 4 / 2010 & ")" & _
  4. " AND {PagosDevoluciones.Fecha} <= date(" & 4 / 5 / 2010 & ")" & ""
  5. CrystalReport1.PrintReport

Saludos y Gracias
  #2 (permalink)  
Antiguo 10/05/2010, 10:10
Avatar de erbuson  
Fecha de Ingreso: noviembre-2009
Mensajes: 701
Antigüedad: 14 años, 5 meses
Puntos: 53
Respuesta: Rango de fechas

Hola: De Cristal Reports ni idea, pero de chapuzas un rato largo:

He copiado tu sentencia y he hecho lo siguiente:
MsgBox "{PagosDevoluciones.Fecha}>=date(" & 28 / 4 / 2010 & ")" & " AND {PagosDevoluciones.Fecha} <= date(" & 4 / 5 / 2010 & ")" & ""

De este modo me muestra una chorrada, pero

De este otro
MsgBox "{PagosDevoluciones.Fecha}>=date(" & DateSerial(2010, 4, 28) & ")" & " AND {PagosDevoluciones.Fecha} <= date(" & DateSerial(2010, 5, 4) & ")" & ""

Creo que puede tener sentido

Puede ser que cuando le indica 28/4/2010 VB efectue una triple división o vete tu a saber.

Si quieres inténtalo y ya me cuentas. Tal vez lo importante es la idea y si no es así consigas tu adecuarlo.

Saludos
__________________
Agradecer a quien te enseñó, es enseñar lo que de él aprendiste.
Recuerda: Decir gracias, poco cuesta y mucho vale ...
  #3 (permalink)  
Antiguo 11/05/2010, 01:11
Avatar de Sergio18  
Fecha de Ingreso: abril-2010
Ubicación: No quieras saberlo
Mensajes: 94
Antigüedad: 14 años
Puntos: 0
Respuesta: Rango de fechas

Hola erbuson gracias por contestar, la sentencia que me has enviado no me ha servido, la he estado probando cambiando cosas, pero no hace nada es como si el boton estuviera sin datos, sobre el crystal report, yo acabo de empezar a utilizarlo, asi que no te creas que se mucho.

Saludos, voy a googlear un poco mas
  #4 (permalink)  
Antiguo 11/05/2010, 02:04
Avatar de Sergio18  
Fecha de Ingreso: abril-2010
Ubicación: No quieras saberlo
Mensajes: 94
Antigüedad: 14 años
Puntos: 0
Respuesta: Rango de fechas

Ok ya lo he terminado dejor el codigo:

En un principio iba ha hacer esto:
Código vb:
Ver original
  1. "{Pagosdevoluciones.fecha} in date(" & 2010 , 4 , 28 & ") to date (" & 2010 , 5 ,4 & ")" & " "

he probado el separla y funciono.

Código vb:
Ver original
  1. "{Pagosdevoluciones.fecha} in date(" & 2010 & "," & 4 & "," & 28 & ") to date (" & 2010 & "," & 5 & "," & 4 & ")" & " "

PD: El Rango de Fechas tiene que ser de Año,Mes,Dia porque si no, no funciona

Saludos

Última edición por Sergio18; 11/05/2010 a las 02:10

Etiquetas: fechas, rango
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 20:54.