cara koneksi vb.net dengan access 2003

Cara koneksi vb.net dengan database access 2003

Persiapan yang harus dilakukan sebelum membuat koneksi database ini adalah membuat database access 2003 dan membuat tabel. lalu tabel tersebut diisi secara manual. Langkah berikutnya adalah membuat form seperti gambar di bawah ini yang terdiri dari sebuah button dan datagridview.

Imports System.Data.OleDb

Public Class access2003

    Dim conn As OleDbConnection

    Dim da As OleDbDataAdapter

    Dim ds As DataSet

    Sub koneksi()

        conn = New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=dbaccess2003.mdb")

        conn.Open()

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Call koneksi()

        da = New OleDbDataAdapter("select * from barang", conn)

        ds = New DataSet

        da.Fill(ds)

        DataGridView1.DataSource = ds.Tables(0)

        DataGridView1.ReadOnly = True

    End Sub

End Class