Solved

cannot find installable ISAM Error

Posted on 2014-02-15
4
828 Views
Last Modified: 2014-02-15
I have an MSAccess database with linked tables from another MSAccess database. I am trying to refresh link tables using the following code

Public Function FixTableLink()
Dim db As Database

strPath = CurrentProject.Path
strPath = strPath & "\CooktownHistoryDb.mdb_be"

strConnect = "DATABASE=" & strPath
Set db = CurrentDb
For Each tbl In db.TableDefs

    If Nz(DLookup("Type", "MSysObjects", "Name = '" & tbl.name & "'"), 0) = 6 And tbl.Connect <> strConnect Then
        
        tbl.Connect = strConnect
        tbl.RefreshLink
        
    End If

Next tbl

End Function

Open in new window


I get an error 3170 "Could not find Installable ISAM" on line 14.  I need a work around.

Thanks
0
Comment
Question by:Sheils
  • 2
4 Comments
 
LVL 49

Accepted Solution

by:
Gustav Brock earned 500 total points
ID: 39861062
You need a leading semicolon:

strConnect = ";DATABASE=" & strPath

/gustav
0
 
LVL 16

Author Closing Comment

by:Sheils
ID: 39862163
Brilliant!
0
 
LVL 12

Expert Comment

by:jkaios
ID: 39862181
It looks like you have a corrupt installation of Access.  Please see if this link can help:
http://support.microsoft.com/kb/209805
0
 
LVL 12

Expert Comment

by:jkaios
ID: 39862183
oops, just a little late...glad that this has been resolved. :-)
0

Featured Post

Use Case: Protecting a Hybrid Cloud Infrastructure

Microsoft Azure is rapidly becoming the norm in dynamic IT environments. This document describes the challenges that organizations face when protecting data in a hybrid cloud IT environment and presents a use case to demonstrate how Acronis Backup protects all data.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

My experience with Windows 10 over a one year period and suggestions for smooth operation
When you see single cell contains number and text, and you have to get any date out of it seems like cracking our heads.
Excel styles will make formatting consistent and let you apply and change formatting faster. In this tutorial, you'll learn how to use Excel's built-in styles, how to modify styles, and how to create your own. You'll also learn how to use your custo…
Access reports are powerful and flexible. Learn how to create a query and then a grouped report using the wizard. Modify the report design after the wizard is done to make it look better. There will be another video to explain how to put the final p…

813 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

10 Experts available now in Live!

Get 1:1 Help Now