З'єднання з поточної базою даних
В об'єктній моделі DAO можливі два способи установки посилання на поточну базу даних:
Dim db As Database
Set db = DBEngine.Workspaces (0) .Databases (0)
Це означає, що поточна база даних є першим об'єктом в сімействі Databases робочої області за замовчуванням.
УВАГА Сімейство Workspaces містить всі об'єкти Workspace, відповідні відкритим робочим областям. Додаток Access може одночасно використовувати будь-яку комбінацію робочих областей Jet і ODBCDirect а значить, і безліч одночасно діючих сеансів. При першому зверненні додатки Access до будь-якого об'єкту ВАТ автоматично створюється об'єкт Workspace - DBEngine.Workspaces (O), який є робочою областю за замовчуванням
Сімейство Workspaces є стандартним для об'єкта DBEngine, а сімейство Databases - стандартним для об'єкта Workspace, тому за правилами синтаксису мови замість повної посилання, наведеної вище, можна використовувати скорочену: DBEngine (0) (0).
Dim db As Database
Set db = CurrentDB
ПРИМІТКА Метод CurrentDB дозволяє створити кілька об'єктних змінних; які посилаються на різні копії однієї і тієї ж бази даних і з якими можна працювати незалежно, що дозволяє уникнути конфліктів в багатокористувацьких додатках.
В об'єктній моделі ADO, щоб отримати доступ до даних в поточній базі даних, використовується об'єкт CurrentProject моделі об'єктів Access. Цей об'єкт створюється автоматично, коли відкривається файл бази даних, і має властивість Connection, яке і містить всю необхідну інформацію для здійснення доступу до даних:
Dim cnnDB As ADODB.Connection
Set cnnDB = CurrentProject.Connection
Спочатку повинна бути оголошена змінна, яка посилається на об'єкт Connection бібліотеки ADODB. Потім цієї змінної присвоюється значення.
Відкриття бази даних, відмінною від поточної
Для роботи з базою даних, відмінною від поточної, тобто тієї, яка відкрита у вікні бази даних, використовується метод OpenDatabase. Цей метод мають два об'єкти об'єктної моделі DAO: Workspace і DBEngine.
Якщо застосувати метод OpenDatabase об'єкта Workspace, база даних буде відкрита в зазначеної робочої області. Якщо застосувати метод OpenDatabase об'єкта ^
Метод OpenDatabase повертає посилання на об'єкт Database і має наступний синтаксис:
Set <переменная> = <объект>.ОреnDatabaseе (<имяФайла>, [<списокПараметров>], [<режим>], [<соединение>]),
де <переменная> - ім'я змінної, яка є посиланням на об'єкт Database; <объект> - об'єкт Workspace або DBEngine. За замовчуванням (коли об'єкт явно не згадується) використовується метод об'єкта DBEngine.
Метод має один обов'язковий аргумент - ім'я файлу існуючої бази даних. Інші аргументи є необов'язковими. Наприклад, аргумент <режим> використовується для відкриття бази даних тільки для читання (значення True) або для читання і запису (значення False). аргумент <соединение> - для вказівки параметрів з'єднання з джерелом даних, в тому числі пароля. У лістингу 5.1 наводиться приклад відкриття бази даних Бібліотека.mdb.