Существует ли таблица ?

[Rom]

Здравствуйте. Подскажите, пожалуйста, как можно программно проверить существует ли таблица “my_table” в базе access?

[GSerg]

Обратиться и ловить ошибку.
Использовать DAO и посмотреть tabledefs.
Использовать ADOX и посмотреть tables.

[Rom]

А если всё-таки не по коду ошибки.
Если мысль перебрать в цикле до db.TableDefs.Count все таблицы в базе на наличие “my_table”. Но реализовать не получается, что-то не вижу нужных свойств у TableDefs.

[vvs_adm]

Код: Выделить всё

ADODB.Connection.OpenSchema adSchemaTables

[Nicky]

Код: Выделить всё

function TableExists(sTableName as string) as boolean
  on error goto er
  TableExists = len(db.TableDefs(sTableName).Name)>0
er:
end function

[alibek]

OpenSchema самое правильное (если ADO).