Mengkoneksikan Databases Access 2007/2010 Dengan Visual Basic 6.0

Di tutorial - tutorial sebelumnya saya sudah penah menuliskan Cara Menghubungkan Microsoft Access dengan VB, tapi access yang di gunakan adalah access versi 2003 kebawah atau format mdb, kali ini kita akan menghubungkan vb dengan access 2007 / 2010 atau format accbd sekaligus menampilkan datanya di data grid, sebelum memulai tutorial ini buat terlebih dulu databasenya, untuk nama file atau tabel dan designya bebas, jika database sudah siap, kita mulai tutorialnya :

1. Buka visual Basic dengan program standar exe
2. Lalu tambahkan datagrid dan adodc, Untuk propertiesmya biarkan saja

3. Tanpa setting apa pun, tuliskan script berikut :

'Variabel yang akan di gunakan untuk mengkoneksikan vb dengan access
Dim Blues As New ADODB.Connection
Dim Pedia As ADODB.Recordset

'script untuk mengkoneksikan vb access
Sub BluesPedia()
Set Blues = New ADODB.Connection
Set Pedia = New ADODB.Recordset

'Membuka Databases access
Blues.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & App.Path & "\Database_BluesPedia.accdb"
' "& App.Path & "\Database_BluesPedia.accdb" adalah script untuk membuka databases, jika tempat penyimpanan file access sama dengan program vb, jika tidak, ganti dengan script berikut :
' "(Drive):\(Folderi)\(sub Folder)\(nama file).(format)", contonya seperti ini :
' "D:\Blues\Pedia\Database_BluesPedia.accdb"
End Sub

Private Sub Form_Load()
'Memanggil script untuk membuka databases
Call BluesPedia

'Menghubungkan Adodc dengan databases
Adodc1.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source= " & App.Path & "\Database_BluesPedia.accdb; "

'Memilih tabel yang akan di gunakan
Adodc1.RecordSource = "Data_User"
'Data_User adalah nama tabel

Adodc1.Refresh
'Menampilkan tabel yang di pilih Adodc di data grid
Set DataGrid1.DataSource = Adodc1
End Sub

4. Jika anda menggunakan script  "& App.Path & "\Database_BluesPedia.accdb", simpan progam di tempat anda menyimpan file databases access,
jika tidak menggunakan script di atas, anda bisa langsung untuk menjalankan program.

5. Jika pnulisan script benar, ketika program dijalankan, data grid akan menampilkan data dari databases yang digunakan, seperti ini :

Itulah cara mengkoneksikan visual basic dengan Ms. Access 2007 / 2010
Sekian tutorial kali ini, semoga bermanfaat