[Programmer-VB] Export CR ke PDF ?

[Suseno Seno]

            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.DiscardSavedData

            report10.Database.SetDataSource rs_data, 3, 1

            report10.ExportOptions.ApplicationFileName = App.Path & "\" &
Trim(xnama) + ".pdf"

            report10.ExportOptions.DestinationType = crEDTApplication

            report10.ExportOptions.DiskFileName = App.Path & "\" &
Trim(xnama) + ".pdf"

            report10.ExportOptions.PDFExportAllPages = True

            report10.ExportOptions.FormatType = crEFTPortableDocFormat

            report10.Export False

 

 

          Makasih.