Tuesday, August 24, 2010

Teknik dasar menghubungkan VB6 dengan ODBC

VB6, walau sudah termasuk uzur, sampai dengan sekarang masih banyak digunakan. VB juga digunakan sebagai bahasa macro dalam software microsoft office. kemampuannya dalam berkoneksi dalam database lain juga patut dijadikan pertimbangan. berikut ini script sederhana menghubungkan VB6 dengan ODBC. saya menggunakan MySQL 6.0 dengan driver mysql-connector-odbc-3.51.27-win32 karena versi ini lebih stabil dari driver terbaru mysql-connector-odbc-5.1.6-win32. sampai dengan sekarang, pihak pengembang mysql masih menyempurnakan bug-bug yang terdapat dalam paket driver terbaru tersebut.


Dim con As ADODB.Connection
Dim rs As ADODB.Recordset

Set con = New ADODB.Connection
Set rs = New ADODB.Recordset

'DSN, UID, dan PWD diisi menyesuaikan dengan konfigurasi ODBC anda
con.ConnectionString = "DSN=kuliah;UID=root;PWD=cahjoesss"
con.Open

rs.Open "Select * from inbox ", con, adOpenDynamic, adLockOptimistic
rs.Close

No comments:

Post a Comment