Relink tables

[Tom]

Advice on how to do the following please:

Have looked at the relink code at www.mvps.org/access/tables/tbl0009.htm.
What we would like to achieve is that if the FE cannot locate the BE then
that relink code would kick in.

What would be the best way to achieve that

TIA
Tom

 

[Dale Fye]

I usually use something simple in my Splash screen that counts the number of
records in one of the linked table.

If this generates an error, and the error has to do with not being able to
connect to the BE, then I branch to my relink code, with a call to the Open
File API (http://www.mvps.org/access/api/api0001.htm) to select the mdb
file.

HTH
Dale

 

[Allen Browne]

And if you need another example, there is a relink module in the Solutions
sample database at:
http://msdn.microsoft.com/library/officedev/bapp2000/mdbdownload.htm

 

[Tom]

Thanks both for your replies and suggestions.

As we develop a BE we have a tendency to add/modify fields within the BE
db, and rename to identify the latest version i.e. DataA, DataB etc. From
within the FE it appears that Access records the name of the last BE it was
linked to. How can that name be obtained thru vba?

TIA
Tom

 

[Allen Browne]

You can parse the name of the back-end mdb from the Connect property of the
TableDef:

=Split([DBEngine].[Workspaces](0).[Databases](0).[TableDefs]("MyAttachedTable").[Connect],";")(1)

 

[Tom]

Thanks Allen

A bit of frigging around but we have it working as we want!!

Tom

You can parse the name of the back-end mdb from the Connect property of
the TableDef:

=Split([DBEngine].[Workspaces](0).[Databases](0).[TableDefs]("MyAttachedTable").[Connect],";")(1)

--
Allen Browne - Microsoft MVP. Perth, Western Australia.

Reply to group, rather than allenbrowne at mvps dot org.

Thanks both for your replies and suggestions.

As we develop a BE we have a tendency to add/modify fields within the BE
db, and rename to identify the latest version i.e. DataA, DataB etc. From
within the FE it appears that Access records the name of the last BE it
was linked to. How can that name be obtained thru vba?

TIA
Tom