untuk di module bisa gunakan seperti ini:
Public cn As New ADODB.Connection ' menciptakan objek
Public Sub CNopen() 'fungsi untuk connectnya, ini yang tar dipanggil di form
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
App.Path & "\namadatabase.mdb;Persist Security Info=False"
cn.CursorLocation = adUseClient
cn.Open
End Sub
'ini untuk menutup connection
Public Sub CNclose()
If cn.State = adStateOpen Then cn.Close
End Sub
Untuk di formnya, cukup dipanggil nama fungsi koneksinya bila ingin
memanipulasi database
untuk menbukanya memanggil CNopen
untuk menutup CNclose
Silent <[EMAIL PROTECTED]> wrote: Dear VBers
Saya pemula dalam VB6 dan ingin menanyakan bagaimana coding untuk ado
connection string jika saya ingin menaruhnya didalam modul serta bagaimana
cara pemanggilannya pada form atau MDI.
TX B 4
Salam,
Ano
[Non-text portions of this message have been removed]
---------------------------------
Everyone is raving about the all-new Yahoo! Mail beta.
[Non-text portions of this message have been removed]
