Pastikan di komp anda sudah ada engine database acces, minimal acces 2000.

 Semoga membantu: =(oVo)=
====================
BaceInside Publisher
Copyright @2007
Not for reproduced, republished.
Thank You 
====================



----- Original Message ----
From: SELVI OYE <[EMAIL PROTECTED]>
To: indoprog-vb <[email protected]>
Sent: Monday, May 12, 2008 7:14:48 PM
Subject: [indoprog-vb] Tolong Dong


Dear para pakar VB,
aku lagi nyoba contoh program, pada saat dirun ada error "cant load 
DLL.MSJTER35. DLL" dan didebug pesannya masuk ke form load seperti dibawah ini :
Private Sub Form_Load()
Set dbsewa = OpenDatabase( App.Path & "\database\rental_ vcd.mdb")
Set rsanggota = dbsewa.OpenRecordse t("anggota" )
Data1.DatabaseName = (App.Path & "\database\rental_ vcd.mdb")
Data1.RecordSource = "anggota"
Data1.Refresh
End Sub
dan dimodule nya codingnya seperti ini :
Dim db As Database
Dim WS As Workspace
Public Sub koneksi()
Set WS = DBEngine.Workspaces (0)
Set db = DBEngine.OpenDataba se(App.Path & "\Database\sewa. mdb")
End Sub

mohon petunjuknya dari para pakar VB  dimana kesalahannya, maklum lagi belajar 
vb.
thanks.

____________ _________ _________ _________ _________ ________ 
Bergabunglah dengan orang-orang yang berwawasan, di di bidang Anda! Kunjungi 
Yahoo! Answers saat ini juga di http://id.answers. yahoo.com/

[Non-text portions of this message have been removed]

    


      

[Non-text portions of this message have been removed]

Kirim email ke