tableDefs displaying Tables not there

[JosmithTwo]

I have been working on an Access 2007 database and have copied and recopied it as I make changes to the forms.

I have this code to display tables in my database
---------------------------------------

Private Sub CMD_get_GDM_Click()
    List2.Visible = True
    List2.RowSource = ""
    
    Set db = CurrentDb()
    DoCmd.SetWarnings False
    For Each tbl In db.TableDefs
        If Left$(tbl.Name, 3) = "dbo" Then
            List2.RowSource = tbl.Name & "; " & List2.RowSource
        End If
    Next
End Sub

I have deleted all tables from my database and then send it off to the user. He links via ODBC to his source tables and runs this code.

HOWEVER the tables listed for him are NOT his linked tables but the ones I deleted.

I've passed this database to another PC and done the same process and my test works just fine, displaying the proper current tables.


(Note: the "dbo" table name does not appear to be a problem)
Help

Jim

[help_me_with_access]

HOWEVER the tables listed for him are NOT his linked tables but the ones I deleted.

try refreshing the links, as well as the table defs themselves:

database.tabledefs.refresh

I can't remember what the syntax is for refreshing ODBC tbl def links, but google it. google something like "ms access vba refresh tabledef links"

he will have to do it on his end. I don't think the links update themselves. I believe the syntax for that is ADO.

[Missinglinq]

Television's 'Ghost Hunters' has nothing on MS Access! Reports of ghost Fields, Controls, Forms and Tables abound!

After you've completed deleting these Tables, create a new, blank database and Import everything into it; I suspect that this will resolve the problem.

Linq ;0)>

[help_me_with_access]

create a new, blank database and Import everything into it

that will *always* solve the issue! Why go the easy route and give him the answer right away, Linq!?