На этом шаге мы рассмотрим методы, позволяющие создать рабочую область.

    Рабочую область можно создать методом 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 Workspace
  Set РабочаяОбласть = DBEngine.CreateWorkspace (Name:="МояОбласть", _ 
    UserName:="admin", Password:="", UseType:=dbUseJet)

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

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

    На следующем шаге мы рассмотрим открытие базы (источника) данных.

Предыдущий шаг Содержание Следующий шаг