Conection String All Database with vb6 / vb.net (Koneksi Database)

Sebenarnya banyak cara untuk koneksi ke database, salah satunya adalah dengan via ODBC (Open Database Connectivity) yang menurut saya paling mudah (berdasarkan pengalaman sendiri). Adapun tahapannya adalah sebagai berikut :

1.Harus mempunyai ODBC, jika belum punya harus download dulu, cari saja di  google, contoh keyword nya : ODBC sqlserver atau ODBC mysql atau ODBC sqlite atau ODBC firebird atau ODBC oracle atau yang lainnya.

2.Untuk mengetahui ODBC apa saja yang terinstal di kompuer kita, bisa di cek di control panel --> Administrative Tools --> Data Sources (ODBC)

3.OK, selanjutnya langsung ke codingnya.Untuk Membuat Connection String, yang perlu diingat dan diperhatikan adalah kata DRIVER,SERVER,UID,PWD,DATABASE. Driver diisi dengan Driver Name seperti pada gambar diatas. Berikut ini contoh penggunaanya :

Dim ConStr As String
'Contoh Koneksi Ke SQLServer 2008
ConStr= "DRIVER=SQL Server Native Client 10.0;SERVER=djie_server\sql2008;UID=sa;PWD=123;DATABASE=djie_db"

'Contoh Koneksi Ke MySQL Server
ConStr= "DRIVER=MySQL ODBC 5.1 Driver;SERVER=djie_server;UID=root;PWD=123;DATABASE=djie_db"

 'Contoh Koneksi Ke SQLite 3
ConStr= "DRIVER=SQLite3 ODBC Driver;DATABASE=C:\djie_db.db3"

Jika kita ingin melakukan koneksi tanpa user dan password (Windows Authentication) maka cukup tambahkan  "Trusted_Connection=yes"

Untuk VB.6 Codingnya Adalah :
Dim djie_con As New ADODB.Connection
With djie_con
    .CursorLocation = adUseClient
    .Open ConSrt
    MsgBox "Connection OK", vbInformation, "Message"
End With

Untuk VB.NET Codingnya Adalah :
        Dim djie_con As New Odbc.OdbcConnection
        With djie_con
            .ConnectionString = ConStr
            .Open()
            MessageBox.Show("Connection OK", "Message", MessageBoxButtons.OK, MessageBoxIcon.Information)
        End With

Untuk download odbc driver nya silahkan kunjungi website berikut ini