Convert Crystal Report ke PDF

untuk mengkonver cr ke pdf yang pertama kita lakukan adalah menambahkan reference Crystal Reports ActiveX Designer Runtime Library CRAXDRT di visual basic6

crystal report yang digunakan adalah crystal report 9

berikut adalah kodenya.


'============================================================
'Deklarasikan terlebih dahulu di Form atau di Modul
Dim crxApp As New CRAXDRT.Application
Dim Report As CRAXDRT.Report
Dim crxExport As CRAXDRT.ExportOptions

'kode untuk membuka CR dan mengkonvert ke pdf
Set Report = crxApp.OpenReport(”\.rpt”, 1)
Set crxExport = Report.ExportOptions
crxExport.formatType = crEFTPortableDocFormat
crxExport.DestinationType = crEDTDiskFile
crxExport.DiskFileName = “\.pdf”
Report.Export False
Set crxExport = Nothing
Set Report = Nothing '———————————————————————————-

apabila ada kesalahan dalam kode atau terjadi debug-debug langsung za hub saya di d_triady@yahoo.com atau kasih comment.