8 Juni 2018

Menghubungkan Aplikasi VB Net Dengan Database MySQL atau Access

Setelah membahas mengenai cara mempercantik form, maka dalam artikel ini kita akan mempelajari metode atau cara menghubungkan database MySQL atau Access dengan aplikasi yang kita buat menggunakan VB Net.
Menghubungkan Aplikasi VB Net Dengan Database MySQL atau Access Untuk menghubungkan kedua jenis database tersebut kita akan menggunakan sebuah module. Sebelum melanjutkan tutorial ini, kami meminta anda untuk mengetahui beberapa kondisi yang harus dipenuhi jika anda ingin menghubungkan aplikasi yang diprogram menggunakan VB Net dengan database Access atau MySQL :
  1. Bisa membuat database, baik di MySQL maupun Access
  2. Databasenya sudah dibuat atau tersedia
  3. Sudah tersedia proyek VB Net
  4. Tersedia ADO.Net Driver untuk MySQL (Download) dan install.
  5. Plugin DevExpress, minimal versi 14.x. (Download versi trial)
Jika kondisi di atas sudah terpenuhi, maka silahkan simak baik-baik panduan berikut ini :
  • Buka proyek VB Net yang akan anda hubungkan dengan database
  • Tambahkan referensi MySqlData melalui Project Properties. Klik Project -> Properties -> References -> Add -> Browse (arahkan ke direktori tempat menginstall ADO.Net Driver for MySQL -> Pilih MySqlData.dll -> OK; atau
Menghubungkan Aplikasi VB Net Dengan Database MySQL atau Access
menghubungkan database mysql dengan vb net
Menghubungkan Aplikasi VB Net Dengan Database MySQL atau Access
  • Tambahkan referensi MySqlData dengan cara copy paste file MySQLData.dll ke folder Debug aplikasi yang sedang anda buat.
Menghubungkan Aplikasi VB Net Dengan Database MySQL atau Access
  • Buatlah sebuah modul di VB Net, beri nama sesuai keingingan (lihat gambar di bawah), klik Add kemudian tambahkan kode yang ada di bawah gambar ini :
Menghubungkan Aplikasi VB Net Dengan Database MySQL atau Access
Kode Untuk Menghubungkan Dengan Database MySQL atau MariaDB
Imports MySql.Data.MySqlClient

Module DBConMod
    Public CONN As MySqlConnection
    Public CMD As MySqlCommand
    Public DA As MySqlDataAdapter
    Public DR As MySqlDataReader
    Public STR As String
    Public DS As New DataSet

    Public Sub Koneksi()
        CONN = New MySqlConnection("server=localhost;database=databasemysqlormariadbanda;uid=root;pwd=passworddbanda")
        If CONN.State = ConnectionState.Closed Then
            CONN.Open()
        End If
    End Sub

    Public Sub Diskonek()
        CONN.Dispose()
        CONN.Close()
    End Sub

End Module
Kode Untuk Menghubungkan Dengan Database Microsoft Access 2007-2016
Imports System.Data.OleDb

Module KIRConn
    Public CONN As OleDbConnection
    Public DA As OleDbDataAdapter
    Public DS As DataSet
    Public CMD As OleDbCommand
    Public DR As OleDbDataReader
    Public STR As String

    Public Sub Koneksi()
        STR = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=databaseaccessanda.accdb;Persist Security Info=True;Jet OLEDB:Database Password=passworddbanda"
        CONN = New OleDbConnection(STR)
        If CONN.State = ConnectionState.Closed Then
            CONN.Open()
        End If
    End Sub
End Module
Setelah menambahkan kode di atas, silahkan buka kembali form utama (sesuaikan dengan form yang ada di aplikasi anda). Masuklah ke mode desain dan tambahkan komponen DevExpress GridControl (lihat gambar dibawah) lalu sesuaikan ukuran Grid sesuai kebutuhan masing-masing :
Menghubungkan Aplikasi VB Net Dengan Database MySQL atau Access Selanjutnya adalah masuk ke mode Code (tekan F7 pada saat anda berada di dalam mode desain) kemudian masukkan kode berikut ini supaya aplikasi anda memuat dan menampilkan data dari database ketika program dijalankan :
Imports MySql.Data.MySqlClient

Public Class RujitApp
    Private Sub RujitApp_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Call Koneksi()
        DA = New MySqlDataAdapter("Select * From tbl_rujit", CONN)
        DS = New DataSet
        DS.Clear()
        DA.Fill(DS, "tbl_rujit")
        GridControl1.DataSource = DS.Tables("tbl_rujit")
        Call Diskonek()
    End Sub
End Class
Setelah itu silahkan jalankan aplikasi anda. Jika anda mengikuti semua tahapan di atas dengan benar, maka aplikasi yang anda buat seharusnya berjalan dengan normal sekaligus akan menampilkan data dari database seperti yang terlihat pada gambar berikut ini :
Menghubungkan Aplikasi VB Net Dengan Database MySQL atau Access Bagaimana, mudah bukan? Kami harap anda bisa mendapatkan manfaat dari tutorial VB Net ini, silahkan tinggalkan pesan jika ada yang ingin ditanyakan dan selamat menikmati artikel lainnya.