Dan akhirnya setelah Googling, cara berikut saya coba, dan berhasil.
- Buka Crystal Report, masuk ke File > Option > Reporting > uncheck ‘Save Data With Report‘ > OK.
- Sekarang tambahkan perintah berikut di Visual Basic nya. simpan di bagian button untuk mencetak, contoh nya seperti berikut :
1CrystalReport1.DiscardSavedData =True
1PrivateSubcmdCetak_Click()2CrystalReport1.ReportFileName = App.Path +"\lapCalonBayar.rpt"3CrystalReport1.DiscardSavedData =True4CrystalReport1.ReplaceSelectionFormula"{pembayaran_calon.no}="& Adodc3.Recordset!no5CrystalReport1.Destination = crptToWindow6CrystalReport1.WindowState = crptMaximized7CrystalReport1.Action = 18EndSub - Sekarang report nya berjalan sebagaimana mestinya. Tiap ada data baru, langsung report nya me-refresh.
No comments:
Post a Comment