Ciao Ragazzi,
devo creare un PDF di una fattura contemporaneamente alla visualizzazione del report, ma utilizzando il metodo ExportToDisk, mi salva un PDF con dei dati DEMO
non quelli che poi visualizzo nel CrystalReportViewer1 ...
Ecco il codice ...
codice:
Private Sub stampa_fattura_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Ricavo il path dove sta girando il programma
Dim path1 As String = My.Application.Info.DirectoryPath
'Carico il report
fattura2.Load(path1 & "\fattura.rpt")
'Carico il DB
fattura2.DataSourceConnections.Item(0).SetConnection("", path1 & "\Project_Pa.mdb", False)
'Setto l'accesso nell'archivio
Dim mySelectionFormula As String = "{Archivio.id_fattura} = " & crea_fattura.fattura.Text
'Accedo per id fattura
CrystalReportViewer1.SelectionFormula = mySelectionFormula
'CREAZIONE PDF a RUNTIME
fattura2.ExportToDisk(CrystalDecisions.Shared.ExportFormatType.PortableDocFormat, "C:\Users\Alessio\Desktop\Fattura.pdf") End Sub
Non so se sono stato chiaro ... grazie mille..