Hal ini lebih dikarenakan rasa ingin mengupdate Crystal Report ku yang udah jadul, dari dulu masih aja pake yang 8.0
Coba install yang versi 10 dan ternyata lancar-lancar aja tanpa ada kendala tapi begitu coba di VB kok ada yang berubah pada bagian komponen crystal report-nya. Naik turunin scroll component window kok ga nemu yang namanya crystal report yang ada malah crystal report viewer. Ya udah akhirnya pake yang itu dan dicoba dengan kode yang biasanya dipake juga tapi hasilnya ga jalan. Kenapa ya??? Apa gara-gara nama Seagate sudah hilang dari crystal report jadi coding di VB dirubah??? Wah ekstrim banget perubahannya. Ah, ga tau lah dan akhirnya q putusin cari info sana-sini dan ga taunya semenjak versi 8.5 kodingnya memang sudah berubah, wekzz telat kali q ya :p dan memang semenjak itu juga nama Seagate hilang. Dan inilah caranya
- – -
Tambahkan komponen Crystal ActiveX Report Viewer Library 10.0
Project – Components – Crystal ActiveX Report Viewer Library 10.0
Tambahkan references Crystal Report ActiveX Designer Run Time Library 10.0
Project – References – Crystal Report ActiveX Designer Run Time Library 10.0
Masukkan komponen crystal report viewer ke dalam form
Ketikkan kode di bawah ini
- – -
Private Sub Form_Load()
Call LoadReport
End SubPrivate Sub LoadReport()
Dim Appl As New CRAXDRT.Application
Dim Report As New CRAXDRT.ReportSet Report = Appl.OpenReport(App.Path + “\report\stok.rpt”)
cr1.ReportSource = Report
cr1.ViewReportEnd Sub
Silahkan jikalau perintah LoadReport-nya ingin langsung ditaruh di form_load atau yang lainnya. Perintah app.path saya berikan karena kebiasaan saya menaruhnya dalam satu folder dan supaya lebih pendek kodenya tapi kalau ingin didefinisikan secara direktori langsung diganti aja.
Stok.rpt adalah nama file crystal reportnya dan cr1 adalah nama yang saya berikan kepada komponen crystal report viewer-nya.
Selesai ^^





kasifatussaja berkata,
September 15, 2008 @ 4:57 pm
Tolong kirimi aku solusi,
semua sudah lancar, tapi kok kedip saja nggak keluar laporannya.
padahal nggak error.
kosong nggak keluar apa-apa
kirim solusi ke safinatunnajah@gmail.com
tolong
liz berkata,
November 6, 2008 @ 8:54 am
mas klo mau nyari software crystal report 10 dimana ya yg free??
rahman berkata,
Maret 2, 2009 @ 5:22 am
mas tolong kasih tau coding buat menghubungkan vb ke seaget crstl reaprt dunk..
aku g tau…
tolong ya…
tolong kirim ke emailku aja…
raga_cool@yahoo.co.id
sxlagi tolong ya..
please………
^_^
dany sufwan berkata,
Maret 11, 2009 @ 5:39 pm
Mas klo mau refresh crystal reportnya pada waktu penambahan data di tabel, gimana? saya sudah pake code cr1.refresh tapi tetap nggak mau.
fullagi berkata,
Maret 12, 2009 @ 4:10 pm
coba di reload jng refresh bisa ga?? reload artinya memanggil ulang atau koneksinya diputus truz disambung lgi.
arvin berkata,
Mei 16, 2009 @ 6:24 am
ya tak coba dulu aja deh..dari hasil mencari kemana2 kembanyakan menggunakan versi 8 trus saya coba pake versi 10 kok berbeda dan ga sama. mungkin masukkannya bisa saya coba terlebih dahulu.tapi apakah setelah itu laporan yang dibuat dapat langsung dipanggil dari vb nya. thanks
bowo berkata,
Juni 11, 2009 @ 7:13 am
mas saya sudah coba koding anda terus waktu saya run di Dim Appl As New CRAXDRT.Application kok error napa ya mas.?
choky berkata,
Oktober 17, 2009 @ 9:46 am
tolong gimana solusinya biar cristal report 10 bisa jalan ndi ubuntu