mungkin yg ini
report10.ExportOpti ons.DestinationT ype = crEDTApplication
kayanya selain crEDTApplication ada yg lain deh pilihannya.
thanks,
dwiwanto.
________________________________
From: Suseno Seno <seno...@gmail.com>
To: Programmer-VB@yahoogroups.com
Sent: Fri, October 30, 2009 9:26:48 AM
Subject: [Programmer-VB] Export CR ke PDF ?
Teman semua, saya mau export laporan dr CR ke pdf, saya pakai coding ini,
sudah berhasil.
Tapi setiap habis proses export, pasti akan kebuka filenya.
Kl Cuma proses export sekali sih gak masalah, tapi kl saya proses export banyak
, maka file pdf yang kebuka juga banyak, akibatnya computer bisa hank.
Dari
code dibawah ini, apa yang perlu saya rubah ?
report10.DiscardSav edData
report10.Database. SetDataSource rs_data, 3, 1
report10.ExportOpti ons.ApplicationF ileName = App.Path & "\" &
Trim(xnama) + ".pdf"
report10.ExportOpti ons.DestinationT ype = crEDTApplication
report10.ExportOpti ons.DiskFileName = App.Path & "\" & Trim(xnama)
+ ".pdf"
report10.ExportOpti ons.PDFExportAll Pages = True
report10.ExportOpti ons.FormatType = crEFTPortableDocFor mat
report10.Export False
Makasih.
