Selamat datang di Mbuu-Mbii Website. Website ini masih dalam pengembangan.

 

Membuat Koneksi Dari VB.Net Ke Access
Ditulis oleh Administrator   
Senin, 21 Maret 2011 15:52

Kali ini saya akan membahas bagaimana mengkoneksikan database access dengan VB.net. Sebelumnya buat dahulu database di Ms. Access kemudian simpan dengan format Ms. 2003(.mdb) karena disini kita menggunakan Providernya Microsoft.Jet.OLEDB.4.0. Setelah itu seperti biasa buatlah Project Baru pada VB.net, Pilih Windows Form Application. Setelah itu buat Class baru dengan cara pilih Menu Project | Add New Class.

Kemudian Ketik Script/Coding Pada Class yang telah dibuat Seperti dibawah ini:

 

Imports System.Data.OleDb

Public Class Class1

    Private strkonek As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=LOKASI DATABASENYA\NAMA DATABASENYA"

    'contoh => Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\document\Database1.mdb

    Public koneksi As OleDbConnection

 

    Public Sub connect()

        Try

            koneksi = New OleDbConnection(strkonek)

            koneksi.Open()

            MsgBox("Koneksi Berhasil")

        Catch ex As Exception

            MsgBox("Koneksi Gagal")

        End Try

    End Sub

End Class

Penjelasannya :

Pada baris paling atas (Imports System.Data.OleDb) saya menyebutnya sebagai driver seperti halnya hardware jika tidak ada drivernya tidak bisa digunakan(hardware yang membutuhkan driver). Nah disini juga demikian, Pada script diatas ada script OleDbConnection, Script tersebut akan bergaris bawah (error) jika kita tidak ketik Imports System.Data.OleDb Maka dari itu tersebut jangan lupa diketik agar script OleDbConnection bisa berfungsi.

Mengapa menggunakan OleDb?

Seperti Judul Diatas kita membuat koneksi antara VB.net dengan Access. Karena kita menggunakan Access maka yang kita gunakan adalah OleDb. Jika kita menggunakan database ODBC ya yang kita ketik adalah ODBC kalau PakaiAdoDb ya yang diketik AdoDb.

Apa Fungsi dari OleDbConnection?

Disini kita baru sampai mengkoneksikan saja ke database, dan fungsi dari oledbconnection yaitu untuk memilih file database mana yang kita gunakan.. Setelah itu kembali ke form1 double klik pada form1 dan ketik script seperti ini yang fungsinya memanggil fungsi yang ada pada class yang kita buat tadi.

Public Class Form1

    Public panggilclass As New Class1

 

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        panggilclass.connect()

    End Sub

End Class