= | =
Friday, January 11, 2013

TUTORIAL PEMBUATAN LAPORAN DENGAN CRYSTAL REPORT V 8.5 BERDASARKAN GROUPING

TUTORIAL PEMBUATAN LAPORAN DENGAN CRYSTAL REPORT V 8.5 BERDASARKAN GROUPING

1.      Start -> All Program -> CRYSTAL REPORT TOOLS 

2.      Pilih using the report expert -> OK
3.      Klik database -> Next
4.      Pilih fine database file -> Add
5.      Cari letak penyimpanan database -> Pilih nama database yang dituju -> OPEN
6.      Pilih nama table atau Queery -> Add -> Close
7.      Maka akan tampil nama table / Queery yang dipilih -> Next
8.      Masukan nama field yang ingin dicetak denagn cara pilih “ Add ” untuk satu field dan
 “ Add All ” untuk semua field -> Next
9.      Karena akan menampilkan laporan sesuai dengan criteria maka masukan field sebagai kunci criteria, masukan ke dalam kotak Group by. Jika dalam pembuatan laporan ingin menampilkan semua data tanpa ada criteria tertentu maka dialog group ini abaikan saja, langsung pilih next
Untuk pembuatan lapotan ini saya masukan beberapa field sebagai criteria untuk menampilkan laporan
 
10.  Karena akan menampilkan laporan berdasarkan criteria maka yang tampil adalah dialog seperti diatas -> Next
11.  Klik Next
12.  Uncheck list pada “ Automatically Set Chart Option ”
13.  Klik Next
14.  Berikan judul laporan pada kolom “ Title ” dan pilih Style laporan -> Next
15.  Preview laporan
16.  Design laporan
17.  Simpan dalam folder penyimpanan satu file dengan ProjectVisual Basic
UNTUK MENAMPILKAN LAPORAN DENGAN VB MAKA BERIKUT TAHAPANNYA
1.      Buka project VB nya
2.      Tambahkan component Crystal Control
Pilih menu project -> Componen -> chectklist “ Crystal Report Control ”
3.      Buat Crystal control pada form dengan Name = CR
 Code program untuk menampilkan laporan pada VB dengan menmpilkan criteria berdasarkan         semester dan nim
Private Sub Command1_Click()
CR.Reset
CR.SelectionFormula = “ ({ Q_nilai.semester }) = ‘” & cmbsemester & ‘” and ({ Q_nilai.nim}) = “” & t_nim.Text & “’”
            CR.ReportFileName = App.Path & “\LAPORAN NILAI MAHASISWA.rPT”
            CR.WindowState = crptMaximized
            CR.RetrieveDataFiles
            CR.Action = 0
End Sub
 Code program untuk menampilkan laporan pada VB dengan menampilkan criteria  berdasarkan semester dan nim.
Private Sub Command1_Click()
CR.ReportFileName = App.Path & “\LAPORAN DATA MAHASISWA.rpt”
            CR.WindowState = crptMaximized
            CR.RetrieveDataFiles
            CR.Action = 1
End Sub
Setelah code program kita masukan,maka program sudah bisa di tes.

0 komentar:

Thank's All

Time is Money

Content Blog

Adsense Indonesia
TUKERAN LINK
dendymarfian.blogspot.com

Tukeran Link Yuk...!
Silahkan copy kode di atas...!

dendy blog's. Powered by Blogger.
SEO Stats powered by MyPagerank.Net