Cara/belajar/tehnik providerDSN koneksi database accessvb6

-->

Tehnik buat provider database access dengan system DSN vb6

Ada beberapa cara untuk mengkoneksikan database ke program/project yang kita buat, baik menggunakan MYSQL ODBC konektor atau langsung mengkoneksikan database accsess seperti yang sudah saya ulas sebelumnya dengan Microsoft access driver.

Pertama anda bisa copy paste dari goggleling atau anda mau belajar bagaimana cara mengetahui jenis provider/jembatan penghubung antara database dengan project yang anda buat.

Adapun provider yang sering digunakan adalah sebagai berikut :

1. Microsoft jet OLE DB 4.0 provider

“Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\DeliveryNote\DN.mdb;Persist Security Info=False”

Note : :\DeliveryNote\DN.mdb adalah lokasi database disimpan. Gunakan “ App-path” apabila server berada pada computer lain.

Contoh : 
“Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path &”\DN.mdb;Persist Security Info=False”

2. Microsoft OLE DB provider for ODBC driver

“Provider=MSDASQL.1;Persist Security Info=False;Data Source=kon”

Note : “kon” adalah nama DSN anda.

Belum tau cara buat system DSN ODBC…!!!

Berikut seketsa alurnya :

Urutan klik : Control panel → Data source (ODBC) → System DSN → ADD [pilih Microsoft access driver → finish] → [ isi [data source name]] → Select [cari database anda] → OK         Jadi dech…system maklarnya…

Nah…yang jadi pertanyaannya adalah bagaiana membuat jembatan tersebut supaya bisa menghubungkan antara database dengan project yang anda buat.

Untuk point no 1, silahkan anda buka halaman “cara mengkoneksikan database access” sementara untuk point ke 2 (dua) adalah sebagai berikut :

Public Function koneksi() As Boolean

‘On Error GoTo pesan

   ' db.Mode = adModeReadWrite

'    db.CursorLocation = adUseClient

'If db.State = adStateOpen Then

 '   db.Close

'End If

'db.Open ("Provider=MSDASQL.1;Persist Security Info=False;Data Source=kon ")

'koneksi = True

'Exit Function

'pesan:

'koneksi = False

'MsgBox "Koneksi ke database gagal...!!!!", 16, "Error"

'End

End Function

Note : kalo mau copy paste [copas] hilangkan tanda petik [‘] yang paling depan disetiap barisnya.

Dengan menggunakan koneksi ODBC driver anda tidak perlu buat App-path

Silahkan anda masukkan pada module supaya bisa dipanggil disetiap form anda. Jangan lupa buat variable public sbb :

• Option Explicit
• Public db As New ADODB.Connection
• Public rs As New ADODB.Recordset
• Public Sql As String

Selesai…buat modulenya…

Hubungkan form dengan module dengan memasukkan kata kunci sbb :

Private sub form1_load (Index As Integer )

Call koneksi

End sub

Selesai sudah cara buat provider koneksi dengan database access.

Bagi anda yang suka menggunakan MYSQL ODBC silahkan masuk ke Cara mudah mengkoneksikan vb6 keMYSQL

Tweet

Artikel terkait :

Koneksi Database

• Cara mudah mengkoneksikan vb6 keMYSQL
• Mengkoneksikan database access vb 6

VisualBasic 6.0

• Cara mudah migrasi Database Access ke SQL Server
• Cara Buat Ballontext Module VB6
• Background MDIForm Dengan Warna Vb6
• Import Data From Excell vb6
• Download SQLServer2005 SMMSEE+Windows Installer 3.1+Microsoft .NET FrameWork 2.0 [SP2]
• Skin Form VB6 Dinamis
• Manual Instalation ARShoft Shoftware Koperasi
• Download WMSAplikasi Pergudangan byARShoft
• EAN BarcodeScrip Codevb6 Project
• Export listview vb6 | Database Access Ke Excel
• Pencarian | Searching Item Listview vb6
• TextBox Control Event Item_Click/DoubleClick Listview vb6
• Simpan Photo/Gambar database access vb 6
• Menampilkan data listview vb6 common control
• IsButton.ocx untuk vb6 + sourcecode
• Flow Proses Buat Laporan Crystal Report10
• Cara Mudah Dan Praktis Buat Form Data BarangVB6
• Cara mudah buat laporan CrystalReport
• Cara buat prosedure center form
• Cara mudah mengkoneksikan vb6 keMYSQL
• Cara Mudah Sorted CrystalReport 10 | Selection formula CR10
• Cursor jam analog | visual basic 6.0 | Belajar pemrograman | Buat jam analog
• Mengkoneksikan database access vb 6
• Cara mudah dan Praktis, Buat Form Login