powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как узнать есть таблица в базе?
11 сообщений из 11, страница 1 из 1
Как узнать есть таблица в базе?
    #32273827
Alexandr Golovko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Люди, как узнать есть таблица в базе или нет?
...
Рейтинг: 0 / 0
Как узнать есть таблица в базе?
    #32273846
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Семейство TableDefs
...
Рейтинг: 0 / 0
Как узнать есть таблица в базе?
    #32273884
Alexandr Golovko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а пример можно? А то не сильно понятно
...
Рейтинг: 0 / 0
Как узнать есть таблица в базе?
    #32273896
OMP
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OMP
Гость
Если нужен пример, завтар тебе принесу.
...
Рейтинг: 0 / 0
Как узнать есть таблица в базе?
    #32273899
Alexandr Golovko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ок, спасибо!
...
Рейтинг: 0 / 0
Как узнать есть таблица в базе?
    #32273904
Фотография TatianaT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
зайди по этой ссылке\r
/topic/44900
...
Рейтинг: 0 / 0
Как узнать есть таблица в базе?
    #32273909
Alexus12
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Еще Недавно народ предлагал отлавливать ошибку по запрросу
select * from ИМЯТАБЛИЦЫ
...
Рейтинг: 0 / 0
Как узнать есть таблица в базе?
    #32273961
OMP
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OMP
Гость
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Dim db As DAO.Database, St As String, tdfOrders As DAO.TableDef
Set db = CurrentDb()
St =  "<Name table>" 
For Each tdfOrders In db.TableDefs
    If St = tdfOrders.Name Then
        '<Таблица найдена>
    End If
Next
db.Close
...
Рейтинг: 0 / 0
Как узнать есть таблица в базе?
    #32273968
Alexus12
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Примерно так же можно открыть рекордсет - таблу
и получить ошибку несуществования.
А что быстрее отработает - перебор VBA сотен таблиц или ошибка Аксеса?
...
Рейтинг: 0 / 0
Как узнать есть таблица в базе?
    #32273979
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А что быстрее отработает - перебор VBA сотен таблиц или ошибка Аксеса?
А обратится к коллекции за интересующим элементом и словить ошибку мы не сумеем?
З.Ы. Ловить ошибку в запросе - чревато лишними ошибками при существующей таблице. От отвалившейся сети до нехватки прав.
...
Рейтинг: 0 / 0
Как узнать есть таблица в базе?
    #32273981
CtrlAlt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Правильно говорит Alexus12.

Function IsTable(T As String) As Boolean
Dim N As String

On Error GoTo E

IsTable = False
N = CurrentDb.TableDefs(T).Name
IsTable = True

E:

End Function

Отлов ошибки работает намного быстрее перебора.
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как узнать есть таблица в базе?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]