VB .NET - Cara Koneksi Database Access (.mdb)

بِسْــــــــــــــــمِ اﷲِالرَّحْمَنِ اارَّحِيم

bismillaahirrahmaanirrahiim

السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

Assalamu'alaikum warahmatullahi wabarakatuh

Pada Tutorial Gratis Visual Basic .Net kali ini akan dibahas mengenai Cara Mudah Membuat Koneksi kedatabase Access .mdb dengan VB .Net. Tutorial dibawah ini kami akan menggunakan VB .Net versi 2010 Express. Bagi anda yang berbeda versinya, anda juga bisa mengikuti Tutorial dibawah ini.

Berikut langkah-langkahnya :

1. Membuat Project Baru VB .Net dan Menyimpannya
2. Membuat Database Access 2003 , Tabel Barang dan menyimpannya pada Bin / Debug
3. Membuat Form, Memasukan Koding dan Jalankan Program

NO.1 Membuat Project Baru VB 2010 dan Menyimpannya
Pastikan anda sudah Install Visual Basic 2010 pada komputer anda,
Klik Start pada Windows
All Programs

Klik Microsoft Visual Basic 2010 Express
Klik File - New - Project
Maka akan muncul :

Klik OK

Maka akan keluar Form1 (lihat gambar diatas)

NO.2 - Membuat Database Access 2003 , Tabel Barang dan menyimpannya pada Bin / Debug
Buatlah sebuah database dengan nama : DBJNM.mdb
Buatlah sebuah Tabel dengan Nama : Barang
Silahkan Design Tabel Barang dan Isi Tabel Barang tersebut sesuai gambar dibawah ini :

Setelah selesai, simpan pada folder Bin / Debug

NO.3  Design Form, Masukan Koding dan Jalankan Program
Buatlah sebuah Form seperti gambar dibawah

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=DBJNM.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

Jika sudah semua, silahkan run atau jalankan Proect VB .Net anda
Hasilnya adalah seperti gambar dibawah ini :

Silahkan KLIK DISINI Untuk mendownload Tutorial diatas
Semoga bermanfaat, ikuti terus pembelajaran dari kami :)

Update Contact :
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email : Fajarudinsidik@gmail.com NB :: Bila Sobat tertarik Ingin membuat software, membeli software, membeli source code, membeli hardware elektronika untuk kepentingan Perusahaan maupun Tugas Akhir (TA/SKRIPSI), Insyaallah Saya siap membantu, untuk Respon Cepat dapat menghubungi kami, melalui :

No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email: Fajarudinsidik@gmail.com

atau Kirimkan Private messanger melalui email dengan klik tombol order dibawah ini :

ٱلْحَمْدُ لِلَّهِ رَبِّ ٱلْعَٰلَمِين

Alhamdulilah hirobil alamin

وَ السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

wassalamualaikum warahmatullahi wabarakatuh

Artikel VB .NET - Cara Koneksi Database Access (.mdb), Diterbitkan oleh scodeaplikasi pada Kamis, 19 November 2015. Semoga artikel ini dapat menambah wawasan Anda. Website ini dipost dari beberapa sumber, bisa cek disini sumber, Sobat diperbolehkan mengcopy paste / menyebar luaskan artikel ini, karena segala yang dipost di public adalah milik public. Bila Sobat tertarik Ingin membuat software, membeli software, membeli source code ,Dengan Cara menghubungi saya Ke Email: Fajarudinsidik@gmail.com, atau No Hp/WA : (fajar) : 085369237896, (puat) : 085267792168.