Membuat Koneksi Database Ms. Visual Basic 6.0 dengan MySQL Xampp

Posted by : Unknown Minggu, 17 Mei 2015

Membuat Koneksi Database Ms. Visual Basic 6.0 dengan MySQL Xampp

Hello Sobat IT, pada tutorial kali ini saya akan coba untuk membuat koneksi database dari Ms. VB 6.0 dengan MySql Xampp.

Pertama-tama pastikan bahwa Ms. VB 6.0 sudah terinstall di dalam lepi Anda (Ya iyalah :D). Setelah itu pastikan juga bahwa MySql Xampp udah terinstall juga. Install juga Mysql odbc 3.5 gan untuk penghubung antara Ms. VB 6.0 dengan Xampp.

Oke lgsg kita eksekusi gan...

1. Buat dulu database MySql x di Xampp dengan cara ketikkan “Localhost/phpmyadmin” di web browser Anda.

Di Tab Database isi pada isian Create new database sesuai dengan database yg akan Anda buat misalkan db_contoh :

Atau bisa juga dengan menuliskan query pada tab SQL :

Create Database db_contoh;

2. Next, buka Ms. Visual Basic 6.0 kemudian pilih standard EXE seperti biasanya gan.

3. Tambahkan References Microsoft ActiveX data objects 2.8 Library. Caranya klik Project => References => centang Microsoft ActiveX data objects 2.8 Library => klik Add

4. Sebelum kita membuat tombol koneksi, di sini saya akan menggunakan sebuah module untuk membuat koneksi agar coding koneksi tidak di panggil berulang-ulang gan. Jadi, untuk melakukan koneksi kita hanya perlu mengetikkan metode yg ada di dalam module dan berlaku di seluruh Form yang ada dalam satu project.

5. Cara membuat module yaitu klik Project => Add Module

6. Kemudian ketikkan coding berikut gan di dalam module

Public koneksiantri As ADODB.Connection
Public queryantri As ADODB.Recordset
Option Explicit
Public koneksi As ADODB.Connection
Public query As ADODB.Recordset
Public Sub konek()
Set koneksi = New ADODB.Connection
Set query = New ADODB.Recordset
koneksi.CursorLocation = adUseClient
koneksi.ConnectionString =
"DRIVER={mysql odbc 3.51 driver};" & "server=localhost;" & "PORT=3306;" &
"database=db_contoh;" & "UID=root;" & "PWD=;"
If koneksi.State = 1 Then koneksi.Close
koneksi.Open
End Sub

7. Setelah itu buat tombol koneksi di dalam Form