Link Tables

[Ryan Clair]

I have 2 different back-end databases I use, one for when I'm testing
and one for production. I'm also using a homegrown login. When I log
in, I'd like a window to appear that list which files I'm linked to at
that time (mostly because I just want to make sure I'm either in
production or in testing environment without having to check link
table manager--unfortunately I sometimes forget.)

I've seen this code but when I step into it, the value of tdf is
blank, even though it goes through it as if it isn't.

Sub ShowLinkPath()
Dim db As DAO.Database
Dim tdf As DAO.TableDef

Set db = CurrentDb
For Each tdf In db.TableDefs
Debug.Print tdf.Connect
Next tdf
Set tdf = Nothing
Set db = Nothing
End Sub

Being lazy just means being more efficient right? Thanks in
advance.

 

[Arvin Meyer [MVP]]

That code works for me. Make sure you have a reference set to DAO.

 

[Ryan Clair]

I'm an idiot. Ok, it works. Had worked. Just was going through all the
tables, and not all of them are linked... so some of them are blank.

Thanks for your time though.

Ryan

 

[John W. Vinson]

I'm trying to locate an email for Ryan Clair as he apparently has been chosen to attend a People to People trip this summer. Appriciate it if you could help.

EggHeadCafe.com - .NET Developer Portal of Choice
http://www.eggheadcafe.com

You're asking in the wrong place. This is a technical support newsgroup for
the database software Microsoft Access.

Try www.google.com or whatever tools eggheadcafe provides for contacting other
members (it appears that he is one).

John W. Vinson [MVP]