title: Relinking Tables after an Access Front End is deployed
body: <p>I just recently split my Database to a Front End and Backend.  I am deploying the Front End to the Users via E-mail.  they paste the Front End to their DeskTop.  I wanted to include code in the Load Function that will automatically Relink the Tables so that the Relative path to the tables reflects their mapping to the backend.  The code I am using generates the following error: </p>
  
  <pre><code>3170 Run Time Error.  Could not find installable ISAM. 
  </code></pre>
  
  <p>And, here is the code:</p>
  
  <pre><code>Public Function RefreshLinks(strFilename As String) As Boolean
    ' Refresh table links to a backend database - strFilename (full path)
    ' Returns True if successful.
    Dim dbs As Database
    Dim tdf As TableDef
  
    ' Loop through all tables in the database.
    Set dbs = CurrentDb
    For Each tdf In dbs.TableDefs
      MsgBox " The table is " &amp; tdf.name
      ' If the table has a connect string, it's a linked table.
      If Len(tdf.Connect) &gt; 0 Then
        MsgBox "The table has a connect string."
  
        tdf.Connect = ";DATABASE= " &amp; strFilename
        tdf.Connect = strFilename
        tdf.RefreshLink ' Relink the table.
        Err = 0
        On Error Resume Next
        tdf.RefreshLink ' Relink the table.
        'MsgBox "The Table is linked"
  
        If Err &lt;&gt; 0 Then
          RefreshLinks = False
          ' MsgBox "The tables aren't refreshed"
          Exit Function
        End If
      End If
    Next tdf
  
    RefreshLinks = True ' Relinking complete.
    'MsgBox "The tables are refreshed"
  End Function
  </code></pre>
  
  <p>The file name that is passed is <code>EASDBLocation = "\\RSDATA\RS2\Data2\ComplianceReviews\BusinessReviews\ReviewDatabase\2014 Revised Database\Archive\RAS Database Split Test_be.mdb"</code></p>