Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как из Vb узнать какие таблице есть в базе Access mdb / 4 сообщений из 4, страница 1 из 1
14.04.2004, 21:04
    #32481835
Valerik
Valerik
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из Vb узнать какие таблице есть в базе Access mdb
SELECT MSysObjects.Name
FROM MSysObjects
WHERE (((MSysObjects.Type)=1) AND ((MSysObjects.Flags)=0));
___________
Такой запрос не пашет пишет что нет доступа
Как по другому узнать ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.04.2004, 21:08
    #32481839
Geo
Geo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из Vb узнать какие таблице есть в базе Access mdb
dao:

dim t as dao.tabledef
for each t in currentdb.tabledefs
next t
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.04.2004, 22:18
    #32481874
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из Vb узнать какие таблице есть в базе Access mdb
и с where
Код: plaintext
1.
2.
3.
4.
Dim t As TableDef
For Each t In CurrentDb.TableDefs
  If t.Attributes <> dbSystemObject And t.Attributes <> dbHiddenObject Then Debug.Print t.Name
 Next t
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.04.2004, 00:13
    #32481928
Alexander G
Alexander G
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как из Vb узнать какие таблице есть в базе Access mdb
Dim tbl As AccessObject
For Each tbl In CurrentData.AllTables
Debug.Print tbl.Name
Next tbl
'для A2000 и выше

================================
Dim cat As New ADOX.Catalog
Dim tbl As New ADOX.Table
cat.ActiveConnection = CurrentProject.Connection
For Each tbl In cat.Tables
If tbl.Type = "TABLE" Then 'возможны LINK,VIEW,SYSTEM TABLE
Debug.Print tbl.Name
End If
Next
'для A2000 и выше.
'Нужно подключение библиотеки ADO Ext.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как из Vb узнать какие таблице есть в базе Access mdb / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 478ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1675319]:
 0ms
get settings:
 8ms
get forum list:
 11ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 162ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 41ms
get tp. blocked users:
 1ms
others: 240ms
total:  478ms
x
x
Закрыть


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