Lam nal juga.....
Thanks, ntar coba jalan2 ke sana.
Databasenya Ms. Access
Programnya seperti dibawah ini:
Option Explicit
Dim Koneksi1 As New ADODB.Connection 'koneksi untuk excel
Dim koneksi2 As New ADODB.Connection 'koneksi untuk access
Dim Katalog As New ADOX.Catalog
Private Sub cmdBuatDatabase_Click()
Dim tblAddress As New ADOX.Table
Dim idxID As New ADOX.Index
Dim keyID As New ADOX.Key
On Error GoTo Hapusfile
If Dir$(App.Path & "\Aplikasi1", vbDirectory) = "" Then
FileSystem.MkDir (App.Path & "\Aplikasi1")
End If
'membuat database baru
Katalog.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"DataSurce=" & app.path & "\Aplikasi1\Address.MDB"
........
Setelah di debug, errornya ada di bagian warna merah...
Best Regards
Arlenda Fitranto
Gege Nugroho <[EMAIL PROTECTED]>
Sent by: [email protected]
04/09/2008 15:41
Please respond to
[email protected]
To
[email protected]
cc
Subject
[Programmer-VB] Jawabin : Couldn't find Installable ISAM
Lam nal...
Dah pernah nanya Paman Google?
http://www.google.co.id/search?hl=id&q=Couldn%27t+find+Installable+ISAM&btnG=Telusuri+dengan+Google&meta
=
Salah satunya ini : http://www.codeguru.com/forum/showthread.php?t=318189
Pake database apa mang?
Regards
Gege Nugroho
--- On Thu, 9/4/08, [EMAIL PROTECTED]
<[EMAIL PROTECTED]> wrote:
From: [EMAIL PROTECTED] <[EMAIL PROTECTED]>
Subject: [Programmer-VB] Couldn't find Installable ISAM
To: [email protected]
Date: Thursday, September 4, 2008, 3:03 PM
Dear master....
program saya ada error seerti subject..
Apa yang salah dengan program saya? Bagaimana solusinya?
Thanks
Best Regards
Arlenda Fitranto
