Cara Koneksi Database MySQL VB 6.0

Pada pembelajaran kali ini adalah Cara Koneksi Database MySQL Dengan VB 6.0
Untuk mengikuti Tutorial ini pastikan :
1. Anda sudah Install Visual Basic 6.0
2. Anda sudah Install Xampp
3. Anda Sudah Install ODBC (Sebagai Konekor ke Database MySQL)
    Jika anda belum install ODBC anda bisa donwload DISINI

Langkah 1 (Membuat Database pada MySQL
Buatlah database dengan nama dbbelajarvb
Kemudian buatlah Tabel Barang dengan Design

Kemudian masukan data pada Tabel Barang seperti gambar dibawah ini :

Proses Pembuatan Database dan Tabel MySQL selesai. Lanjutkan ke langkah 2

Langkah 2 (Buat Form dan Koneksi ke Database MySQL)

Buka Komputer Anda
Klik Start pada Windows
Klik All Programs
Visual Basic 6.0
Standart EXE
OK
Buatlah Design Form Seperti gambar dibawah :

Klik Datagrid1
Kemudian Ubah pada Properties

Klik Kanan Adodc1 - ADODC Properties

Klik New

Klik Next

Klik Next

Klik Finish

Kemudian masukan data seperti gambar diatas
Klik OK

Klik RecordSource

Klik Apply - OK
Kemudian jalankan Form atau Aplikasi VB 6 anda

Jika berhasil maka akan muncul seperti gambar diatas

Atau Jika anda ingin menggunakan Koding anda bisa gunakan seperti koding dibawah ini :

Dim Koneksi As New ADODB.Connection
Dim RSBarang As ADODB.Recordset
Sub BukaDB()
Set Koneksi = New ADODB.Connection
Set RSBarang = New ADODB.Recordset
Koneksi.Open "Provider=MSDASQL.1;Persist Security Info=False;Data Source=KonekDBMySQL"
End Sub
Private Sub Form_Load()
Call BukaDB
Adodc1.ConnectionString = Koneksi
Adodc1.RecordSource = "Barang"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
End Sub

Untuk hasilnya sendiri akan sama dengan gambar diatas sebelumnya, ikuti terus Tutorial VB dari kami ya. Jangan lupa untuk follow google plus kami dan berkomentar dibawah :)