Создание рабочей области
Создание рабочей области
Рабочую область можно создать методом 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)