Get documents about "MYSQL
Document Sample
116 KNOW-HOW CODING 03/2010
KONEKSI VB.NET
DENGAN MYSQL
Bagaimana membuat aplikasi VB.Net dengan “The world’s
most popular open source database”, MySQL?
Windra Swastika
APLIKASI database VB.Net, umumnya dibuat dengan meng- instalasi adalah dengan men-download versi Windows installer
gunakan database server MS-SQL Server atau MS-Access. (yang berukuran 5.9 MB), lalu menjalankannya.
Semuanya merupakan produk berbayar dari Microsoft, dan
cukup kompatibel satu dengan yang lainnya. Opsi lain untuk Membuat Koneksi
membangun aplikasi database dengan menggunakan VB.Net Sebelum membuat aplikasi yang sebenarnya, kita perlu melaku-
adalah menggunakan database server gratis, yaitu MySQL. kan uji coba koneksi antara VB.Net dengan MySQL. Langkah-
Versi terakhir yang paling stabil dari MySQL (pada saat tulisan langkahnya adalah:
ini dibuat) adalah versi 5.1, yang dapat di-download dengan 1. Kita buat sebuah project baru di VB.Net. (Gambar 2)
gratis pada alamat http://dev.mysql.com/downloads/. Namun 2. Sebelum kita dapat menggunakan Connector/NET dengan
untuk membuat aplikasi VB.Net dengan memanfaatkan data- VB.Net, kita perlu menambahkannya ke dalam project yang
base yang ada di MySQL, kita memerlukan suatu tool/library kita buat. Caranya adalah lewat menu Project >> Add Refer-
sebagai penghubung (connector) yang menghubungkan VB.Net ence. Pilih tab Browse, dan arahkan ke tempat melakukan
dengan MySQL. Pada artikel ini, kita akan menggunakan Con- instalasi Connector/NET. File yang kita pilih adalah MySQL.
nector/NET yang merupakan salah satu solusi terbaik untuk Data.dll. (Gambar 3)
menghubungkan .Net dengan database MySQL di antara tool 3. Pada Form, kita perlu menyiapkan beberapa textbox untuk
yang lain. Connector/NET juga dapat di-download dengan mengatur konfigurasi koneksi. Konfigurasi yang perlu diatur
gratis pada alamat http://dev.mysql.com/downloads/connec- adalah server, username, password, dan database.
tor/net/. Versi terakhir dari Connector/NET adalah versi 6.2.2 Bentuk form untuk mengatur konfigurasi ini adalah seperti
yang tersedia dalam 3 pilihan, yaitu versi noinstall, source code pada gambar 4.
dan Windows installer. Cara termudah untuk melakukan proses Pada form, ada 4 buah komponen textbox yang bernama
txtServer, txtUserName, txtPassword, txtDatabase, serta dua
buah button bernama cmdLogin dan cmdCancel.
4. Untuk source code, koneksinya diawali dengan import:
Imports MySql.Data.MySqlClient
5. Dilanjutkan dengan deklarasi koneksi dengan menggunakan
class MySqlConnection. Class MySqlConnection ini dapat
dikenali karena kita telah menyertakan referensi MySQL.
Data.dll:
Public Class Form1
Dim conn As MySqlConnection
6. Pada event click button login, kita melakukan koneksi da-
tabase MySQL. Yang perlu didefinisikan untuk melakukan
koneksi database adalah property ConnectionString. Pada
ConnectionString, kita perlu mendefinisikan nama server,
user id, password dan database yang hendak dikoneksikan:
Private Sub cmdLogin_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles cmdLogin.Click
Gambar 1. Proses instalasi Connector/NET 6.1.3.
03/2010 CODING KNOW-HOW 117
create database testkoneksi;
Cara lain, adalah dengan memanfaatkan aplikasi MySQL
Query Browser, yang merupakan tool GUI untuk mengolah
database pada MySQL. Aplikasi ini dapat di-download-
pada alamat: http://dev.mysql.com/downloads/gui-tools/
5.0.html.
9. Setelah database sukses dibuat, kita dapat menjalankan
program VB.Net untuk menguji apakah koneksi dapat dibuat
atau tidak. Konfigurasi standar yang kita masukkan adalah:
Server: localhost, Username: root, Password: [kosong], Da-
Gambar 2. Membuat project baru
di VB.Net tabase: testkoneksi. (Gambar 6)
10.Jika koneksi sukses, maka akan muncul tampilan bahwa
koneksi berhasil dilakukan. (Gambar 7)
Gambar 3. Menambahkan referensi
Connector/NET.
Query Data dari VB.Net
Saat membuat koneksi, kita memanfaatkan Class MySqlCon-
Gambar 4. Form untuk melakukan nection. Untuk mengolah data, kita memerlukan tiga class
koneksi database.
lainnya, yaitu:
conn = New MySqlConnection() 1 .MySqlCommand. Class ini digunakan digunakan untuk me-
conn.ConnectionString = “server=” & txtServer.Text & nerima query atau statement yang kemudian dikirimkan pada
“;” _ MySQL. Setelah query diterima oleh objek MySqlCommand,
& “user id=” & txtUsername.Text & “;” _ eksekusi akan dilanjutkan oleh objek MySqlDataAdapter.
& “password=” & txtPassword.Text & “;” _ 2. MySqlDataAdapter. Class ini menjadi penghubung antara
& “database=” & txtDatabase.text class MySqlConnection dan class DataTable. MySqlData-
Adapter dapat meng-query sebuah database, kemudian
Try me-load informasi hasilnya pada DataTable. Pada class ini
conn.Open() juga, kita dapat mem-bind data control dengan data pada
MessageBox.Show(“Connection Opened Successfully”) MySQL sehingga data control dapat secara otomatis terisi
conn.Close() dengan data sesuai dengan query yang diberikan.
Catch myerror As MySqlException 3. DataTable. Class ini digunakan untuk menampung isi dari
MessageBox.Show(“Error Connecting to Database: “ & sebuah query.
myerror.Message)
Finally Sebelumnya, kita akan membuat sebuah tabel yang dileng-
conn.Dispose() kapi dengan data dummy. Data ini, nantinya akan kita tampilkan
End Try dengan menggunakan query melalui VB.Net:
End Sub CREATE TABLE user (UserID char(20), Password char(40), Nama
Proses koneksi yang dilakukan merupakan proses yang rawan char(30), TanggalLahir date, JenisKelamin char(1));
kesalahan, seperti misalnya ketika MySQL belum diaktifkan, INSERT INTO user VALUES (‘Huwey’,’Passkwak123’,’Bebek
user name dan password tidak sesuai, database tidak dite- Kwak’,’2004-02-10’,’M’);
mukan, dan sebagainya. Untuk itu, kita perlu melakukan
pencegatan dengan blok Try … Catch … Finally. Dengan
demikian, jika terjadi kesalahan, pencegatan dapat dilakukan
tanpa harus keluar dari program.
7. Untuk button cancel, kita berikan pencegatan agar program
berhenti:
Private Sub cmdCancel_Click(ByVal sender As System.
Object, ByVal e As System.EventArgs) Handles cmdCancel.
Click Gambar 5. Membuat database melalui console.
Application.Exit()
End Sub
8. Hingga tahap ini, pembuatan aplikasi untuk melakukan
koneksi dengan MySQL telah selesai. Namun, sebelum
mencoba apakah koneksi dapat dilakukan, kita perlu untuk
membuat database pada MySQL terlebih dulu. Cara untuk
membuat database adalah melalui MySQL console (MySQL.
exe), dan mengetikkan perintah SQL. (Gambar 5): Gambar 6. Menguji koneksi. Gambar 7. Koneksi telah sukses.
118 KNOW-HOW CODING 03/2010
& “user id=root;” _
& “password=;” _
& “database=testkoneksi”
Try
conn.Open()
Try
myCommand.Connection = conn
myCommand.CommandText = SQL
myAdapter.SelectCommand = myCommand
myAdapter.Fill(myData)
Gambar 8. Mengeksekusi perintah melalui MySQL Console. dgvStatus.DataSource = myData
dgvStatus.AutoSizeRowsMode = DataGridViewAutoSize
INSERT INTO user VALUES (‘Duwey’,’kwek222’,’Bebek RowsMode.AllCells
Kwek’,’2005-04-1’,’M’); Catch myerror As MySqlException
INSERT INTO user VALUES (‘Louie’,’5543kwik’,’Bebek MsgBox(“There was an error reading from the
Kwik’,’2004-8-21’,’M’); database: “ & myerror.Message)
INSERT INTO user VALUES (‘Daisy’,’t1t1’,’Tante Desi’,’2003- End Try
5-12’,’F’); Catch myerror As MySqlException
INSERT INTO user VALUES (‘Donald’,’b3b3kt4t4’,’Paman MessageBox.Show(“Error connecting to the
Donal’,’2002-03-5’,’F’); database: “ & myerror.Message)
INSERT INTO user VALUES (‘Della’,’d3lla’,’Tante Finally
Della’,’2004-06-17’,’F’); If conn.State <> ConnectionState.Closed Then
Perintah SQL di atas dapat diketikkan melalui MySQL Console conn.Close()
ataupun MySQL Query Browser. Jika perintah di atas berhasil, End Try
maka akan terbentuk tabel yang bernama user dengan 6 record End Sub
di dalamnya. (Gambar 8) End Class
Setelah data berhasil disimpan dalam tabel user, kita mem- 4. Jika program dijalankan, maka tampilan yang didapatkan
buat proyek baru yang tujuan akhirnya adalah mengeksekusi adalah seperti pada gambar 10.
query pada database testkoneksi dengan query sederhana,
serta menampilkan hasil query tersebut pada aplikasi VB.Net. Penutup
Langkah-langkahnya adalah sebagai berikut: Dengan kemampuan untuk mengeksekusi query, maka pen-
1. Buat proyek baru dengan dua buah komponen, yaitu Da- golahan data pada tabel dapat dengan leluasa dilakukan
taGridView dengan nama dgvStatus, dan sebuah button (mengingat semua perintah pengolahan data dapat dilakukan
untuk me-refresh data dengan nama btnRefresh. dengan perintah SQL). Kita dapat mengembangkan aplikasi
2. Pada awal source code, kita tambahkan statement import: ini agar menjadi aplikasi yang dapat melakukan update, insert
Imports MySql.Data.MySqlClient atau delete data. Semoga berguna.
Imports System.Data
3. Inti dari program ini adalah pada button refresh yang di- Windra Swastika adalah dosen tetap Program Studi Sistem Informasi, Universitas
Ma Chung
gunakan untuk menampilkan data query ke grid. Source
code-nya adalah sebagai berikut:
Public Class Form1
Private Sub btnRefresh_Click(ByVal sender As System.
Object, ByVal e As System.EventArgs) Handles btnRefresh.
Click
Dim conn As New MySqlConnection
Dim myCommand As New MySqlCommand
Dim myAdapter As New MySqlDataAdapter Gambar 9. Rancangan
form untuk menampilkan
Dim myData As New DataTable hasil query. Gambar 10. Tampilan data.
Dim SQL As String
LEBIH LANJUT
SQL = “SELECT * FROM user”
http://www.vbmysql.com/articles/vbnet-mysql-tutorials/
conn.ConnectionString = “server=localhost;” _
