Salve a tutti. Con VB6, Ho sempre usato l'ogetto Datareport incluso, per generare qualsiasi report.
dovendo stavolta generare report più complessi, ho cominciato ad utilizzare Crystal 2008 Ver 12

Il problema fondamentale non stato aprire il report e passare e filtrare dati del db;

Dim crapp As New CRAXDRT.Application
Dim Report As CRAXDRT.Report
Set crapp = New CRAXDRT.Application

Set Report = crapp.OpenReport(App.Path & "\Reports\Bolla.rpt")


Frm_Crystal.Height = Screen.Height
Frm_Crystal.Width = Screen.Width
CRViewer1.Visible = True
CRViewer1.Height = Screen.Height - 525
CRViewer1.Width = Screen.Width - 1635
Left = (Screen.Width - Width) / 2 ' Centra il form orizzontalmente.
Top = (Screen.Height - Height) / 2 ' Centra il form verticalmente.

'filtro per
Report.RecordSelectionFormula = "{FAT_RIGHE.N_FAT} = 1"



ma più semplicemente passare dati tipo n_fattura , data o informazioni del cliente su una label di intestazione pagina del report crystal


Provato con:
Report.ParameterFields.GetItemByName("nomelabel_cr ystal").AddCurrentValue ("1")

o anche

Report.ParameterFields(1).AddCurrentValue("nomelab el_crystal").Text = "1"

ma nulla da fate


qualcuno sa indicarmi dove sbaglio??
Grazie per l'aiuto.
Marco
Ciao