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