kali ini saya akan share cara membuat koneksi MySql (xampp) dan vb6.sebenarnya saya sudah jarang sekali koding sejak 7 tahun lalu.tujuan postingan ini untuk dokumen aja supaya kalo ada yang masih pakai vb6 bisa buat refrensi.berikut langkah2 nya
1.install xampp https://www.apachefriends.org/index.html (default)
2.setelah download xampp jalankan Apache dan Mysql dengan cara klik start pada xampp control panel
3.buat database dan table yang ingin anda tampilkan di vb6
4.download driver ODBC 3.51 untuk mysql
5.buka vb6 - klik pada menu Project -pilih menu References - centang pada microsoft ActiveX Data Objects 2.7 Library
6.setelah database berhasil dibuat kita buat koneksi di vb6.berikut tulis di module vb6 :
Public Conn As New ADODB.Connection
Public RS As New ADODB.Recordset
Public sql As String
Public Function Connection()
Set Conn = New ADODB.Connection
Set RS = New ADODB.Recordset
Conn.Open "Provider=MSDASQL.1;Persist security info=false;data source=konekbos"
End Function
coding diatas bisa jg diterapkan dalam form,namun jika di tulis di dalam form maka hanya form tersebut yg bisa meng eksekusi code diatas.itu knp saya tulis di dalam module dengan deklarasi Public supaya semua form bisa panggil code tsb.sampai disini koneksi database harus nya sudah berhasil
6.kita gunakan componen adodc dan datagrid untuk menampilkan data (hanya contoh boleh pakai listview atau component lain)
Call bukadb
Adodc1.ConnectionString = Conn
Adodc1.RecordSource = "barang"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
7.data sudah berhasil ditampilkan
0 Komentar