Postingan kali ini masih tentang membuat laporan dengan Crystal Report yang datanya ditentukan berdasarkan tanggal yang diinput.
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
Baca juga di blog ini :
Anda ingin dapat uang dengan hanya menjawab survey..?
makasih tutornya gan,kebetulan lgi puyeng di laporan:)
paswwor ma username nya apa nih?
kerennnn bgd, mga mnjadi berkah. aq udh lama bgd nyri tutorial tntang ne. mksih bgd y :)
Sempurna!!!! THANKS
Tinggal dimodifikasi dikit jadi deh seperti yang kita inginkan.
Mas kalau databasenya Mysql gimana y koq ga bisa?
mantap informasinya..bermanfaat buat newbi kayak ane..:)
sip dech
Source Programnya kagak bisa di download gan?
MANTAPPPPPPPPPPPPPPPPPPP (Y)
mantap gan tutorialnya numpang sedooot
admin, mau tanya koq aplikasi laporan dengan parameter ini kalau di akses di komputer lain tidak bisa muncul reportnya ya? malah muncul minta logon database terus tapi setelah di masukan user dan pass nya,gagal terus..mohon pencerahannya ya.tks
Alhamdulillah,
Saya sudah berhasil mengikuti perintah mu sob...
Semoga ilmu ini yang anda berikan ini, membawa berkah... dan sukses dunia dan akhirat. Aamiin.
Terima kasih :)
gan saya mau tanya knpa ga langsung keluar reportnya ya.. tapi pas disimpan keluar yg form enter parameter values
padahal udh sesuai yg agan contohkan
MsgBox("Data Berhasil Disimpan")
FrmCetakPenjualan.CryStrukPenjualan1.SetParameterValue("NoTransaksi", TxtNobukti.Text)
FrmCetakPenjualan.CrystalReportViewer1.RefreshReport()
FrmCetakPenjualan.Show()
thanks gan , sangat membantu.
saya jg gan masih eror mengikuti coding agan