E
emgallagher
Hi,
I am attempting to link a table from an user-level security database
to an unsecured databaes. The error I get is: Run Time Error
-2147467259, Could not find installable ISAM. I have done much
searching but I haven't come up with any solutions. Does anyone have
any ideas?
Thanks!
Option Compare Database
Dim adoCn As ADODB.Connection
Dim adoCat As New ADOX.Catalog
Dim adoTbl As New ADOX.Table
Private Sub createlink_Click()
'Create Link..
Set adoCat = New ADOX.Catalog
Set adoCat.ActiveConnection = adoCn
Set adoTbl.ParentCatalog = adoCat
adoTbl.Name = "LinkTable"
adoTbl.Properties("Jet OLEDB:Link Datasource") = "i:\eb.mdb;" & _
"User Id=psuer;Password=pswrd"
adoTbl.Properties("Jet OLEDB:Link Provider String") = "System
database=I:\e_sec_file.mdw"
adoTbl.Properties("Jet OLEDB:Remote Table Name") =
"TblMainSubstanceDetail"
adoTbl.Properties("Jet OLEDB:Create Link") = True
'Append the table to the tables collection
adoCat.Tables.Append adoTbl
End Sub
I am attempting to link a table from an user-level security database
to an unsecured databaes. The error I get is: Run Time Error
-2147467259, Could not find installable ISAM. I have done much
searching but I haven't come up with any solutions. Does anyone have
any ideas?
Thanks!
Option Compare Database
Dim adoCn As ADODB.Connection
Dim adoCat As New ADOX.Catalog
Dim adoTbl As New ADOX.Table
Private Sub createlink_Click()
'Create Link..
Set adoCat = New ADOX.Catalog
Set adoCat.ActiveConnection = adoCn
Set adoTbl.ParentCatalog = adoCat
adoTbl.Name = "LinkTable"
adoTbl.Properties("Jet OLEDB:Link Datasource") = "i:\eb.mdb;" & _
"User Id=psuer;Password=pswrd"
adoTbl.Properties("Jet OLEDB:Link Provider String") = "System
database=I:\e_sec_file.mdw"
adoTbl.Properties("Jet OLEDB:Remote Table Name") =
"TblMainSubstanceDetail"
adoTbl.Properties("Jet OLEDB:Create Link") = True
'Append the table to the tables collection
adoCat.Tables.Append adoTbl
End Sub