Cara Membuat Module Koneksi di vb 6.0 dan MySQL dengan ADODB

11/26/2015 1 Comment
bagaimana cara membuat koneksi vb 6.0 dan MySQL menggunakan adodb connection
Cara Mengkoneksikan Visual Basic ke MySQL - Pada awal tutorial mengenai visual basic 6.0 ini adalah bagaimana cara membuat koneksi vb 6.0 dan MySQL menggunakan adodb connection. disini saya menggunakan mysql connector ODBC 5.1. silakkan download dan install bagi teman-teman yang belum menginstal, jika butuh panduan silakkan kunjungi cara membuat koneksi dengan odbc 5.1.
Pada tutorial ini, saya asumsikan teman-teman sudah menginstall dan membuat koneksi dengan odbc. selanjutnya mari kita buat koneksi dengan adodb dengan langkah berikut:

Buat database

Tahap pertama adalah membuat database dengan menggunakan mysql, saya disini membuat database dengan nama biodata. teman-teman terserah membuat database dengan nama apa.

Buat File Module Pada VB

Buka visual basic 6.0 teman-teman dan buat file baru menggunakan standar exe. kemudian untuk mengaktifkan adodb silakkan teman-teman pilih menu Project > References kemudian cari modul Microsoft ActiveX Data Object 2.6 Library, centang dan OK. dengan begitu adodb sudah dapat di gunakan pada module teman-teman. selanjutnya klik kanan pada project sebelah kanan atas pilih add > module.

Deklarasi variable

Setelah aktif kita deklarasikan variable pada module tersebut, saya menggunakan variable conn dengan tipe public, kenapa public? karena variable ini akan kita gunakan pada form yang berhubungan langsung dengan database. Deklarasi variable nya kurang lebih seperti ini Public conn As New ADODB.Connection.

Buat Fungsi Koneksi

koneksi di vb 6.0 dan mysql dengan ADODB
Langkah selanjutnya adalah membuat fungsi koneksi, saya memberi nama fungsi nya dengan koneksi juga agar lebih mudah dipahami, berikut codenya
Function koneksi() As Boolean
    Set conn = New ADODB.Connection
    conn.Open "driver=mysql odbc 5.1 driver;server=localhost;user=root;database=biodata"
    conn.CursorLocation = adUseClient
    koneksi = True
End Function
Keterangan :
driver = mysql odbc 5.1 driver -> adalah driver yang kita gunakan
server = localhost
user = root
jika mysql teman-teman diberi password silakkan isi password juga dan database nya sesuai yang kita buat sebelumnya, saya menggunakan database biodata.

Buat submain pada module

Fungsi sub main disini adalah fungsi yang akan di load ketika program yang teman-teman buat di start. koding nya seperti berikut:
Sub main()
    If koneksi = True Then
        form1.show
    Else
        MsgBox "database gagal, coba sekali lagi"
        End
    End If
End Sub
membuat module koneksi di vb 6.0
Setelah itu, buka project > project1 properties dan pada tab general isi startup object dengan sub main yang telah kita buat tadi. kemudian start program yang teman-teman buat, jika berhasil akan muncul form1, jika gagal maka akan muncul message box database gagal. cukup mudah bukan membuat module koneksi di vb 6.0 dan mysql dengan ADODB, jika masih bingung silakkan kita diskusi di kolom komentar dibawah. terima kasih.