Halo bung Ridwan, saya coba bantu pemikiran ya...
Biasanya saya selalu membuat/menggunakan 2 Koneksi di program yang saya
buat, pertama koneksi menggunakan OLEDB untuk keperluan pembacaan database
di program dan kedua, koneksi ODBC untuk menampilkan report-reportnya.
Setiap program yang saya buat selalu ada form Konfigurasi, form ini
berfungsi untuk mensetting beberapa parameter program termasuk lokasi
database. Setiap membuaka program saya selalu membaca lokasi database, jika
berubah/database tidak ditemukan maka akan muncul peringatan dan form
Konfigurasi dimunculkan untuk mensetting ulang lokasi database. Ketika
lokasi database sudah ditentukan, maka saya update lokasi database di
settingan ODBCnya via kode vb. alhasil setiap berubah lokasi
program/database selama ini tidak ada masalah.
Karena koneksi laporan (CR) melalui ODBC, maka saya tidak perlu menggunakan
CR.DataFiles(0)=..., dan saya juga selalu mensetting DiscardSavedData = True
sebelum menampilkan laporan. Dan satu lagi saat saya mendesain report di IDE
crystal report saya selalu menghilangkan fasilitas 'Save data with report'
di di menu File-nya CR.
Untuk export ke PDF, pastikan juga di komputer client sudah ada file-file
yang dibutuhkan, kalau tidak salah beberapa hari yang lalu sudah dibahas
mengenai export ke PDF dan sudah solve.
CMIIW
On 06/06/07, wan_16320 <[EMAIL PROTECTED]> wrote:
Dear All,
Saya butuh bantuan lagi nih,
masih mengenai export Crystal Report ke PDF
Saat ini File RPT Selalu saja tidak me-reflek ke Database nya
sehingga sewaktu diconvert ke PDF data selalu Kosong, karena bila saya
pindahkan
program, Database dan file Rpt ke Direktori lain, file RPT selalu error
bila dibuka di crystal report dengan message bahwa database ada, sehingga
harus di "Link" kembali.
Mohon dicek script untuk Crystal Report agar selalu me-reflect ke
Database-nya
Saya mempunyai script seperti dibawah ini.
Thanks atas bantuannya
Rgds/ Ridwan
*Dim crx As New CRAXDRT.Application
Set report1 = crx.OpenReport(App.Path & "\Report.rpt", 1)
Crt.DataFiles(0) = App.Path & "\LocDB.mdb"
report1.DiscardSavedData
report1.ExportOptions.FormatType = crEFTPortableDocFormat
report1.ExportOptions.DestinationType = crEDTDiskFile
report1.ExportOptions.DiskFileName = app.path & "\Report.pdf"
report1.Export False
*
------------------------------
Finding fabulous fares is fun.
Let Yahoo! FareChase search your favorite travel
sites<http://farechase.yahoo.com/promo-generic-14795097;_ylc=X3oDMTFtNW45amVpBF9TAzk3NDA3NTg5BF9zAzI3MTk0ODEEcG9zAzEEc2VjA21haWx0YWdsaW5lBHNsawNxMS0wNw--%0A>to
find flight and hotel bargains.
--
Best Regard,
[zZzz]
