Crystal Report - Urgente! Por favor. Error en fórmula

Tengo la siguiente fórmula en mi programa:
Crystal1.Formulas(0) = "AEC= """ & Form0 & """" , donde Form0 es una variable string.

Cuando le doy la orden para que imprima con CR_Data.Action = 1 me da el error 20515: "Error en fórmula".

¿Qué puedo hacer para solucionarlo?

Muchas Gracias!!!

Hola,

El error que tienes es que escribes """ en lugar de "'", en lugar de abrir dobles comillas escribir doble comilla y cerrar dobles comillas debes abrir dobles comillas, escribir comilla simple y cerrar dobles comillas.
La sentencia correcta seria:

Crystal1.Formulas(0) = "AEC= '" & Form0 & "'"

Un Saludo
Joaquim Roca Vergés

Hola,

Te molesto otra vez porque he cambiado la fórmula como me indicaste, pero surge otro error el nº 20536: "Imposible conectar. Registro de parámetros incorrecto".

Podrías ayudarme con esto? Tengo que entregar la aplicación para una evaluación y la impresión de informes me está volviendo loca.

Muchas Gracias!!!

Ely
Buenos Aires - Argentina

Hola,
Es dificil localizar un tipo de error asi si no tienes los fuentes de la aplicacion y la base de datos delante, de entrada esto puede suceder si la información que le pasas para logonarte es incompleta o los parametros que envias no son los correctos.

Bueno, espero que se arregle, sino, insiste!!!!

Hasta pronto
Joaquim Roca Verges

Hola,

Sigo sin poder solucionar el error. Te mando el código fuente que utilizo:

Public Sub ReportePA()
Dim Form0 As String, Form1 As String, Form2 As String, Form3 As String, sqlPA As String
Dim Form4 As String, Form5 As String, Form6 As String, Form7 As String, Form8 As String

Form0 = frm_Datos.txt_DatosPA(0).Text
Form1 = frm_Datos.txt_DatosPA(1).Text
Form2 = frm_Datos.txt_DatosPA(2).Text
Form3 = frm_Datos.txt_DatosPA(3).Text
Form4 = frm_Datos.txt_DatosPA(4).Text
Form5 = frm_Datos.txt_DatosPA(5).Text
Form6 = frm_Datos.txt_DatosPA(6).Text
Form7 = frm_Datos.lbl_TitPA(1).Caption
Form8 = frm_Datos.lbl_DescPA.Caption
frm_Datos.CR_Data.Formulas(0) = "AEC= '" & Form0 & "'"
frm_Datos.CR_Data.Formulas(1) = "DIE= '" & Form1 & "'"
frm_Datos.CR_Data.Formulas(2) = "DII= '" & Form2 & "'"
frm_Datos.CR_Data.Formulas(3) = "DIEM= '" & Form3 & "'"
frm_Datos.CR_Data.Formulas(4) = "TE= '" & Form4 & "'"
frm_Datos.CR_Data.Formulas(5) = "RE= '" & Form5 & "'"
frm_Datos.CR_Data.Formulas(6) = "DE= '" & Form6 & "'"
frm_Datos.CR_Data.Formulas(7) = "PA= '" & Form7 & "'"
frm_Datos.CR_Data.Formulas(8) = "Desc= '" & Form8 & "'"
frm_Datos.CR_Data.Action = 1
Call Vacía_Formulas(frm_Datos.CR_Data, 8)
End Sub

Aclaración: los datos no los tomo de una base de datos sino de cuadros de texto y l

Hola,

Si quieres enviame los fuentes, la base de datos y el report y intentaremos arreglarlo.

Hasta pronto
Joaquim Roca Verges