Modules & VBA :: Find All Table Names From External File

I'm trying to find all the table names inside an external access file from a path.

I have a code for the user to select a file which return a patch to the file.

Then I need to find all the tables names from that file and append them to a list.

so I them can input them into a code and link the tables.

here is the code to get the file patch:

Code:
Function getFileName(path) As String
Dim f As Object
Dim varFile As Variant
Dim path
Set f = Application.FileDialog(3)

[Code] ......