Assuming that all backend databases have the same tablenames, i would use a
combobox, perhaps linked to a table of database names (depending how many
there are) then use the following code snipet to re-link the tables in the
frontend;
Dim db As DAO.Database
Dim tdf As DAO.TableDef
Set db = CurrentDb
DoCmd.Echo True, "Refreshing table links..."
'for each attached table make sure it's attached to the correct data
source
For Each tdf In db.TableDefs
If Len(tdf.Connect) > 0 Then
If Left(tdf.Connect, 9) = ";DATABASE" Then
If Not tdf.Connect = ";DATABASE=" & gstrDataDBPath &
gstrDataDBName Then
tdf.Connect = ";DATABASE=" & gstrDataDBPath &
gstrDataDBName
tdf.RefreshLink
End If
End If
End If
Next tdf
'make sure to refresh the table definitions
db.TableDefs.Refresh
Where gstrDataDBPath & gstrDataDBName have been set to the relavant backend
path and name.