Dear Mr. Lai Min Feng
Terima kasih yaa.. atas info nyya...
sekarang udah bisa nih...
Thanks sekali lagi....



----- Original Message ----
From: Lai Min Feng <[EMAIL PROTECTED]>
To: [email protected]
Sent: Wednesday, May 23, 2007 2:17:41 PM
Subject: RE: [Programmer-VB] error convert crystal reports ke pdf

kira2 kalu saya biasanya untuk crystal report, akan distribusikan file2 ini :
 
craxddrt.dll
craxdrt.dll
crtslv.dll
crviewer.dll
crxf_pdf.dll
crxf_rtf.dll
u2dapp.dll
u2ddisk.dll
u2dmapi.dll
u2dnotes.dll
u2dpost.dll
u2fhtml.dll
u2ftext.dll
u2fwks.dll
u2fwordw.dll
u2fxls.dll
u2fxml.dll
============ ========= ==
http://www.fire888. com 
-----Original Message-----
From: Programmer-VB@ yahoogroups. com [mailto:Programmer- [EMAIL PROTECTED] 
com]On Behalf Of wan_16320
Sent: Wednesday, May 23, 2007 11:22 AM
To: Programmer-VB@ yahoogroups. com
Subject: [Programmer- VB] error convert crystal reports ke pdf


Dear Guys,
I need your help nih,
Saya sudah selesai buat program convert laporan crystal report ke PDF, 
Sewaktu sya buat setup-an buat user, Vb package nya error, sehingga saya 
install manual dengan meng-copy file DLL dan OCX ke windows\system32
Masalahnya saya sedang bingung file apa saja yang dibutuhkan sewaktu untuk 
konvert crystal reports ke PDF tsb, karena sewaktu program dijalankan ada error
"Missing old of date DLL".
Kalau saya lihat di "preferences" , maka object yang dipakai :
-crystal reports viewer control
-crystal reports 8.5 ActiveX Designer Design and Runtime Library
-crystal reports 8.5 ActiveX Designer Run Time Library
-crystal reports 8.5 Library

Saya tampilkan script programmnya, please help

       Dim crx As New CRAXDRT.Application
    

        Set report1 = crx.OpenReport( App.Path & "\Debit Note.rpt", 1)
        Crt.DataFiles( 0) = App.Path & "\LocDB.mdb"
        report1.DiscardSave dData
        report1.ExportOptio ns.FormatType = crEFTPortableDocFor mat
        report1.ExportOptio ns.DestinationTy pe = crEDTDiskFile
        report1.ExportOptio ns.DiskFileName = App.Path & "\Invoice\" & 
TxtBL.Text & ".pdf"
        report1.Export False
        MousePointer = vbHourglass

Thanks

Rgds/ Ridwan




Got a little couch potato? 
Check out fun summer activities for kids. 



       
____________________________________________________________________________________Boardwalk
 for $500? In 2007? Ha! Play Monopoly Here and Now (it's updated for today's 
economy) at Yahoo! Games.
http://get.games.yahoo.com/proddesc?gamekey=monopolyherenow  

Kirim email ke