I have a bit of code that exports 1 pdf, but was wondering if I could add another crystal report into a pdf file that I am currently creating. Or is there a better way to do it? Your help would be appreciated...
Dim crReportDocument As New ReportDocument()
Dim crExportOptions As New ExportOptions()
Dim crDiskFileDestinationOption As New DiskFileDestinationOptions()
Try
crReportDocument.Load(txtCrystalFilename.Text, OpenReportMethod.OpenReportByDefault)
crDiskFileDestinationOption.DiskFileName = txtPDFFilename.Text
crExportOptions = crReportDocument.ExportOptions
crExportOptions.DestinationOptions = crDiskFileDestinationOption
crExportOptions.ExportDestinationType = ExportDestinationType.DiskFile
crExportOptions.ExportFormatType = ExportFormatType.PortableDocFormat
crReportDocument.Export()
MessageBox.Show("complete!"
Catch ex As Exception
MessageBox.Show(ex.ToString)
Finally
crReportDocument = Nothing
crExportOptions = Nothing
crDiskFileDestinationOption = Nothing
End Try
Dim crReportDocument As New ReportDocument()
Dim crExportOptions As New ExportOptions()
Dim crDiskFileDestinationOption As New DiskFileDestinationOptions()
Try
crReportDocument.Load(txtCrystalFilename.Text, OpenReportMethod.OpenReportByDefault)
crDiskFileDestinationOption.DiskFileName = txtPDFFilename.Text
crExportOptions = crReportDocument.ExportOptions
crExportOptions.DestinationOptions = crDiskFileDestinationOption
crExportOptions.ExportDestinationType = ExportDestinationType.DiskFile
crExportOptions.ExportFormatType = ExportFormatType.PortableDocFormat
crReportDocument.Export()
MessageBox.Show("complete!"

Catch ex As Exception
MessageBox.Show(ex.ToString)
Finally
crReportDocument = Nothing
crExportOptions = Nothing
crDiskFileDestinationOption = Nothing
End Try