Cara Koneksi Database Access 2003 (mdb) Pada VB .Net 2012

Pada pembelajaran VB Net kali ini akan dibahas mengenai cara mengkoneksikan Database Access 2003 (mdb) dengan VB Net 2012. Kenapa harus Access 2003 ? mungkin anda bertanya kenapa Access 2003 padahal sekarang sudah ada access versi 2013. Jawabannya adalah dikarenakan Access 2003 untuk pemograman masih banyak dipakai oleh Para Programmer di Dunia karena Access 2003 masih powerfull dan mudah dalam koneksi database maupun untuk keperluan reporting yang sangat mudah.

Baiklah berikut langkah-langkahnya :
#1. Buat database dan Tabel menggunakan Access 2003
Buatlah nama database dengan nama : DBBelajarvb.mdb
Buatlah Tabel dengan nama : Barang
kemudian design Tabel barang dan beri sample data seperti dibawah ini :
Cara Koneksi Database Access 2003 (mdb) Pada VB .Net 2012
Jika sudah, ikuti langkah 2.

#2. Buat Project Dengan VB Net 2012 dan Buatlah Design pada Form1
Design Form1 seperti gambar dibawah ini :
Pada gambar diatas, hanya ditambahkan DatagridView1
Kemudian masukan koding dibawah ini :


Imports System.Data.OleDb
Public Class Form1
    Dim Conn As OleDbConnection
    Dim da As OleDbDataAdapter
    Dim ds As DataSet
    Dim LokasiDB As String
    Sub Koneksi()
        LokasiDB = "provider=microsoft.jet.oledb.4.0;data source=DBBelajarvb.mdb"
        Conn = New OleDbConnection(LokasiDB)
        If Conn.State = ConnectionState.Closed Then Conn.Open()
    End Sub
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Koneksi()
        da = New OleDbDataAdapter("Select * from barang", Conn)
        ds = New DataSet
        ds.Clear()
        da.Fill(ds, "Barang")
        DataGridView1.DataSource = (ds.Tables("Barang"))
    End Sub
End Class

Jangan lupa untuk memasukan DBBelajarvb.mdb pada Folder Bin\Debug Project Aplikasi VB Net anda

Jalankan Project anda, dan hasilnya adalah seperti gambar dibawah ini :
Cara Koneksi Database Access 2003 (mdb) Pada VB .Net 2012
Bagaimana cukup mudah bukan.. ikuti terus pembelajaran VB Net 2012 lainnya ya.....

Subscribe to receive free email updates:

0 Response to "Cara Koneksi Database Access 2003 (mdb) Pada VB .Net 2012"

Post a Comment