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

       

Создание рабочей области


Рабочую область можно создать методом CreateWorkspace объекта DBEngine.

Синтаксис:

Set РабочаяОбласть = CreateWorkspace(Name, UserName, Password, UseType)

Аргументы:

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



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

Name

Выражение или переменная типа string, содержащая уникальное имя нового объекта workspace

UserName

Выражение или переменная типа string, определяющая владельца нового объекта workspace

Password

Выражение или переменная типа string, содержащая пароль для доступа к новому объекту workspace

UseType

Допустимые значения: dbUseJet (создание рабочей области ядра Microsoft Jet) и dbUseODBC (создание рабочей области ODBCDirect)

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

Dim РабочаяОбласть As CreateWorkspace

Set РабочаяОбласть = DBEngine.CreateWorkspace(Name:="МояОбласть", UserName:="admin", Password:="", UseType:=dbUseJet)

Рабочую область ODBCDirect можно создать следующим образом (ссылка на объект DBEngine применяется по умолчанию, поэтому во второй инструкции объект DBEngine опущен):

Dim РабочаяОбласть As CreateWorkspace

Set РабочаяОбласть = CreateWorkspace(Name:="МояОбласть", UserName:="UID'V Password:="", UseType:=dbUseODBC)



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