KONEKSI DATABASE VB 6 SQL SERVER 2000, 2008 DAN MYSQL
Selamat datang di tutorial sederhana ini, mumpung ada kesempatan dan pengen nulis, berikut ini saya bagikan langkah-langkah koneksi database menggunakan visual basic 6 ke SQL Server 2000 atau My SQL. Project reference yang harus di setting:
"Microsoft ActiveX Data Object 2.8 Library" –referensi untuk koneksi dengan database SQL Server "Microsoft DAO 3.51 Object Library" – referensi untuk koneksi dengan database MySQL
Sobat perlu menginstal “mysql-connector-odbc-5.1.8-win32.msi” di http://dev.mysql.com/downloads/connector/odbc/5.1.html, agar bisa koneksi ke database MySQL
Langkah-langkah pengerjaannya adalah sebagai berikut: 1. Tambahkan modul baru lalu ketikkan variabel-variabel untuk settingan koneksi database:
2. Buat fungsi untuk masing-masing koneksi database. Saya menggunakan type public agar bisa di akses di form:
Figure 1: Koneksi SQL Server
Figure 2: Koneksi MySQL
3. Setelah fungsi koneksi dibuat, saatnya membuat Sub Prosedur untuk koneksi dan pemanggilan perintah SQL Syntax:
Figure 3: Set variabel Query dengan SQL Syntax
Figure 4: Akses Database SQL Server
4. Gunakanlah Tombol atau perintah lainnya untuk menjalankan Proses Koneksi Database, misalnya
Rangkuman Variabel: Public Query As String – variabel untuk menyimpan SQL Syntax yang hendak di jalankan
Rangkuman Fungsi di Modul: Public Function openSQLServer – untuk koneksi awal database SQL Server Public Function openSQL – untuk koneksi awal database MySQL
Rangkuman Fungsi di FORM: Public Sub mSQLServer(mQuery As String) – Menjalankan perintah SQL Syntax untuk SQL Server Public Sub mSQL(mQuery As String) – Menjalankan perintah SQL Syntax untuk MySQL
Koneksi Database SQL Server
Koneksi Database MySql
Figure 5: Contoh Screenshoot
Sekian tutorial yang bisa saya bagikan, semoga bermanfaat untuk sobat sekalian..kurang lebihnya bisa ditanyakan. Sengaja pakai screen shoot supaya memudahkan kita mengerti alur koneksi databasenya, ketimbang langsung Copypaste. hehe Salam, Debrian Ruhut Saragih Blog: http://debrianruhut.blogspot.com Twitter: @debrianruhut