Cara menggunakan vb6 mysql

Salah satu kelebihan Visual Basic 6 menurutku adalah fleksibilitasnya dalam hal koneksi database. Visual Basic 6 memang tidak memiliki database bawaan, berbeda dengan aplikasi-aplikasi RAD pada jamannya seperti foxpro atau delphi 7. Foxpro memiliki database bawaan dan Delphi, meskipun dia bisa memakai database lain, namun dia juga memiliki database bawaaan. Dan pada akhirnya perkembangan database yang semakin pesat membuat bahasa pemrograman harus bisa terhubung dengan berbagai macam database, sehingga developer bisa memilih database yang dia sukai. Pada contoh kali ini kita akan mencoba.. ehmm sebenarnya bukan mencoba, karena kita akan mengkoneksikan visual basic 6 dengan MySQL beneran. Untuk mempermudah koneksi antara visual basic 6 dengan database MySQL, kita download terlebih dahulu driver/connectornya di: 

Cara Install MySQL ODBC Connector bisa dibaca di artikel dibawah ini:
cara install mysql odbc di windows

Step by Step koneksi vb6 ke MySQL: 

Sebelum memulai ritual koding, kamu harus membuat database di MySQL. sebagai contoh, sebut saja dia "toko". <-- Buat database dengan nama "toko"
 
1. Buka Visual Basic 6.
2. Buat tombol di Form1, beri nama "cmdKoneksi", beri caption "Hubungi Server"

Cara menggunakan vb6 mysql

3. Masukkan kode berikut di form1

DOWNLOAD SOURCE CODE

https://carakuvb6.blogspot.com/2018/07/cara-koneksi-databse-mysql-server-online-menggunakan-visual-basic-vb6.html

Cara koneksi database mysql server menggunakan Visual Basic 6.0 (VB6) admin rasa telah banyak dibahas, diweb-web yang ada diinternet termasuk didalam web ini ada yang menggunakan tipe koneksi string, odbc control pannel dan lain-lain, untuk kali ini admin akan menguraikan koneksi ke database mysql server versi online dengan VB6. Untuk website database mysql server admin menggunakan situs db4free.

Langsung saja klik situs db4free.net kemudian Signup, isikan secara lengkap form pendaftaran pembuatan database seperti gambar dibawah ini

Cara menggunakan vb6 mysql

Setelah selesai dalam penginputan pada form diatas kemudian ceklis I have read the conditions of use and I agree with them. Jangan lupa dalam penginputan MySQL database name dan MySQL username: harus menggunakan karakter underscore ( _ ) dan tanpa ada spasi. Klik tombol Signup. Jika berhasil maka akan tampil pemberitahuan seperti dibawah ini

Cara menggunakan vb6 mysql

Kemudian untuk selanjutnya klik menu PhpMyAdmin pada menu samping sebelah kiri

Cara menggunakan vb6 mysql

Maka akan muncul halaman login database

Cara menggunakan vb6 mysql

Login pada halaman diatas menggunakan user dan password yang telah kita buat diawal pembahasan artikel ini setelah masuk buatlah database dengan nama database terserah agan aja yang mudah diingat. Driver koneksi pada Visual Basic 6.0 yang admin gunakan MySQL Connector ODBC 5.3.4 Win32 bagi yang belum punya bisa didownload pada halaman download pada web ini. 

Buka Visual Basic 6.0 (VB6) kemudian aktifkan komponen Microsoft ActiveX Data Objects 2.8 Library (Klik menu Project - References - Microsoft ActiveX Data Objects 2.8 Library) kemudian klik OK. Tambahkan satu buah CommandButton (Tombol) kemudian double klik pada CommandButton dan copykan sintak dibawah ini

Dim CN As New ADODB.Connection

Dim nServer, nUser, nPass, nDatabase As String

nServer = "www.db4free.net"

nUser = "dian_01"

nDatabase = "penjualan_01"

nPass = untuk password menyesuaikan

On Error GoTo ErrKoneksi

CN.CursorLocation = adUseClient

CN.ConnectionString = "DRIVER={MySQL ODBC 5.3 ANSI Driver};" & _

"SERVER=" & nServer & " ;Port=3306;DATABASE=" & nDatabase & ";" & _

"UID=" & nUser & " ;PWD=" & nPass & ";OPTION=3"

CN.Open

MsgBox "Koneksi Database Server Sukses", vbInformation, "informasi"

Exit Sub

ErrKoneksi:

MsgBox "Koneksi database Error.. " & vbCrLf & Err.Description & Err.Number, vbCritical, "Error Koneksi Database"

Exit Sub

RUN/F5 dan coba klik CommandButton (Tombol) selama User, Password, Nama database, Server benar dan sesuai dengan pendaftaran diawal tadi maka koneksi database MySQL Server Online akan sukses

Cara menggunakan vb6 mysql

Semoga pembahasan artkel Cara Koneksi Databse MySQL Server Online Menggunakan Visual Basic 6.0 (VB6) dapat bermanfaat