Pasar Texto a Un reporte de Crystal - VB-MUNDO

JuniorTuPapa · #1 (**permalink**) 28-08-2005, 14:54:05

Saludos Amigos.

Tengo un reporte hecho en crystal reports 9.0 que es llamado desde una aplicación desarrollada en VB 6.0 con la BD en Acess 2003. Quisiera saber como hago para pasarle a un "Campo tipo Texto" del reporte un determinado valor que no está almacenado en ninguna tabla, sino por el contrario es un dato que se solicita antes de llamar al reporte.

Mil Gracias

albmartin · #2 (**permalink**) 29-08-2005, 06:23:28

Create una formula en blanco y antes de abrir el informe dale el valor. Usando el viewer tienes que hacer:

Código:

For Each crxFormulaField In rptReport.FormulaFields
     If crxFormulaField.Name = "{@" & Trim(strNombreFormula) & "}" Then
           crxFormulaField.Text = strDatoFormula
           Exit For
     End If
Next

Creo que te funcionará es que lo he retocado para tu caso.

Un saludo.

guarri1 · #3 (**permalink**) 31-08-2005, 15:48:29

por si te sirve de ayuda yo lo hago asi:

Lista.ReportFileName = PathReport + "lfm.rpt"
gCtrlImp = CompruebaSeleccion(Lista)
Lista.Formulas(0) = "fecini='" & FecIni.Text & "'"
Lista.Formulas(1) = "fecfin='" & FecFin.Text & "'"
Lista.Formulas(2) = "EXI=" & Str(Crisaldo)
Lista.Formulas(3) = "NomEmp='" & GNomEmp & "'"
result = Lista.PrintReport
MousePointer = vbDefault
If result <> 0 Then
MsgBox "Problemas en la generación del listado - " & result, vbCritical
End If

gCtrlImp es una funcion donde tengo toda la validacion del cristal
como ves solo es crear una formula en el report u con el mismo nombre que tenga alli le pasas el valor que tu quieras, fechas, saldos nombres. etc

epero te sirva de ayuda