Autor Tema: Re: Error en formula con fechas(dtpicker) (Leído 2318 veces)

ccortes · « **en:** Jueves 11 de Septiembre de 2003, 17:18 »

Tengo un reporte hecho en Crystal pero cuando utilizo esta opcion:
Reporte.SelectionFormula = "{Repordia.Fecha}='" & DTPicker1 & "' AND {Repordia.Fecha} ='"DTPicker2 "'"

Me da "error en la formula"

pense que era por el DTPicker, lo cambie por textbox y siempre paso lo mismo

Pero si utilizo otro campo que no sea de tipo fecha y lo comparo con numeros no hay.

Sera que el crystal report no acepta comparaciones con fecha que utilice los palitos 00/00/00

Como puedo solucionar mi problema?????????

J.M.Movilla

¿No tendrás que convertir los DTPicker así?:

"{Repordia.Fecha} >= DateValue(""" & DTPicker1 & """)" _
& " And {Repordia.Fecha} <= DateValue(""" & DTPicker2 & """)"

Los campos de tipo Date tienen sus perendengues y no tengo todavía bien aclarado cuándo hay que convertirlos y cuándo hay que tratarlos directamente...

Saludos y suerte.

ccortes

Lo hice pero tampoco funciono

luzbelito

Proba este codigo a mi me funciona

Private Sub CmdPrint_Click()
Dim sFecha1, sFecha2 As String

sFecha1 = CStr(DTPick1.Value)
sFecha2 = CStr(DTPick2.Value)

CrystalReport1.SelectionFormula = "{tblResumenHoras.Fecha} in date (" & "#" & sFecha1 & "#" & ") to date (" & "#" & sFecha2 & "#" & ")And {tblResumenHoras.Cod_Legajo}=" & "'" & DataCombo1.BoundText & "'"

CrystalReport1.SortFields(0) = "+{tblResumenHoras.Fecha}"

CrystalReport1.PrintReport
End Sub

un abrazo

cpmario

Me ha funcionado en SelectionFormula de Crystal la instrucción con siguiente formato: Date("yyyy,m,d")

CrystalReport.SelectionFormula = "{Fichas.FECHA}=Date(" & Format(DTPicker1, "yyyy,m,d") & ")"

ccortes

Gracias

cpmario eso si me ha servido