Koneksi Visual Basic 6 ke MySQL

Buatlah prosedur baru di form MDI anda atau di Module (dan pastikan kalau di Module, prosedur anda adalah Public sehingga dapat dipanggil dari form utama anda). Berikan nama prosedur itu yang mewakili dengan koneksi anda. Misalnya, buat koneksi.

Prosedurnya adalah sbb:

Private Sub buat_koneksi()

Dim ConnString As String

Dim db_name As String

Dim db_server As String

Dim db_port As String

Dim db_user As String

Dim db_pass As String

‘//error traping

On Error GoTo buat_koneksi_Error

‘/isi variable

db_name = “databaseku”

db_server = “localhost” ‘ganti jika server anda ada di komputer lain

db_port = “3306” ‘default port is 3306

db_user = “root” ‘sebaiknya pakai username lain.

db_pass = “password_anda”

‘/buat connection string

ConnString = “DRIVER={MySQL ODBC 3.51 Driver};SERVER=” & db_server & “;DATABASE=” & db_name & “;UID=” & db_user & “;PWD=” & db_pass & “;PORT=” & db_port & “;OPTION=3”

‘/buka koneksi

With Conn

.ConnectionString = ConnString

.Open

End With

‘___________________________________________________________

On Error GoTo 0

Exit Sub

buat_koneksi_Error:

MsgBox “Ada kesalahan dengan server, periksa apakah server sudah berjalan !”, vbInformation, “Cek Server”

End Sub

Untuk memanggil prosedur itu, cukup panggil di form utama anda (atau form dimana anda mau memulai koneksi anda) dengan mengetik

call buka_koneksi

Dan jangan lupa untuk membuat object Conn dulu dan biasanya variable Conn ini dibuat secara Public sehingga bisa dipanggil dimana saja. Biasaya saya buat disuatu Module yang isinya adalah koleksi variable Public. Nyatakan variable tersebut dengan menuliskan:

Public Conn As New ADODB.Connection

Dan seperti biasa, ketika anda menutup aplikasi, anda harus menutup dulu koneksi anda ke MySQL. Biasanya prosedur tutup koneksi ini saya taruh di blok MDIForm_Unload.

If Conn.State = adStateOpen Or Conn.State = adStateConnecting

Then

Conn.Close

Set Conn = Nothing

End If

Thank’s to

One thought on “Koneksi Visual Basic 6 ke MySQL

  1. Gan ane mo tanya ne…module koneksi ini sudah bisa digunakan ga pada saat instal progran yg sudah jadi kekomputer org lain yg belum ada driver ODBC nya…..

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s