Passar Valores de Variável para CR

[mssacramento]

Olá a Todos:

Estou agora a dar os primeiros passos no CR e apesar de já ter lido alguns posts no fórum não consegui descobrir identico problema ao meu,daí que pedia a vossa ajuda,na qual desde já agradeço.

Gostaria de passar através do VB valores de uma variável para o crystal reports como o código demonstra:

Dim Report As New CRAXDRT.Application
Dim Rpt As CRAXDRT.Report
Dim formula As CRAXDRT.FormulaFieldDefinition


stringA = "January"

Set Report = New CRAXDRT.Application
Set Rpt = Report.OpenReport("D:\Projectos VB\NORWIN\Norwin\decl.iva.rpt")

Rpt.FormulaFields.Item(1).Text = ["stringA"]

O VB retorna erro na última linha do código

1) - A syntax está correcta?

2) - Tenho que declarar a variável?

Obrigado

[kuroi]

você quer passar pra um campo formula?? se for, tente assim:

Rpt.FormulaFields.Item(1).Text = stringA

ou simplesmente:

Rpt.FormulaFields.Item(1).Text = "January"

mas acho q o melhor seria você criar um campo parametro no .rpt. ai você passa assim:

Rpt.ParameterFields(1).AddCurrentValue (stringA)

[mssacramento]

Olá Kuroi:

De facto com o Parameterfields funciona muito bem e já passa os valores da StringA para o Report... :rolleyes:

No entanto em relação ao que eu tinha apresentado e á forma como sugeriu relativo a:

Rpt.FormulaFields.Item(1).Text = stringA

não funciona...posivelmente deve faltar caracteres(parenteses,aspas...não sei) uma fez que o VB retorna erro..

Atenção que se for directo tem que ser assim:

Rpt.FormulaFields.Item(1).Text = "'January'"

e não assim:

Rpt.FormulaFields.Item(1).Text = "January"

a diferença são os apóstrofes.

Obrigado

Editado Março 1, 2008 por mssacramento

[kuroi]

é mesmo, pro campo formula entender q era uma string, as aspas tem q ir junto.