LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
 Forums Обновлено :: 15 мая 2024
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Проверка ...
 Тема: Проверка существования таблицы...
 
 15.06.2007 19:58:14
Rustam
19 сообщения


Тема: Проверка существования таблицы...
Как проверит в текущей базе, есть ли в ней таблица или нет, через модуль...


P.S. Связанные таблицы Access
Автор: Rustam от 13.11.2001 8:42:12 Источник ...
 15.06.2007 19:58:14
Юрий3
2 сообщения


RE: Проверка существования таблицы...
Например так:
Function Exist_Table(t_name As String)
' Возвращает TRUE если таблица существует
Dim Db As DAO.Database, Td As DAO.TableDef
Set Db = CurrentDb
Exist_Table = False
For Each Td In Db.TableDefs
If t_name = Td.Name Then
Exist_Table = True
End If
Next
Db.Close
Set Db = Nothing
End Function




P.S. Связанные таблицы Access
Автор: Юрий от 13.11.2001 22:27:13 Источник ...
 15.06.2007 19:58:14
Юрий3
2 сообщения


RE: Проверка существования таблицы...
Например так:
Function Exist_Table(t_name As String)
' Возвращает TRUE если таблица существует
Dim Db As DAO.Database, Td As DAO.TableDef
Set Db = CurrentDb
Exist_Table = False
For Each Td In Db.TableDefs
If t_name = Td.Name Then
Exist_Table = True
End If
Next
Db.Close
Set Db = Nothing
End Function




P.S. Связанные таблицы Access
Автор: Юрий от 13.11.2001 22:27:26 Источник ...
 Страница 1 из 1
СледующийПредыдущийНет оценки
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Проверка ...
ПоискПоиск  Список форумовСписок форумов  
right
Начало | Forums
Copyright 2002-2016 Leadersoft.ru   ::  Leadersoft  ::  Соглашение о безопасности  ::  Условия использования
Не забудьте сохранить ссылку на страницу с кодом для дальнейшего анализа
Сайт разработан на базе технологий ASP.NET, DotNetnuke