Selamat malam sobat,
Malam ini saya ingin berbagi cerita, eh maksud saya source program sederhana untuk membuat koneksi antara visual basic 6 dengan database Access. Agar sobat lebih paham, tolong source code nya di ketik ulang, jangan cuma di kopas. berikut ini langkah-langkahnya:
Step 1, Buat Folder untuk menyimpan project latihan kita. sebagai contoh, saya simpan project di drive D: di folder project, saya buat folder lagi dengan nama latihan2 , kalau diringkas, bentuk alamat di windows explorer bakal seperti ini "D:\Project\Latihan2"
Step 2, Seperti selayaknya dalam pembuatan aplikasi, maka hal pertama yang kita buat dahulu adalah::: Databasenya... kayaknya nggak perlu saya jembrengkan cara membuat database dan tabel dengan microsoft Access, langsung saja, buat file database access, lalu buat tabel mahasiswa dengan struktur tabel seperti berikut:
Simpan dengan Save As (Jangan yang Save), pilih Access 2000 Database, Simpan di folder
"D:\Project\Latihan2" dengan nama Mahasiswa
Step 3, Buka Visual Basic 6, Buat Project baru, pilih Vb Enterpise Edition Control
Step 4, Simpan Project di "D:\Project\Latihan2"
Step 5, Buat Modul baru, Cara membuat modul di Vb6 seperti ini nih,
lihat ke sisi paling kanan dari IDE Visual basic 6, anda bisa melihat ada jendela project disana. Klik folder modul trus klik kanan, pilih Add di menu, kemudian pilih modul
Step 6, Buat dua modul
Step 7, Ganti nama modul, modul pertama = "modVar", modul kedua = "modUtil", Hasil struktur projectnya bisa anda lihat seperti dibawah ini:
Step 8, Struktur dan Bentuk Form1
Step 9: Isi Form1
Step 10: Isi modVar
Step 11: Isi ModUtil
Penjelasan: Lihat ke bagian Kode ini
Malam ini saya ingin berbagi cerita, eh maksud saya source program sederhana untuk membuat koneksi antara visual basic 6 dengan database Access. Agar sobat lebih paham, tolong source code nya di ketik ulang, jangan cuma di kopas. berikut ini langkah-langkahnya:
Step 1, Buat Folder untuk menyimpan project latihan kita. sebagai contoh, saya simpan project di drive D: di folder project, saya buat folder lagi dengan nama latihan2 , kalau diringkas, bentuk alamat di windows explorer bakal seperti ini "D:\Project\Latihan2"
Step 2, Seperti selayaknya dalam pembuatan aplikasi, maka hal pertama yang kita buat dahulu adalah::: Databasenya... kayaknya nggak perlu saya jembrengkan cara membuat database dan tabel dengan microsoft Access, langsung saja, buat file database access, lalu buat tabel mahasiswa dengan struktur tabel seperti berikut:
Simpan dengan Save As (Jangan yang Save), pilih Access 2000 Database, Simpan di folder
"D:\Project\Latihan2" dengan nama Mahasiswa
Step 3, Buka Visual Basic 6, Buat Project baru, pilih Vb Enterpise Edition Control
Step 4, Simpan Project di "D:\Project\Latihan2"
Step 5, Buat Modul baru, Cara membuat modul di Vb6 seperti ini nih,
lihat ke sisi paling kanan dari IDE Visual basic 6, anda bisa melihat ada jendela project disana. Klik folder modul trus klik kanan, pilih Add di menu, kemudian pilih modul
Step 6, Buat dua modul
Step 7, Ganti nama modul, modul pertama = "modVar", modul kedua = "modUtil", Hasil struktur projectnya bisa anda lihat seperti dibawah ini:
Step 8, Struktur dan Bentuk Form1
Nama Object | Type | Properties |
txtNim | TextBox | |
txtNama | TextBox | |
txtAlamat | TextBox | |
txtTempatLahir | TextBox | |
dtpTglLahir | DTPicker | Updown = True |
txtKota | TextBox | |
Adodc1 | Adodc1 | Visible = False |
DataGrid1 | DataGrid1 | |
txtCariNama | TextBox | |
txtCariAlamat | TextBox | |
Label untuk text box | Label |
Step 9: Isi Form1
Step 10: Isi modVar
Step 11: Isi ModUtil
Penjelasan: Lihat ke bagian Kode ini
Public Function OpenConnection() Set dbconn = New ADODB.Connection dbconn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\mahasiswa.mdb;Persist Security Info=False" dbconn.CursorLocation = adUseClient dbconn.Open End Functionset dbconn = new ADODB.Connection ---> Membuat Koneksi Baru dbconn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\mahasiswa.mdb;Persist Security Info=False" --> Koneksi string untuk database Access Mahasiswa, sekedar catatan, dulu sekali saat ujian skripsi banyak teman-teman saya yang gagal presentasi aplikasi karena aplikasinya tidak bisa konek database, mengapa bisa begitu? karena mereka beli program dari orang lain, pas di kopi ke komputernya, folder penyimpanan databasenya beda dengan komputer yang buat ujian, Nah, supaya kalian tidak mengalami nasib yang sama dengan teman-teman saya, pakai saja perintah "App.Path" yang artinya kurang lebih "Path tempat aplikasi (exe) berada". App.Path artinya Path aplikasi berada.
Tidak ada komentar:
Posting Komentar