Langkah Langkah Membuat Crystal Report
ok yang pertama kita lakukan adalah menambah item crystal report, cara nya adalah Menu Project > add new item > di menu common item pilih reporting > Crystal Report > beri nama file lalu klik add
Setelah itu nanti akan muncul seperti berikut:
pilih using the report wizard terus type standard lalu klik ok. setelah itu akan muncul :
nah abis itu pilih my connection > database nya > lalu kita pilih tabel saja yang di butuhkan untuk membuat laporan(lihat gambar). nah jika tidak ada pilih new connection untuk membuat koneksi baru
nah untuk link relantionship biasa nya terbuat otomatis, tapi kadang juga gk kalo tabel kita nya banyak foreign key. ok langsung next
pilih apa saja yang ingin di tampilkan di laporan setelah itu langsung finish ajah atau terserah mau di next field nya di grup by. ok setelah itu
nah di sini kita bisa melihat preview dari database , tinggal kita merapikan tampilan crystal report nya saja
Menampilkan Crystal Report Di Form
nah sekarang buat form baru dengan beberapa item berikut:
- 2 Radiobutton
- 1 TextBox
- 1 Button
- 1 CrystalReportViewer
*bagi yang CrystalReportViewer tidak ada ikuti langkan berikut: menu Project>properties > Compile>Advance Compile Option> target framework nya gan 4 aja
ok Setelah desain di buat langsung masuk ke coding
Public Class Fmenampilkancrystalreport
Private Sub Fmenampilkancrystalreport_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
CrystalReportViewer1.RefreshReport()
RadioButton1.Checked = True
End Sub
Private Sub Fmenampilkancrystalreport_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
CrystalReportViewer1.Height = Me.Height - CrystalReportViewer1.Top - 35
CrystalReportViewer1.Width = Me.Width - 20
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim laporan As New CrystalReport2 'ini nama report yang tadi dibuat
If RadioButton1.Checked = True Then
laporan.RecordSelectionFormula = ""
End If
If RadioButton2.Checked = True Then
laporan.RecordSelectionFormula = "{Header_teleselling.kdpetugas} ='" & TextBox1.Text & "' "
End If
With Me.CrystalReportViewer1
.ReportSource = laporan
.Refresh()
End With
End Sub
End Class
lihat versi Pastebin
Sekian tutorial Membuat Laporan Di VB.NET Dengan Crystal Report semoga mudah di mengerti
0 Komentar:
Posting Komentar