Kamis, 04 Februari 2016

Mengisi Data Dari Mysql Ke DataGridView Di Visual Basic .Net


Pada postingan kali ini kita akan mencoba untuk mengisi data dari database mysql ke DataGridView di Visual Basic .Net. Sebelum memulai pastikan Anda telah menginstall Mysql Connector untuk Visual Studio, jika belum Anda dapat mendownload dll library yang saya berikan pada akhir postingan ini.

Nantinya hasil akhir dari program akan menjadi seperti berikut :




Berikut langkah-langkahnya :

  1. Buatlah project baru dengan memilih File > New > Project

  2. Masukkan beberapa control dan ubah name serta text pada masing-masing control sesuai dengan tabel berikut
    NameTextType
    server-TextBox
    user-TextBox
    password-TextBox
    cmbDatabase-ComboBox
    Label1ServerLabel
    Label2UserLabel
    Label3PasswordLabel
    Label4DatabaseLabel
    DGV-DataGridView
    showDataShow DataButton
    getDatabaseGet DatabaseButton
  3. Sesuaikan letak setiap control sesuai dengan gambar hasil akhir program.
  4. Sekarang inisialisasikan variabel yang akan kita gunakan
    Dim conn As MySqlConnection
    Dim cmd As MySqlCommand
    Dim dr As MySqlDataReader
    Dim connStr As String
  5. Setelah itu klik 2x pada button Get Database kemudian masukan coding berikut
    If Not conn Is Nothing Then ' Jika ada koneksi terhubung
    conn.Close() 'tutup koneksi yang terhubung
    End If
    'Membuat ConnectionString berdasarkan data yang diisi pada textbox
    connStr = String.Format("server={0};user id={1}; password={2}; database={3};",
    server.Text, userid.Text, password.Text, cmbDatabase.Text)

    Try
    conn = New MySqlConnection(connStr) 'Membuat koneksi mysql baru
    conn.Open() 'Membuka koneksi mysql
    GetDatabases() 'sub untuk mengambil daftar database di mysql dan menambahkannya ke cmbDatabase
    conn.Close() 'menutup koneksi
    Catch ex As MySqlException
    MessageBox.Show("Error connecting to the server: " + ex.Message)
    End Try
  6. Buat sub baru & beri nama GetDatabase atau copy coding berikut
    Private Sub GetDatabases()
    Dim cmd As New MySqlCommand("SHOW DATABASES", conn)
    Try
    dr = cmd.ExecuteReader()
    ComboBox1.Items.Clear()

    While (dr.Read())
    ComboBox1.Items.Add(dr.GetString(0))
    End While
    Catch ex As MySqlException
    MessageBox.Show("Failed to populate database list: " + ex.Message)
    Finally
    If Not dr Is Nothing Then dr.Close()
    End Try

    End Sub
  7. Kembali ke desain tampilan form kemudian klik 2x pada tombol Show Database, masukkan coding berikut
    If conn Is Nothing Or Not conn.State = ConnectionState.Open Then 'jika tidak ada koneksi atau koneksi mysql tidak dibuka
    'Membuat ConnectionString berdasarkan data yang diisi pada textbox
    connStr = String.Format("server={0};user id={1}; password={2}; database={3};",
    server.Text, userid.Text, password.Text, ComboBox1.Text)
    'Membuat koneksi mysql baru
    conn = New MySqlConnection(connStr)
    'membuka koneksi mysql
    conn.Open()
    End If
    'mysqlcommand untuk memilih semua kolom pada tabel user
    cmd = New MySqlCommand("Select * from user", conn)
    dr = cmd.ExecuteReader
    'Membersihkan Semua Baris di DataGridView
    DGV.Rows.Clear()
    Do While dr.Read
    'Menambahkan baris baru pada DataGridView
    DGV.Rows.Add(dr.Item("id"), dr.Item("nama"), dr.Item("gender"), dr.Item("no_hp"))
    Loop
    conn.Close()
  8. Kembali ke tampilan desain form kemudian tambahkan 4 kolom pada DataGridView


  9. Untuk servernya Anda bisa menggunakan xampp yang bisa didownload disini, setelah itu buat database baru di mysql melalui phpmyadmin dan import sql yang dapat Anda download disini ke database yang Anda buat.

Hasil Akhir



Cara import Mysql Connector Dll file dapat Anda lihat tutorialnya melalui video berikut



Semoga Bermanfaat :)