menampilkan informasi mengenai pengguna yang ada di Toko Klontong Bontot
Yogyakarta. Data pengguna ini yang akan menentukan hak akses ke dalam
program aplikasi, baik itu sebagai Admin maupun Kasir. Untuk lebih jelasnya,
ikutilah langkahnya berikut ini:
1. Klik kanan menu mmarketdbàAdd Command.
2. Masuk pada halaman Command1 Properties dengan cara klik kanan
Command1 àProperties.
3. Dari jendela Command1 Properties, pilih opsi SQL Statement, kemudian
ketikkan kode program berikut:
SELECT * FROM Pengguna ORDER BY UserId
4. Ubahlah nama “Command1” menjadi “rsPengguna” pada kolom Command
Name. Berikut tampilannya:
Gambar 4.62 Menambahkan Perintah SQL Laporan Seluruh Pengguna
5. Klik tombol Apply, lalu klik tombol OK.
6. Tambahkan objek Data Report dari menu Project àAdd Data Report.
7. Lakukan drag and drop pada Recordset rsPengguna ke dalam area Detail
(Section1) pada Data Report. Modifikasilah halaman laporan tersebut sesuai
dengan keinginan Anda dengan menggunakan objek di dalam menu Toolbox.
Berikut tampilannya:
Lanjutan : Membuat Laporan Data dan Transaksi Mini Market 107
Gambar 4.63 Hasil Desain Laporan Seluruh Pengguna
8. Setelah selesai memodifikasi tampilan laporan, maka aturlah halaman
DataReport1 menggunakan tabel pengaturan berikut ini:
9. Masuklah pada halaman kode. Caranya, klik menu View àCode.
10. Untuk me-refresh laporan ketika proses penambahan data melalui program
master data pengguna, maka ketikkan kode program berikut:
Private Sub DataReport_Terminate()
rptLapPengguna.Refresh
Membuat Aplikasi Penjualan Retail (Mini Market) dengan VB 6
Penulis : Indah Indriyanna, S.Kom (tim Bunafit Komputer)
108
koneksiDb.rsrsPengguna.Close
End Sub
11. Simpan laporan ini dengan nama rptLapPengguna.Dsr.
12. Jalankan program dengan menekan tombol F5 pada keyboard. Dan Anda
dapat mengakses program dari menu Laporan à Seluruh Pengguna.
Berikut tampilannya:
Gambar 4.64 Tampilan Hasil Laporan Seluruh Pengguna
Tidak ada komentar:
Posting Komentar