Visual basic 6.0 membuat laporan (Preview) ~ EAS Article

Visual basic 6.0 Membuat laporan Data Barang
Componen = Cystal Report, Data Grid dan Adodc
Ikuti Langkah-langkahnya
-Buka Aplikasi Crystal Reports
-(Create a new cystal Report Documen) pilih => As Blank Report => OK

-(Data Explorer) Buka Folder => More data sources => OLE DB => Make new connection (Klik dua kali) Akan Masuk menu Data link properties
-Provider pilih Microsoft Jet 4.0 OLE DB Provider => Next
-Connection => Select or enter a database name (Pilih database yg ingin dibuat laporan misalnya dbbarang) => Test Connection => OK => OK

-Centang atau klik dua kali pada table yg ingin di buat laporan misalnya tbbarang => Close

-( Selamat desain Laporan )
-Klik Report => Report Expert => Yes
-(Masuk Ke Create Report Expert)

-Menu Data => Next>>
-Menu Fields => Add All => Next>>

-Menu Group => Next => Design Report
-( Selamat Desain laporan ) => Save dengan nama sesuai project misalnya = Lapbarang
Untuk penambahan Text, Garis dll Di menu Insert
Untuk special field = Insert => field object => special fields
--
Cara Koneksi
-Klik kanan Componen/tools Cystal report => Crystal properties
-Report file name pilih laporan yang sudah dibuat misalnya Lapbarang => Apply => Ok

-
"KODING"
Click button Preview
Private Sub Command2_Click()
CrystalReport1.ReportFileName = "D:\vblat2507\lapbarang.rpt" <= bisa dilihat di crystal properti
CrystalReport1.RetrieveDataFiles
CrystalReport1.WindowState = crptMaximized
CrystalReport1.ReportTitle = Reportbarang
CrystalReport1.WindowTitle = "Laporan Data Barang"
CrystalReport1.PrintReport
End Sub
-
Click button Print
Private Sub Command1_Click()
CrystalReport1.ReportFileName = "D:\vblat2507\lapbarang.rpt" <= bisa dilihat di crystal properti
CrystalReport1.RetrieveDataFiles
CrystalReport1.WindowState = crptMaximized
CrystalReport1.ReportTitle = Reportbarang
CrystalReport1.WindowTitle = "Laporan Data Barang"
CrystalReport1.PrinterSelect
End Sub
-
Desain Report

Preview Report

Selesai visual basic 6.0 membuat laporan.
Maaf apabila ada kesalahan dalam mengetik/langkah di blog ini.