Pregunta: | 3428 - PROBLEMA CON CRYSTAL REPORT 7 |
Autor: | Rafaela Mendivil |
Hola. Mi problema es que al mandar un parametro de fecha al crystal report 7, me marca error, no se si el formato para la fecha es diferente. Gracias |
Respuesta: | Adolfo Mujica Mota |
Hola. Para mandarle fechas al CR 7 desde Visual Basic, tienes que hacerlo de acuerdo a la sintaxis del Mismo crystal y no de la sintaxis de VB. Sistaxis de Crystal: Date(Año,Mes,Dia) Ejemplo 1: ´ Este ejemplo es para seleccionar los registros que cumplan con una fecha en especifico. dFecha1 = CDate(txtFecha1) ´ txtfecha valida dia1 = day(dFecha1) mes1 = month(dFecha1) año1 = Yaer(dFecha1) cr1.selectionformula = "{BDD.fecha} = Date(" & año1 & "," & mes1 & "," dia1 & ")" Ejemplo 2: ´ Y esta otra es para un rango de fechas dFechaIni = CDate(txtFecha1) dFechaFin = CDate(txtFecha2) ´ txtFecha1 y txtFecha2, que sean fechas validas diaIni = day(dFechaIni) mesIni = month(dFechaIni) añoIni = Yaer(dFechaIni) diaFin = day(dFechaFin) mesFin = month(dFechaFin) añoFin = Yaer(dFechaFin) cr1.selectionformula = "{BDD.fecha} in Date(" & añoIni & "," & mesIni & "," diaIni & ") to Date(" & añoFin & "," & mesFin & "," & diaIni & ")" ´ Espero que te ayude este pedazo de codigo. |