Cara Mengkoneksikan Database Accsess Di Visual Basic 6.0

Kali ini Sampul ilmu sedikit menjelaskan tentang cara mengkoneksikan Database Accsess Di Visual Basic 6.0. Dalam Membuat Suatu Program hal yang paling utama untuk diketahui atau dipahami adalah Dasar dari program tersebut. Disini Sampul Ilmu Tidak Perlu Menampilkan secara terperinci  Tentang Dasar Dari Visual Basic. Selanjutnya kita langsung saja belajar bersama sama tentang koneksi Accsess Di VB.

Langkah – Langkah Yang Harus dilakukan Adalah
Buatlah Data Base dengan Nama coba

Contoh : 

Buka MS Accsess Dikomputer Anda
Setelah Itu Clik Blank Database kemudian di sebelah kanan computer/Laptop Anda Perhatikan File Name Clik Logo Folder Yang Terdapat Disamping Database3.accdb

Setelah Muncul Halaman File New Database Sebelum Menyimpan Terlebih Dahulu buat lah folder baru untuk tempat penyimpan database nanti dengan nama folder Latihan 

setelah folder telah dibuat Ubah File Name Database3.accdb Menjadi Coba Dan Pada Save As Tipe Pilih Microsoft Office Access Databases (2002-2003 Format)(*.mdb) Kemudian Clik Ok
diharapkan database anda telah tersimpan di folder yang telah anda buat. Kemudian clik Create.

Sekarang Database coba telah dibuat langkah selanjutnya membuat tabel didatabase caranya clik pada menu View  yang terdapat diatas kemudian pilih Design View
Maka Akan Muncul Halaman Save As Pada Table Name Ubah Namanya Menjadi data kemudian Clik Ok

Maka Akan Muncul Kolom Field Name, Data Type Dan Description
Pada Kolom Field Name Ketikan Nama Pada Data Type Pilih Text
Pada Kolom Field Name Ketikan Alamat Pada Data Type Pilih Text

Setelah Itu Simpan Dan Keluar. Untuk Pembuatan Database Kali Ini telah selesai

Langkah Berikutnya Membuat Project Di Vb 6.0
1.Buka Aplikasi VB Di Komputer Anda

2.Klik Menu Project Tepatnya DiAtas Halam Vb anda Setelah itu Pilih References Kemudian Cari Dan  Centang Microsoft Activex Data Objects 2.0 Library Setelah itu Klik Ok

3.Pada Property Ubah name Form1 Menjadi Home

4.Buat Module
Untuk Membuat Module Ada 2 Cara Cara Pertama
a. Klik Gambar Form Di Kiri Atas Kemudian Pilih Module
b. Klik Kanan Pada Form1 Disebelah Kanan Pada Project Kemudian Pilih Add >> Module
Setelah Itu Clik Open
5.Copy Code Dibawah Ini Tepat Di Halaman Module

Global db As New ADODB.Connection
Public dbdata As ADODB.Recordset

Sub Connect()
    Set dbdata = New ADODB.Recordset
    Set db = New ADODB.Connection
        db.CursorLocation = adUseClient
        db.Open "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & App.Path & "\ coba.mdb"
End Sub

Sub Main()
Connect
Home.Show
End Sub

Aktifkan Halaman Home Kemudian Klik Project Dan Pilih Project Properties
Setelah Muncul Halaman Project Propertise pada Starup Object: Ganti Home Menjadi Sub Main
Setelah Tahap-Tahap Diatas Telah Selesai Kemudian Close Dan Simpan Project Anda Di Folder Latihan Tempat Penyimpanan Database Coba Yang Telah Dibuat Sebelumnya

Untuk Melihat Apakah Koneksi Anda Berhasil Buka Project anda kemudian RUN

Untuk Tutorialnya Bisa Di Download Disini

Semoga Bermanfaat