Cara Menghubungkan Ms. Access Vs Visual Basic
- Buka Aplikasi Visual Basic 6.0 Pilih Project Standart and Tambahkan Form pada Project
- Setelah Selesai menambah Form selanjutnya kita menambah kompon tool dengan cara menekan tombol Ctrl + T.
- Selanjutnya kita membuat ADO nya pada form
Adodc
- Kemudian pilih Apply dan Ok, selanjutnya kita akan menambah ADO data pada from. Dan kita akan membuat jembatannya.
- Kemudian kita akan memilih menu Build kemudian pilih Microsoft Jet 4.0 OLE DB Provider dan pilih Next>>
- Selanjutnya kita akan memasukkan alamat data atau tabel pada acces ke alamat berikut. Dan menguji apakah ia sudah terkoneksi atau belum yaitu dengan mengkelik tombol Test_Connection Jika ia sukses berarti ia sudah terkoneksi, dan jika belum, mungkin kendalanya ialah Ms. Accesnya Belum di rubah formatnya menjadi format 2000, dan pilih Ok.
- Langkah selanjutnya ialah mengcopy alamat yang berada di Build ke Notepad. Dan mengcancel proses Property Pages dan jangan di OK
- Selanjutnya kita akan mengedit Coding yang ada pada form atau mengisi Coding pada Form dan ini merupakan Coding Untuk Mengkoneksi Form dengan Ms. Acces.
Ket : Dim database As ADODB.Connection
Dim recordata As ADODB.Recordset = merupakan Kepala dari koding untuk
mengkoneksi / Alias
Command1 = Tombol Lihat data
Command2 = Tombol untuk keluar
Form_Load= Menghubung data Acces dengan Form
- Selanjutnya kita akan menambah tabel Data Grid, Tombol Lihat Data & Exit pd Form
- Selanjutnya kita harus menambah Module
- Selanjutnya klik dua kali pada Module, dan kita masukkan Koding untuk menghubung Form dengan Module
Public DBKON As ADODB.Connection
Public Function koneksidata() As Boolean
Set DBKON = New ADODB.Connection
DBKON.Open "Paste Alamat yang di copy pada Notepad sebelumnya"
If Err.Number = 0 Then
koneksidata = True
Else
koneksidata = False
End If
End Function
- Selanjutnya jalankan programnya.
Download Modul ini....
