Laporan Crystal Report Berdasarkan Input Tanggal di VB.Net 2008

Laporan Crystal Report Berdasarkan Input Tanggal di VB.Net 2008

Langsung saja, buat database SQL Server baru bernama testing dan buat tabel bernama beliObat, berikut penampakan tabelnya. (SQL Query dapat didownload bersama program di akhir postingan)

Buat project baru di VB.Net 2008 dan berinama laporan. Buat File Laporan baru dengan Crystal Report (Project - Add New Item - [Reporting] - Crystal Report) dan berinama myreport.rpt. Pada kotak dialog Crystal Report Gallery, pilih saja As a Blank Report.

Tampilkan Field Explorer (bila tidak muncul, panggil melalui menu Crystal Report - Field Explorer). Melalui Field Explorer klik kanan Database Fields dan pilih Database Expert, lalu pada Tree View pilih Create New Connection - OLE DB (ADO) lalu pilih Microsoft OLE DB Provider for SQL Server dan klik Next. Isikan konfigurasi di SQL Server anda dan pilih database testing, Klik Next dan Finish.

Akan tampil kotak dialog Database Expert, pada bagian Selected Tables isikan dengan table beliObat yang kita buat tadi dan klik OK. Lihat Gambar.

Kita perlu parameter tanggal awal dan tanggal akhir sebagai data input ke Crystal Report. Melalui Field Explorer, klik kanan Parameter Fields dan pilih New. Pada Parameter Field, isikan name dengan awal. Lihat Gambar.

Dengan cara yang sama buat parameter akhir.

Melalui Field Explorer, Klik tanda + pada Database Fields dan pindahkan field-field di tabel beliObat ke Form Laporan. Tampilan Form Laporan akan seperti berikut ini:

Untuk memasukkan parameter ke Crystal Report, klik kanan pada Form Laporan pilih selection Formula dan pilih Record dan ketikan syntax berikut:

 
 DateTimeValue({?awal}) <= DateTimeValue({beliObat.tgl_beli}) and DateTimeValue({beliObat.tgl_beli}) <= DateTimeValue({?akhir}) 
 

Lihat gambar untuk lebih jelas.

 

Buat Form baru (Windows Form) berinama Formlaporan dan drag CrystalReport Viewer di Toolbox ke Form tersebut. Pada properties CrystalReport Viewer, isikan ReportSource dengan report yang kita buat tadi dan pada Properties Form, ubah Windowstate menjadi Maximized.

Sekarang pindah ke Form1, Buat inputan tanggal awal dan tanggal akhir dengan DateTimePicker. Pada properties DateTimePicker, ganti Format menjadi Custom dan CustomFormat menjadi yyyy-MM-dd. Lihat Contoh seperti berikut ini.

Isikan kode berikut pada tombol CREATE. Kode berikut ini untuk mengirim inputan tanggal ke Form Laporan Crystal Report.

 
 Formlaporan.myreport1.SetParameterValue("awal", DateTimePicker1.Text) 
 Formlaporan.myreport1.SetParameterValue("akhir", DateTimePicker2.Text) 
 Formlaporan.Show() 
 

Link download ada dibawah dan jangan lupa untuk mengganti nama server SQL Servernya dengan nama server SQL Server di komputer / laptop anda.

Download Source Program