BAB 3
Simpan Data Simpan data merupakan satu dari beberapa hal penting yang pasti ada dalam pembuatan aplikasi khususnya aplikasi yang sering penulis buat ternyata hampir semua aplikasi harus adanya penyimpanan data. Disini penulis akan menjelaskan 2 struktur kode program simpan data yang biasa penulis gunakan dalam pembuatan aplikasi. 3.1. Simpan Data Dengan Kode SQL Yang pertama simpan data dengan kode SQL disini penulis akan menuliskan kode SQL untuk menyimpan datanya dengan menggunakan modul koneksi. 1.
Langkah pertama buatlah database di Ms Access dengan type MS Access (2002-2003 format) kemudian simpan dengan nama DbJenisBrg.mdb kemudian buatlah tabelnya dengan nama Tabel_Jenis_Brg dengan field-field seperti dibawah ini.
Gambar 3.1 – Desain Tabel_Jenis_Brg
22 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
2.
Setelah database selesai dibuat sekarang buka program Visual Basic 6.0, kemudian pilih VB Enterprise Edition Control agar komponen-komponennya lengkap.
3.
Pilih menu Project pilih Add Module kemudian klik Open.
Gambar 3.2 –Tampilan Menu Untuk Menambah Modul
4.
Maka akan muncul kotak isian untuk mengetikkan kode program, kemudian ketik kode dibawah ini.
23 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
Maksud Kode Program :
Kode
Digunakan sebagai variabel yang diperlukan untuk mengoneksikan database, manipulasi database, dan record. Keterangan : Untuk penjelasan lebih rincinya sudah dijelaskan pada bab sebelumnya.
Kode
1 2
3
Digunakan sebagai prosedur untuk berkoneksi dengan database. Yang harus diperhatikan adalah (1) tipe koneksinya menggunakan Provider Microsoft.Jet.OleDB.4.0, (2) DbJenisBrg.mdb sebagai databasenya yang berada dalam satu folder dengan project yang telah dibuat, dan (3) menyeleksi Tabel_Jenis_Brg.
24 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
Keterangan : Untuk penjelasan lebih rincinya sudah dijelaskan pada bab sebelumnya.
5. Kemudian aktifkan objek Adodb terlebih dahulu dari menu Project – References. 6. Akan muncul jendela References – Project1, aktifkan tanda cek pada menu Microsoft AxtiveX Data Objects 2.1 Library. Kemudian klik tombol OK. Berikut tampilannya :
Gambar 3.3 – Tampilan Penambahan Objek Adodb
7.
Pada area form1 tambahkan beberapa komponen diantaranya Label
(
)
komponen
CommandButton (
TextBox
(
),
komponen
), dan komponen MsFlexGrid (
Dengan ketentuan dibawah ini : Komponen Form 1 Label 1 Lebel 2 Lebel 3 Text 1
Properti Name Caption Caption Font - Size Caption Caption Name Text
25 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
Nilai Form_Simpan :: INPUT JENIS BARANG INPUT JENIS BARANG 14 Kode Jenis Nama Jenis txtKodeJenis
).
Text 2 Command 1 Command 2 MsFlexGrid 1
Name Text Name Caption Name Caption Cols
txtNamaJenis cmdSimpan &Simpan cmdKeluar &Keluar 2
Tabel 3.1 – Komponen dan Propertinya
8.
Sehingga desain tampilannya seperti dibawah ini.
Gambar 3.4 – Tampilan Desain Form
9.
Doubel klik pada area form, pada form_load ketik kode dibawah ini.
26 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
Maksud Kode Program :
Kode
Digunakan sebagai prosedur untuk mengoneksikan ke database yang kodenya ditulis pada modul yang telah tadi dibuat.
27 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
Kode
1
2
Digunakan untuk kondisi jika database pada Tabel_Jenis_Brg (1) masih kosong maka akan muncul kotak informasi, selain itu ketika (2) terdapat data maka akan tampil pada grid dengan melakukan pengulangan berdasarkan data yang ada pada database.
Kode
28 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
Digunakan untuk mendesain komponen MsFlexGrid yang ditulis di kode program.
10. Setelah selesai kemudian doubel klik pada tombol Simpan, maka akan muncul area untuk mengetikkan kode program dan ketikkan kode dibawah ini.
Maksud Kode Program :
Kode
29 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
Digunakan untuk kondisi ketika inputan masih kosong maka akan muncul kotak dialog untuk perhatian, sebaliknya kalau semua inputan sudah diisi maka akan membaca kode selanjutnya.
Kode
1
2 Digunakan untuk memasukan data kedalam (1) field-field yang ada pada Tabel_Jenis_Brg sesuai dengan nama (2) inputan pada form
Kode
1 2
Digunakan untuk (1) memunculkan dialog box setelah proses penyimpanan berhasil, dan (2) mengembalikan form ke kondisi semula.
11. Setelah itu selesai doubel klik pada tombol Keluar, dan tuliskan kode program dibawah ini.
Maksud Kode Program :
30 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
Digunakan untuk mengakhiri program secara keseluruhan dan bisa juga menggunakan kode program Unload me.
12. Lalu Coba jalankan form klik Run atau tekan F5.
Gambar 3.5 – Tampilan Form Setalah Dijalankan
13. Kemudian simpan modul, form, dan project tersebut dengan nama Modul_Koneksi, Form_Simpan dan Project_Simpan.
3.2. Simpan Data Menggunakan Komponen Yang kedua simpan data menggunakan komp0nen disini penulis menggunakan komponen Adodc sebagai alat untuk mengoneksikan Visual Basic ke Ms Access. 1.
Database yang digunakan masih DbJenisBrg.mdb.
2.
Buka program Visual Basic 6.0, kemudian pilih VB Enterprise Edition Control agar komponen-komponennya lengkap.
3.
Pada area form1 tambahkan beberapa komponen diantaranya Label
(
)
komponen
CommandButton ( komponen DataGrid (
TextBox
(
),
komponen
), komponen Adodc (
) , dan
). Dengan ketentuan dibawah ini :
31 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
Komponen Form 1 Label 1 Lebel 2 Lebel 3 Text1 Text 2 Command 1 Command 2
Adodc 1
DataGrid 1
Properti Name Caption Caption Font - Size Caption Caption Name Text Name Text Name Caption Name Caption Name Caption Use Connection String Reocord Source Name Data Source
Nilai Form_Simpan :: INPUT JENIS BARANG INPUT JENIS BARANG 14 Kode Jenis Nama Jenis txtKodeJenis txtNamaJenis cmdSimpan &Simpan cmdKeluar &Keluar Ado_Koneksi KONEKSI JENIS BARANG Provider=Microsoft.Jet.OLE DB.4.0;Data Source=DbJenisBrg.mdb;Per sist Security Info=False Tabel_Jenis_Brg Data_Jenis_Brg Ado_Koneksi
Tabel 3.2 – Komponen dan Propertinya
4.
Sehingga desain tampilannya seperti dibawah ini.
Gambar 3.6 – Tampilan Desain Form
32 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
5.
Caranya hampir sama seperti pada bab sebelumnya tentang koneksi menggunakan komponen. Koneksikan komponen Adodc1 ke database DbJenisBrg.mdb sampai test koneksi dan memilih record source untuk tabelnya yaitu Tabel_Jenis_Brg dan kemudian tampilkan pada komponen DataGrid1.
Gambar 3.7 – Tampilan Desain Form Setelah Dikoneksikan
6.
Setelah database terkoneksi sekarang doubel klik pada tombol Simpan dan ketikkan kode program dibawah ini.
33 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
Maksud Kode Program :
Kode
Digunakan untuk kondisi ketika inputan masih kosong maka akan muncul kotak dialog untuk perhatian, sebaliknya kalau semua inputan sudah diisi maka akan membaca kode selanjutnya.
Kode
1 2
Digunakan untuk memasukan data kedalam (1) field-field yang ada pada Tabel_Jenis_Brg yang dikoneksikan oleh Ado_Koneksi sesuai dengan nama (2) inputan pada form.
Kode
1 2
34 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
Digunakan untuk (1) memunculkan dialog box setelah proses penyimpanan berhasil, dan (2) mengembalikan form ke kondisi semula.
7.
Doubel klik juga pada tombol Keluar dan ketikkan kode program untuk keluar dibawah ini.
Maksud Kode Program :
Digunakan untuk mengakhiri program secara keseluruhan dan bisa juga menggunakan kode program Unload me.
8.
Lalu Coba jalankan form klik Run atau tekan F5.
Gambar 3.8 – Tampilan Desain Form Setelah Dikoneksikan
9.
Kemudian simpan form, dan project tersebut dengan nama Form_Simpan dan Project_Simpan.
35 | Atep Ruhiat Panduan Source Code Untuk Membuat Aplikasi Di Visual Basic 6.0
