VB.NET Koneksi Database MySQL dengan ODBC

Sudah sangat lama rasanya blog ini tanpa ada artikel baru, namun SteemPress mebuat saya ingin menulis lagi walau ini hanya untuk berujicoba dan adu nasib di steemit menggunakan media blog. Abaikan saja niatnya, yang pengting artikel jadi walau sangat sederhana.

Microsoft mengelurakn versi terbaru untuk produk Visual Studio baik yang community edition,  professional edition maupun enterprise edition. Punulis menggunakan community edition karena gratis walau terbatas dalam fungsi. Untuk perbedaan ketiga edisi tersebut akan kita bahasa pada artikel yang lain.

Untuk bisa terkoneksi ke database dengan engine MySQL anda tentu harus sudag memiliki MySQL server, kalau belum ada silahkan install dulu. Kalau sudah ada selanjutnya kita install MySQL ODBC sebagai konektor antara Visual Studio (aplikasi yang kita bangun) dengan MySQL database. Lalu pertanyaannya Kenapa MySQL? ya karena MySQL punya versi gratis tanpa ada batasan query dan space, kalau MSSQL yang maksimum 10GB 😀

Kita lanjutkan untuk proses instalasi MySQL ODBC, pertama unduh dulu dari website MySQL pada link ini  (klik pada Looking for previous GA versions? untuk versi lama), dalam hal ini penulis memilih versi 3.51 ansi karena konon katanya lebih stabil. Ikut step-by-step proses instalasi sampai selesai.

Setelah selesai buka aplikasi Visual Studio dan buat proyek baru, sesuaikan nama dan lokasi penyimpanan proyek sesuai keinginan anda, jangan lupa pilih Net Framework version (Penulis pakai 3.5 karena lebih stabil).

cara buat project bari visual studio 2017

Lalu klik Project > Add Modul

berinama modul sesuai keinginan dan ketikkan kode berikut ini:

Imports System.Data.Odbc

Module Connection
    Dim ConnStr As String = "DRIVER={MySQL ODBC 3.51 Driver}; SERVER=localhost; UID=root; PWD=nanggroe; DATABASE=penjualan"
    Public Conn As OdbcConnection
    Public DA As OdbcDataAdapter
    Public DS As DataSet
    Public CMD As OdbcCommand
    Public RD As OdbcDataReader

    Public Sub Koneksi()
        Try
            Conn = New OdbcConnection(ConnStr)
            Conn.Open()
        Catch ex As Exception
            MsgBox("Koneksi Gagal")
        End Try
    End Sub
End Module

Ya begitulah kira-kira script koneksi database MySQL menggunakan ODBC driver pada VB.net, semoga berguna.

Leave a Reply

Your email address will not be published. Required fields are marked *