Setelah dapat melakukan form pengisian data, memperbaiki (editing data), dan menghapus dari tabel, selanjutnya adalah pencetakan data yang telah diinput ke media kertas maupun hanya untuk tampilan saja (preview). Untuk membuat sebuah file Report lakukan langkah-langkah sebagai berikut:
Membuat Koneksi ke Database
- Klik menu Project
- Klik sub menu More ActiveX Designers
- Klik Data Environment
- Selanjutnya, klik kanan pada Connection yang terdapat pda jendela Data Environment.
- Lalu klik Properties
Di dalam daftar pilihan, klik Microsoft Jet 3.51.OLE DB Provider
- Klik tombol […] pada bagian kotak Select or Enter Database Name;
- Lalu pilih database mahsiswa yang ada dalam folder latihan.
- Lanjutkan dengan menekan tombol Open
- Klik Tombol Test Connection di bagian kanan bawahnya, bila sukses maka akan muncul kotak dialog yang menyatakan Tes Konesi Berhasil / “Test Connection Succeded”
- Apabila tes koneksi telah berhasil, akhiri dengan menekan tombol OK pada jendela Data Link Properties, dan tampilan akan kembali ke jendela Environment.
Membuat Koneksi Ke Tabel
Setelah membuat koneksi ke database selanjutnya kita harus membuat koneksi ke dalam tabel mahasiswa, agar data-data dalam tabel tersebut dapat di akses menjadi sebuah laporan.
Langkah-langkah untuk membuat hubungan ke dalam tabel mahasiswa dapat dilakukan seperti petunjuk dibawah ini;
- Klik kanan Connection, lalu pilih Add Command
- Klik kanan Command1, lalu pilih menu Properties, maka akan muncul jendela Command1 dimana terdiri dari ; General, Properties, Relation, Grouping, Aggregates, Advanced. Untuk saat ini pilihan properties yang akan dicoba adalah General.
- Pada Properties General, terdapat kotak isian yang beris Command Name; isikan nama Command baru atau biarkan dalam keadaan default.
- Pada menu pilihan Connection terdapat combo box yang berisi pilihan konesi database, dimana daftar ini akan terisi sesuai dengan jumlah koneksi database yang telah kita buat sebelumnya. Apabila hanya mengisi satu koneksi database maka default akan bernilai Connection1.
- Berikutnya pada frame Source Data, terdapat isian
- Database Object pilih Tabel
- dan pada bagian Object Name pilih Mahasiswa
- Kemudian klik tombol OK
Setelah semua langkah diatas dilakukan maka tampilan jendela Environment akan memperlihatkan daftar field yang terdapat dalam tabel mahasiswa
Membuat Tampilan Laporan
- Klik menu Project
- Klik sub menu Add Data Report, dan form Data Report akan ditambahkan
- Drag object Command1 yang ada dalam jendela Data Environment ke bagian Detail (Section) yang ada pada jendela Data Report1.
Aturlah posisi control yang baru ditambahkan tadi.
- Klik pada RptLabel yang ada di ControlBox, lalu buat ke dalam bagian Report Header, kemudian rubah caption label tersebut dengan “Laporan Data Mahasiswa”
- Untuk merubah jenis huruf/font, pilih pada jendela properties font, kemudian akan muncul jendela dialog yang berisi pilihan jenis-jenis huruf serta format huruf.
- Ganti pula nilai Properties Alignment menjadi center.
- Pilih DataReport1, dan pada bagian control properties isikan untuk pengisian Data Source dengan DataEnvironment1
- dan isikan pada Data Member dengan Command1.
Membuat Form untuk mengakses Laporan/Report
Setelah langkah pembuatan tampilan laporan/Report selesai, berikutnya buatlah sebuah form yang berfungsi untuk memanggil report tersebut. Lakukan langkah-langkah berikut ini untuk melakukan pembuatan Form tersebut.
- tambahkan sebuah control Form, dan tambahkan dua buah control CommandButton
- aturlah properties dari setiap control tersebut seperti dalam tabel dibawah ini.
Control
|
Nama Control
|
Properties
|
Nilai Pengaturan
|
Form
|
Caption
|
Laporan Data Mahasiswa
| |
Border Style
|
3 – Fixed Dialog
| ||
StartUpPosition
|
2 – Center Screen
| ||
MaxLength
|
4
| ||
MaxLength
|
25
| ||
Command1
|
Caption
|
Ke Layar
| |
Command2
|
Caption
|
Ke Printer
|
Klik ganda pada tombol Command1 atau yang telah bertuliskan Ke Layar, lalu tambahkan kode program berikut ini;
Private Sub Command1_Click() DataReport1.Show End Sub
- kemudian isikan pula kode untuk Command2
Private Sub Command2_Click() DataReport1.PrintReport End Sub
- jalankan program ini dengan sebelumnya mengganti Sartup Object menjadi Form5 atau nama form yang anda isikan untuk form laporan ini.
Tidak ada komentar:
Posting Komentar