Untuk inisialisasi database, deklarasi variabel yang digunakan dapat dilihat pada segment program 4.1, dengan terlebih dahulu men-reference-kan sistem pada Microsoft ActiveX Data Objects 2.0 Library.
Segment program 4.1. Deklarasi Variabel Untuk Database
Global Cn As ADODB.Connection
Global Rs As ADODB.Recordset
Setelah melakukan deklarasi, terdapat beberapa langkah yang dilakukan agar database dapat terhubung. Langkah-langkah tersebut dapat dilihat pada segment program 4.2. yang terdapat pada procedure Sub_Main.
Segment Program 4.2. Code Untuk Database Connection
Set Cn = New ADODB.Connection
Set Rs = New ADODB.Recordset
Cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
loc & "\Data\list.MDB;Persist Security Info=False"
Cn.CursorLocation = adUseClient
Rs.Open "select * from d_user", Cn, adOpenKeyset, _
adLockOptimistic
Belum ada tanggapan untuk "Inisialisasi Database"
Posting Komentar