MEMBUAT LAPORAN DENGAN CRYSTAL REPOT DENGAN KONDISI TERTENTU VB.6

Ok, langsung saja trik kali ini, bagaimana membuat report menggunakan crystal report dengan vb6 berdasarkan kondisi tertentu.?

baiklah, saya anggap para AoC sudah mahir dalam pembuatan report melalui design crystal report, nah ini hanya sekedar trik untuk memfilter hanya kondisi2 tertentu saja yg di reportkan.

langsung saja ke intinya, disini saya membuat 2 kondisi yang ditampilkan dalam report.

yang pertama berdasarkan kode barang dan yang kedua berdasarkan tanggal.

1. Berdasarkan kode barang
   CrystalReport1.SelectionFormula = "{vbarang.kd_barang} ='" & txt_kd.text & "'"
   CrystalReport1.ReportFileName = App.Path & "\laporan\crlbm.rpt"
   CrystalReport1.RetrieveDataFiles
   CrystalReport1.Action = 0
   
2. Berdasarkan rentang tanggal (perhari/perminggu/perbulan/pertahun)
   CrystalReport1.SelectionFormula = "{vbarang_masuk.tanggal} in Date ('" & tglmulai.Value & "') to Date ('" & tglselesai.Value & "')"
   CrystalReport1.ReportFileName = App.Path & "\laporan\crlbm.rpt"
   CrystalReport1.RetrieveDataFiles
   CrystalReport1.Action = 0