Mohon Pencerahan.....
Saya mempunyai connect data seperti dibawah ini :
Option Explicit
Dim WJet As Workspace
Dim dbGen As Database
Dim rsPO As Recordset, rsTemp as Recordset, rsSD as Recordset
sub data()
Set WJet = CreateWorkspace("", "admin", "", dbUseJet)
Set dbGen = WJet.OpenDatabase(app.path & "\data.mdb", False, False,
";pwd=default")
Set rsPO = dbGen.OpenRecordset("PO", dbOpenTable)
Set rsTemp = dbGen.OpenRecordset("TEMP", dbOpenTable)
Set rsSD = dbGen.OpenRecordset("DESCRIPTION", dbOpenTable)
end sub
Pertanyaan saya :
Bagaimana caranya jika data tsb. bisa digunakan di semua form (module) ???
(saya juga menggunakan index untuk seek data)
Terima kasih
Vank
---------------------------------
Yahoo! Groups Links
To visit your group on the web, go to:
http://groups.yahoo.com/group/indoprog-vb/
To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
---------------------------------
Do you Yahoo!?
Plan great trips with Yahoo! Travel: Now over 17,000 guides!
[Non-text portions of this message have been removed]
Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]
Ikuti juga forum diskusi VB.net dengan
mengirim email kosong ke [EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indoprog-vb/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
