Узнать, открыта ли БД

Работа VB и СУБД (Access, MSSQL, MySQL, Oracle и пр.)
Правила форума
При создании новой темы не забывайте указывать используемую СУБД.
Dummiel
Бывалый
Бывалый
 
Сообщения: 235
Зарегистрирован: 11.06.2004 (Пт) 9:15
Откуда: Алтай

Узнать, открыта ли БД

Сообщение Dummiel » 02.08.2004 (Пн) 7:32

Как программно, и без использования обекта DATA, узнать, открыта ли на данный момент какая либо БД (область).

Можно ли одновременно открывать две-три БД? Если да, то плз - небольшой исходник, как между ними переключаться.

Работаю с файлами *.MDB (Access 2000) в среде Visual Basic 6.0

TEH3OP
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 12.12.2003 (Пт) 20:19
Откуда: Москва

Пжалста код...

Сообщение TEH3OP » 02.08.2004 (Пн) 9:06

В ADODB (если ты с ADODB работаешь конечно), есть объект Connection (хотя, если ты с ADODB работаешь, то должен знать), который с базой соединяется. И этих Connection'ов ты можешь туеву хучу наклепать -- при этом каждый из них на свою базу смотреть буит.

Вот пример на всякий случай:

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

Public Sub Main()
Dim cnn1 as New ADODB.Connection
Dim cnn2 as New ADODB.Connection

'Открываем базы.
cnn1.Open "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & _
VBA.InputBox("Введите имя файла БД1 с полным путём:") & ";"
cnn2.Open "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & _
VBA.InputBox("Введите имя файла БД2 с полным путём:") &";"

'Закрываем базы.
cnn1.Close
cnn2.Close
End Sub

Dummiel
Бывалый
Бывалый
 
Сообщения: 235
Зарегистрирован: 11.06.2004 (Пт) 9:15
Откуда: Алтай

Сообщение Dummiel » 04.08.2004 (Ср) 13:33

Други мои, спасибо.
Вот только с ADO я не работаю. Мне проще (м.б., я заблуждаюсь) работать просто программно.
Но, видно, придется переходить...

Rainbow
Человек-радуга
Человек-радуга
 
Сообщения: 543
Зарегистрирован: 13.05.2003 (Вт) 14:16

Сообщение Rainbow » 04.08.2004 (Ср) 13:47

DAO и ADO весьма аналогичные вещи
когда на форму кидается контрол data, то в проект автоматически добавляется ссылка на DAO (проверь в Project->Referencies). Конрол призван облегчить жизнь чайнику.

Если тебе нужны несколько баз, используй несколько переменных типа Database. Примеры присоединения к базе смотри у соседей или в MSDN.
Учиться - значит открывать для себя то, что уже знаешь. <...> Учить - значит напоминать другим о том, что они знают это также хорошо, как и ты. <...> Лучше всего ты учишь тому, чему тебе самому больше всего надо научиться. (Р. Бах)

abc
Обычный пользователь
Обычный пользователь
 
Сообщения: 85
Зарегистрирован: 09.07.2004 (Пт) 17:31
Откуда: Kiev

Сообщение abc » 11.08.2004 (Ср) 11:10

Если *mdb открыта (например другой программой или пользователем) то существует в той же директории *ldb

dir(nameDB.ldb)<>""


Вернуться в Базы данных

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 3

    TopList