Cara Membuat Laporan Harian Menggunakan Crystal Report 8.5 Dan Visual Basic 6.0 | Gho Blog's - Posting kali ini masih membahas disain laporan dengan Crystal Report 8.5. Kita akan membuat laporan harian berdasarkan pemilihan tanggal dari Visual Basic 6.0.
Disini saya tidak lagi menjelaskan langkah-langkah cara membuat disain report sedari awal, kita akan langsung masuk ke pembhasan utama saja. Jika sobat belum tahu cara mendisain report pertama kali, silakan sobat pelajari posting saya sebelumnya yang berjudul Cara Membuat Program Laporan Dengan Crystal Report 8.5 Dan Visual Basic 6.0.
Sekarang kita masuk ke pembahasan, disini saya memliki dua buah tabel yang terelasi seperti gambar berikut ini :
Berikut ini disain dari masing-masing tabel diatas :
Yang akan kita jadikan patokan sebagai seleksi data pada laporan harian adalah field "tgl_trans" yang terdapat pada tabel "transakasi".
Sebelumnya, entrikan dulu beberapa buah data baik di tabel barang maupun di tabel transaksi dan pastikan kode barang yang dientrikan ke tabel transaksi sama dengan kode barang yang ada di tabel barang agar data yang muncul di report nantinya lebih akurat. Pastikan sobat mengentrikan beberapa record dengan tanggal transaksi yang berbeda.
Sekarang, berdasarka kedua tabel diatas silakan sobat buat disain di Crystal Report, sehingga hasilnya seperti berikut ini :
Setelah itu, klik kanan field "tgl_trans" yang berada di disain, kemudian pilih Format Field :
Pilih Style : 01-March-1999 kemudian klik OK.
Terakhir, simpan disain laporan ini dengan nama "harian.rpt" dan letakkan dalam folder yang sama dengan database nya.
Sekarang kita beralih ke Visual Basic 6.0. Bukalah sebuah project dan buat disain form dengan 1 buah DTPicker, 1 buah Crystal Report Control dan 1 buah Command Button.
Jika pada toolsbox belum tersedia DTPicker dan Crystal Report Control, tekan tombol CTRL + T pada keyboard kemudian pilih dan checklist :
- Crystal Report Control
- Microsoft Windows Common Controls 2 6.0
Setelah semua component diletakkan di form, atur properties DTPicker nya seperti gambar berikut ini :
- Format : 3 - dtpCostum
- Costum Format : dd-MMMM-yyyy
Jika semua sudah dilakukan, sekarang kita msukkan codingnya, double klik pada Command Button dan masikkan coding berikut tepat diantara Private Sub Command1_Click() dengan End Sub :
Simpan project ini dan diletakkan dalam satu folder dengan database dan disain report tadi. Sekarang coba jalankan programmnya pilih tanggal sesuai dengan "tgl_trans" yang sudah dientrikan ke tabel transaksi sebelumnya.
Bagaimana...?, kalau masih bingung sobat bisa download contoh projectnya melalui link berikut ini :
Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!
Sekian dulu posting saya yang berjudul Cara Membuat Laporan Harian Menggunakan Crystal Report 8.5 Dan Visual Basic 6.0. Posting berikutnya kita akan membahas cara membuat laporan bulanan dengan crystal report 8.5 dan visual basic 6.0. Selamat mencoba dan semoga bermanfaat.
3 komentar :
min, ane mau tanya,
gmna ktika data yg di seleksi tidak ada, maka muncul peringatan "data tidak ada"
cz selama ini, ktika menggunakan crystal report mskpun data kosong, crytal report tetap mnampilkan data yg kosong, jd klo untuk org awam kan membingungkan min, bingungnya, ini data ngga ada, atau bermsalah, gitu min.
oy sxan tanya min klo seleksi berdasarkan 2 kriteria gmna.??
misal mau nyetak berdasarkan kelas & jurusan bgitu min??
saya pake vb6 denga dtbs mysql.
trimakasih min, dtunggu jwban scpatnya. terimkasih.
@Anonim: maaf telat mnanggapi pertanyaan nya...
perntanyan pertama mgn saya bantu logikanya saja,,,
pertama,, coding yg dibuat hrus membaca tabel terlebih dahlu,, jika tabel kosong,, munculkan message box pemberithuan lalu gunakan perintah exit sub agar tidak menakses report yg kosong,, jika tabel berisi,, bru eksekusi crystal reportnya...
pertnyaan ke 2,
pada reportformula nya gunakan parmeter "and" untuk melakukan perbandingan antra 2 kriteria data yg ingin diseleksi..
contoh :
CrystalReport1.SelectionFormula = "{namaTabel.field-1}= '" & Text1.Text & "' and {namaTabel.field-2}= '" & Text2.Text & "'"
semoga bs membantu...
bagaiman rumusnya kalo crystalreport mencetak langsung ke printer tapi halaman terakhir..???
Posting Komentar
Berhubung Makin Banyaknya Komentar Yang Tidak Mematuhi Peraturan, Maka Setiap Komentar Yang Masuk Akan Di Moderasi (Diterbitkan Atas Persetujuan) Oleh Admin Terlebih Dulu.
Aturan Berkomentar
1. Silakan Berkomentar Dengan Baik Dan Sopan.
2. Komentar Sesuai Topik Artikel
3. Mohon Untuk Tidak Mencantumkan Link Aktif Pada Komentar.
4. Mohon Untuk Tidak Promosi Produk Disini (Dianggap Spam).
5. Komentar Menggunakan Akun Personal (mis. Akun Google), Bukan Akun Nama Produk Barang (Dianggap Promosi) dan Nama yang Mengarah ke URL Tertentu (Dianggap Spam).
6. Bila Komentar Tidak Sesuai Aturan Diatas Maka Komentar Tidak Diterbitkan Dan Akan Saya Hapus.
Spam = Delete...!!
Promosi = Spam = Delete...!!
Komentar Yang Sesuai Aturan akan Diterbitkan Selambat-Lambatnya Dalam 1x24 Jam.
-->Untuk Pertanyaan Yang Dirasa Penting (Urgent) Silakan Contact Saya Melalui Email Pada Link Berikut Ini : Contact Us
<-- Thank's -->