sepertinya Jet351 Oledbnya bermasalah mbak selvi, coba aja di instal ulang
vbnya, itu perkiraan saya, gak tau juga mgkn tmn2 lain bs nambah
SELVI OYE <[EMAIL PROTECTED]> wrote: Dear para
pakar Vb,
aku mau tanya, kalau program pada saat akan running terus ada pesan error
" Run-time error '3633':
Can't load DLL : MSJTER35.DLL
ketika di debug, langsung mengacu ke directory database, padahal aku
sepertinya udah benar.
mohon ptunjuknya ???
berikut debugnya :
Private Sub Form_Load()
Set dbsewa = OpenDatabase(App.Path & "\database\rental_vcd.mdb")
Set rsfilm = dbsewa.OpenRecordset("film", dbOpenDynaset)
Set rskategori = dbsewa.OpenRecordset("kategori", dbOpenDynaset)
End Sub
dan berikut ini modul
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 dibetulkan kalau ada yg salah.
________________________________________________________
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]
---------------------------------
Kunjungi halaman depan Yahoo! Indonesia yang baru!
[Non-text portions of this message have been removed]
