Retrieve Table Names From Remote Access Database 1

[Accel45]

I located this code which was posted by Allen Browne - Microsoft MVP.

SELECT MSysObjects.[Name] FROM MSysObjects IN 'C:\MyFolder\MyFile.mdb' WHERE (MSysObjects.[Type] = 1) AND NOT ((MSysObjects.[Name] Like "~*") OR (MSysObjects.[Name] Like "MSys*")) ORDER BY MSysObjects.[Name];

I’m using the code as the Row Source for a combo box on a MS Access form:

I would like to modify it to be able to get the remote database path 'C:\MyFolder\MyFile.mdb' from a text box “txtSource” on the form. I have not been able to get the syntax correct to accomplish this.

Any help would be appreciated.

Thank you

Accel45

 

[PHV]

In the GotFocus event procedure of the combo:

Me![name of combo].RowSource = "SELECT [Name] FROM MSysObjects IN '" & Me!txtSource & "'" _
 & " WHERE [Type]=1 AND NOT ([Name] Like '~*' OR [Name] Like 'MSys*') ORDER BY 1

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[Accel45]

That did the trick, Thank you for your help.