Koneksi Database MySQL dan VB (Visual Basic)

Koneksi Database MySQL dan VB >>

Koneksi Database MySQL dan VB awalnya bagi saya merupakan sesuatu yang cukup sulit (error terus). Kali ini saya akan berbagi tentang pemrograman database menggunakan bahasa pemrograman VB dan database MySQL. Pada tulisan ini, saya akan membuat contoh sederhana yang merupakan bagian dari tulisan saya 🙂 sebelumnya mengenai koneksi database VB dan MySQL tanpa My ODBC Drivers. Masih sama dengan tulisan sebelumnya, bahwa saya menggunakan komponen vbmysqldirect yang bisa diunduh pada halaman download. Ok langsung saja… 🙂

Pertama buat buka project baru dan form baru pada program VB dikomputer Anda. jangan lupa tambahkan vbmysqldirect melalui project –> references –> VB MySQL Direct V1.0. Selanjutnya buat design form koneksi database seperti gambar berikut ini:

Keterangan Objek :

1. Name : txtServer

2. Name : txtUser

3. Name : txtPass

4. Name : txtDatabase

5. Name : txtPort

6. Name : CmdCancel

7. Name : CmdKoneksi

Apabila design dan penamaan objeknya sudah, sekarang waktunya melengkapi source codenya. Silahkan Anda ketikkan source lengkapnya seperti berikut ini:

Dim koneksi As New MYSQL_CONNECTION
Dim rs As New MYSQL_RS
Private Sub cmdCancel_Click()
End
End Sub

Private Sub cmdKoneksi_Click()
On Error GoTo salah
koneksi.OpenConnection txtServer, txtuser, txtpass, txtdatabase, Val(txtport)
If koneksi.State = MY_CONN_OPEN Then
MsgBox "Koneksi Berhasil", vbInformation, "informasi"
End If
Exit Sub
salah:
MsgBox "Pengisian data salah, kode kesalahan : " & Err.Number,
vbCritical, "Peringatan"
End Sub

Selamat mencoba membuat program untuk koneksi database MySQL dan VB. 🙂

Semoga berhasil.

Leave your comment here:

Click here to cancel reply.

Name (required)

Mail (will not be published) (required)

Website (Optional)

Subscribe to comments feed

Δ

CAPTCHA Code *