Source Code Koneksi dari VB 6.0 ke Database Acces dan MySQL

Bagaimana caranya kita mengkoneksikan Visual Basic kita dengan Database Microsoft Acces dan MySQL secara bersamaan, berikut source code yang saya buat

DIM DbCon As ADODB.Connection

DIM DbLocal As ADODB.Connection

Sub Hubung

Set DbCon = New ADODB.Connection

DbCon.CursorLocation = adUseClient

On Error GoTo Error

‘—-Connection to MySQL

DbCon.Open “Provider=MSDASQL.1;Persist Security Info=False;Data Source=indraY”

On Error Resume Next

‘—- Connetion to Microsoft Acces

Set DbLocal = New ADODB.Connection

DbLocal.CursorLocation = adUseClient

DbLocal.Open “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\ Data.mdb;Persist Security Info=False”

On Error Resume Next

End Sub

13 thoughts on “Source Code Koneksi dari VB 6.0 ke Database Acces dan MySQL

    • manual pa auto … ???, pastinya untuk MySQL-nya ane lewatkan Odbc-connector mysqlnya, kalo ms-acces langsung nembak ke file mdb-nya gan brati manual kali ya … ?? :D

  1. untuk sintak atau kode2 sqlnya berpengaruh ngak… saya ingin impor database mysql ke acces ntar aplikasi vbnya dan acces kita burn di cd sebagai preview aplikasi VB sebenanrnya yg databasenya mysql. untuk itu apa hanya perlu ganti databse koneksinya trus masalah format data tanggal di acces dan myql yang berbeda bagaimana penyelesaiannya

    • selama ini yang saya lakukan format di acces pake text biasa bukan pake date/time, memang sya sndiri juga ngalami msalah sperti agan tpi begitu format di acces pake text jdi gak ada masalah

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Logout / Ubah )

Twitter picture

You are commenting using your Twitter account. Logout / Ubah )

Facebook photo

You are commenting using your Facebook account. Logout / Ubah )

Google+ photo

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s