Semua Tombol Berfungsi Sesuai Dengan Nama tombol
Alternatif kedua Sebagai Berikut
Script untuk membuat koneksi database dengan VB6 adalah sebagai berikut
Penjelasan dari script di atasPublic Sub hubung()Set db = New ADODB.Connection
db.Open "Provider = microsoft.jet.oledb.4.0;data source=" & App.Path & "/dblatihan.mdb"
End Sub
Public sub hubung () merupakan nama function global yang dibuat di dalam modul VB sehingga dapat dipanggil di semua form dalam sebuah project
Db adalah variabel global yang dibuat di dalam modul
Set db=new ADODB.Connection
Script ini digunakan untuk mengeset variabel db menjadi koneksi vb dengan database.
db.Open "Provider = microsoft.jet.oledb.4.0;data source=" & App.Path & "/dblatihan.mdb"
script ini digunakan untuk memerintahkan kepada variabel db membuka database yang bernama dblatihan.mdb
Selamat mencoba
Posting Komentar