- Buat Module baru
- Ketik/ copy script berikut ini (sesuaikan dengan database Anda)
Public Sub buka()
Set conn = New ADODB.Connection
strprov = "Driver={MySQL ODBC 3.51 Driver};server=localhost;database=tbmaster;user=root;password="
conn.ConnectionString = strprov
conn.CursorLocation = adUseClient
conn.Open
End Sub
Public Sub tutup()
conn.Close
End Sub
- Simpan dengan nama koneksi (bisa di custom sendiri)
- Kembali ke form yang Anda buat (klik 2 x)
- pada General Declaration ketik Public koneksi
- Pada Form Load ketik buka
- Pada Form Activate buat script untuk menampilkan database
- Selesai
0 Response to "Koneksi Visual Basic 6.0 dengan MySQL"
Posting Komentar