Buat database :
perpustakaan
Buat tabel :
anggota
Desain Form
Untuk koneksi ke database MySQL menggunakan object ADODB. Sebelumnya aktifkan dulu ADODB nya. Caranya Klik Menu Project - References.. lalu ceklis Microsoft ActiveX Data Object 2.6 Library.
Kemudian ketik coding koneksi berikut ini di Module
Public con As New ADODB.Connection
Public rs As New ADODB.Recordset
Public Sub koneksi()
Set con = New ADODB.Connection
Set rs = New ADODB.Recordset
con.Open "Driver={MySQL ODBC 3.51 Driver};server=localhost;database=perpustakaan; uid=root;pwd =password"
con.CursorLocation = adUseClient
End Sub
Untuk menampilkan record tabel ke DataGrid, coding nya :
Private Sub Form_Load()
Call koneksi
If rs.State Then rs.Close
rs.Open "select * from anggota", con
Set DataGrid1.DataSource = rs
End Sub
Penjelasan:
Coding di Modul
Variabel con digunakan sebagai objek untuk koneksi ke database
Variabel rs digunakan sebagai objek untuk koneksi ke tabel
Nama variabel bebas tapi ada aturan mainnya (masih inget kan??)
Untuk koneksi ke database MySQL dibutuhkan driver dan penulis menggunakan
MYSQL ODBC 3.51 yang harus diinstal terebih dahulu.
uid=user id; dan
pwd =password untuk masuk ke phpMyAdmin. Untuk user nya "root" dan passwordnya disesuaikan.
CursorLocation=adUseClient --> meletakkan kursor ke database Client
Coding di Form_Load
Call koneksi = memanggil sub koneksi
If rs.State =jika tabel dalam kondisi diam tidak ada aksi ataupun sedang terbuka
then rs.Close= maka tabel akan tertutup
rs.Open "select * from anggota",con = menampilkan seluruh record yang ada di tabel anggota
Set DataGrid1.DataSource = rs --> menampilkan ke DataGrid