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 :
CrystalReport1.DiscardSavedData =
True
Private
Sub
cmdCetak_Click()
CrystalReport1.ReportFileName = App.Path +
"\databarang.rpt"
CrystalReport1.DiscardSavedData =
True
CrystalReport1.ReplaceSelectionFormula
"{pembayaran_calon.no}="
& Adodc3.Recordset!no
CrystalReport1.Destination = crptToWindow
CrystalReport1.WindowState = crptMaximized
CrystalReport1.Action = 1
End
Sub
- Sekarang report nya berjalan sebagaimana mestinya. Tiap ada data baru, langsung report nya me-refresh.
Tidak ada komentar:
Posting Komentar