Sekilas tentang vb6
VB6 merupakan bahasa pemrograman produk dari microsoft yang sampai saat ini masih banyak diajarkan di berbagai perguruan tinggi. Selain itu vb6 juga banyak dikembangkan oleh para developer untuk membuat aplikasi pengolah data di berbagai industri, akademis, dan instansi.
Database pada vb6
VB6 memiliki database bawaan microst access 97 yang bisa di access dari add in manager. Bisa juga menggunakan Microsoft Access versi diatasnya dengan menggunakan koneksi ADO. Lalu apakah vb6 bisa melakukan koneksi dengan MySQL? Jawabannya adalah bisa!!!
Apa saja yang diperlukan untuk dapat melakukan koneksi vb6 dan mysql?
- Yang pertama tentu saja adalah komputer sudah terinstal visual basic 6 atau vb6
- Yang kedua adalah anda sudah menginstall MySQL database Server yang bisa di download secara gratis di situs resmi mysql
- Dan yang ketiga anda memerlukan sebuah driver penghubung antara vb6 dan mysql yaitu mysql connector-odbc 3.51.27(atau bisa juga menggunakan versi lain). Silakan download secara gratis diĀ http://dev.mysql.com/downloads/connector/odbc/3.51.html
Cara melakukan koneksi mysql dengan vb6
Ada beberapa cara untuk melakukan koneksi dari vb6 ke mysql, namun yang saya bahas disini adalah yang menggunakan Reomote Data Object atau disingkat RDO. Yang perlu dilakukan adalah
- Tambahkan Remote Data Object Reference pada vb6 dengan cara klik menu Project –> reference
- Centang checkbox Microsoft Remote Data Object 2.0, Microsoft Data Services 2.7 Library seperti gambar berikut :
- Buat database sederhana di mysql dengan nama testdb, dan tambahkan sebuah tabel misalnya anggota. Dengan struktur tabel seperti gambar di bawah :
- Oke, sekarang kita siap melakukan koneksi. Koneksi bisa dilakukan pada saat form dipanggil. Dengan kata lain kita akan membuat event pada form_load, caranya sangat mudah, buat dulu sebuah project baru pada visual basic(vb6).
- Pertama adalah kita akan membuat variabel koneksi dulu, klik kanan pada form vb6, kemudian pilih view code
- Membuat variabel koneksi, pada jendela code vb6, ketik kode sebagai berikut :
Dim koneksi As New rdoConnection
- Kemudian pada form_load, ketikkan kode sebagai berikut :
Private Sub Form_Load()
koneksi.Connect = "uid=root;pwd=root;server=localhost;
driver={MySQL ODBC 3.51 Driver};database=testdb;"
koneksi.EstablishConnection
End Sub
Penjelasan :
Dim koneksi As New rdoConnection :membuat variabel koneksi sebagai rdoconnection
koneksi.connect : menjalankan method koneksi ke mysql
uid : root –> nama username di mysql
pwd:root –> nama password database di mysql
driver={MySQL ODBC 3.51 Driver}; –> driver yang digunakan untuk koneksi dari vb6 ke mysql
database=testdb;” –> nama database di mysql
Menjalankan vb6
Tekan F5 atau klik tombol run pada vb6, jika tidak muncul pesan error, maka kita sudah berhasil melakukan koneksi dari vb6 ke mysql.
Mengakses Recordset / Resultset Mysql
Kita lanjutkan di posting selanjutnya ya,… Saya ada seminar dulu, wk wk wk




saya belum pernah mencoba untuk menggunakan my SQL. bagaimana dengan listing edit/input/hapus?? utk Recordsource & Recordsetnya kapan dipostingnya???