Самоучитель VBA

       

Открытие базы (источника) данных


Открыть базу данных можно методом OpenDatabase объекта Workspace.

Синтаксис:

Set БазаДанных = РабочаяОбласть.OpenDatabase (name, options, readonly, connect)

Аргументы:



БазаДанных

Объектная переменная, представляющая открываемый объект Database

РабочаяОбласть

Объектная переменная, представляющая существующий объект workspace, который будет содержать базу данных. Если аргумент РабочаяОбласть не задан, метод OpenDatabase использует стандартную рабочую область

Name

Выражение или переменная типа string, задающая имя существующего файла базы данных с ядром Microsoft Jet или имя источника данных ODBC

Options

  • Для рабочей области ядра Microsoft Jet допустимыми являются следующие значения аргумента: True (открытие базы данных для монопольного доступа) и False (по умолчанию, открытие базы данных для общего доступа)

  • Для рабочей области ODBCDirect допустимыми являются следующие значения аргумента:

    dbDriverNoPrompt,

    dbDriver Prompt,

    dbDrive r Complete,

    dbDriverCompleteRequired

Readonly

Допустимые значения: True (база данных открывается только для чтения) и значение False (по умолчанию, база данных открывается как для чтения, так и для записи)

Connect

Дополнительный аргумент, содержащий сведения о подключении, в том числе и пароли

Для закрытия базы данных следует применять метод close.

Например, для открытия базы данных с ядром Microsoft Jet можно использовать следующие две инструкции:

Dim БазаДанных As Database

Set БазаДанных = РабочаяОбласть

.OpenDatabase (Name:="C: \Пример.mdb",

Options:=True)



Содержание раздела