VB .NET - Koneksi Database Access (.mdb)
Berikut langkah-langkahnya :
1. Buka/buat Project
2. membuat Database
3. Membuat Module
Klik New Project
Maka akan muncul :
Maka akan keluar Form1 (lihat gambar diatas)
Buatlah sebuah Tabel dengan Nama : *contoh TBL_LOGIN
Setelah selesai, simpan pada folder project pada path Bin / Debug
maka muncul :
Klik kanan pada nama project anda pilih Add --> Module
Maka Muncul :
dan pada bagian ' Name ' isi dengan koneksi
Lalu isi kodingannya dengan ini :
1. Buka/buat Project
2. membuat Database
3. Membuat Module
1. Membuat Project Baru
Pastikan anda sudah menginstall Visual Studio , buka aplikasinyaKlik New Project
Maka akan muncul :
2. Membuat Database
Buatlah sebuah database dengan nama : DBDATA.mdbBuatlah sebuah Tabel dengan Nama : *contoh TBL_LOGIN
3. Membuat Module
Klik ' Solution Explorer ' pada sisi kananmaka muncul :
Klik kanan pada nama project anda pilih Add --> Module
Maka Muncul :
dan pada bagian ' Name ' isi dengan koneksi
Lalu isi kodingannya dengan ini :
Imports System.Data.OleDb
Module koneksi
Public CONN As OleDbConnection
Public DA As OleDbDataAdapter
Public DS As DataSet
Public DR As OleDbDataReader
Public CMD As OleDbCommand
Public LokasiDB As String
Public Sub konek()
LokasiDB = "Provider=Microsoft.Jet.OleDb.4.0;Data Source=DB_DATA.mdb"
CONN = New OleDbConnection(LokasiDB)
If conn.State = ConnectionState.Closed Then
conn.Open()
End If
End Sub
End Module
Module koneksi
Public CONN As OleDbConnection
Public DA As OleDbDataAdapter
Public DS As DataSet
Public DR As OleDbDataReader
Public CMD As OleDbCommand
Public LokasiDB As String
Public Sub konek()
LokasiDB = "Provider=Microsoft.Jet.OleDb.4.0;Data Source=DB_DATA.mdb"
CONN = New OleDbConnection(LokasiDB)
If conn.State = ConnectionState.Closed Then
conn.Open()
End If
End Sub
End Module
EmoticonEmoticon