Programación General > Visual Basic 6.0 e inferiores

 Re: Error en formula con fechas(dtpicker)

(1/2) > >>

ccortes:
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") & ")"


:)

Navegación

[0] Índice de Mensajes

[#] Página Siguiente