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.OpenRecordset("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.OpenDatabase(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]
