Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как узнать имена всех таблиц в базе, DAO 
V
    Опции темы
GyDi
Дата 23.1.2006, 11:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 37
Регистрация: 12.1.2006

Репутация: нет
Всего: нет
Добрый день! Подключаю Бд через DAO. Как узнать имена всех таблиц в базе, через VBasic? И ещё, где можно скачать класные книги по работе с БД на VB, и книги с подробным описанием визуальных компонентов?
PM MAIL   Вверх
Exception
Дата 23.1.2006, 12:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 4525
Регистрация: 26.12.2004

Репутация: 7
Всего: 186
Насчет книг - это тебе в раздел Литература. Ссылка есть наверху.
Для получения имен всех таблиц тебе нужно:
  • Использовать ADOX (ADO eXtensions), там есть такая возможность
  • Можно также брать имена из системных таблиц, это зависит от типа БД.
PM   Вверх
GyDi
Дата 23.1.2006, 13:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 37
Регистрация: 12.1.2006

Репутация: нет
Всего: нет
Т.е. создать переменную типа ADOX? Или как?
PM MAIL   Вверх
Exception
Дата 23.1.2006, 13:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 4525
Регистрация: 26.12.2004

Репутация: 7
Всего: 186
Подключи библиотеку Microsoft ADO Ext. 2.8 for DDL and Security и Microsoft ActiveX Data Objects 2.8.
Код (для SQL Server):
Код
Dim con As New ADODB.Connection
con.Open ("Provider=SQLOLEDB;server=DANICH\SQL;uid=sa;pwd=;")
Dim db As New ADOX.Catalog
db.ActiveConnection = con
Dim tbl As ADOX.Table
For Each tbl In db.Tables
MsgBox tbl.Name
Next
db = Nothing
con.Close
con = Nothing
PM   Вверх
Flotskiy
Дата 25.1.2006, 07:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 223
Регистрация: 15.11.2004
Где: г. Омск

Репутация: 1
Всего: 2
Добрый день Всем! GyDi, может это тебе подойдет?
Всего доброго

Присоединённый файл ( Кол-во скачиваний: 6 )
Присоединённый файл  dbstruct.rar 2,29 Kb
--------------------
FlotskiySk k
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0430 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.