PRB: TableDefs Not Updated When SQL Statement Creates Table

MORE INFORMATION

A table created with an SQL statement is correctly reflected in the Tabledefs collection after the database is closed then reopened.

Steps to Reproduce Problem

The following program demonstrates this problem. It results in the error "Name not found in this collection" on the Tabledefs.Delete statement.

   Dim db As Database
   Set db = OpenDatabase("BIBLIO.MDB")
   Print "TableDefs.Count before:"; db.TableDefs.Count
   ' Create new table using SQL action statement:
   db.Execute "select distinctrow * into NewTable from Authors"
   ' Remove apostrophe from the following statement to work around problem:
   ' db.TableDefs.Refresh
   Print "TableDefs.Count after: "; db.TableDefs.Count
   ' Now attempt to delete the new table just created:
   db.TableDefs.Delete "NewTable"
   db.Close