Поделиться через

Метод Workspace.CreateDatabase (DAO)

  • Статья

Область применения: Access 2013, Office 2013

Создает новый объект Database , сохраняет базу данных на диск и возвращает открытый объект Database (только для рабочих областей Microsoft Access).

Синтаксис

expression . CreateDatabase(Name, Connect, Option)

expression: переменная, представляющая объект Workspace.

Параметры

Имя

Обязательный/необязательный

Тип данных

Описание

Name

Обязательный

String

Строка длиной до 255 символов, которая является именем создаваемого файла базы данных. Это может быть полный путь и имя файла. Если сеть поддерживает его, можно также указать сетевой путь, например "\\server1\share1\dir1\db1". Файлы базы данных Microsoft Access можно создавать только с помощью этого метода.

Connect

Обязательный

String

  • Строковое выражение, указывающее порядок сортировки для создания базы данных, как указано в разделе Параметры. Необходимо указать этот аргумент, иначе возникнет ошибка.

  • Вы также можете создать пароль для нового объекта Database путем объединения строки пароля (начиная с "; pwd=") с константой в аргументе языкового стандарта , как показано ниже:

  • dbLangSpanish & "; pwd=NewPassword"

  • Если вы хотите использовать языковой стандарт по умолчанию, но указать пароль, просто введите строку пароля для аргумента языкового стандарта :

  • "; pwd=NewPassword"

  • Используйте надежные пароли, содержащие строчные и прописные буквы, цифры и знаки. В ненадежных паролях не используются сочетания таких элементов. Надежный пароль: Y6dh!et5. Слабый пароль: House27. Используйте надежный пароль, который можно запомнить, чтобы не пришлось его записывать.

Вариант

Необязательный

Variant

Константы или комбинации констант, указывающие один или несколько параметров, как указано в разделе Параметры. Вы можете объединить параметры, сложив соответствующие константы.

Замечания

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

Константа

Порядок сортировки

dbLangGeneral

Английский, немецкий, французский, португальский, итальянский и современный испанский

dbLangArabic

Арабский

dbLangChineseSimplified

Китайский (упрощенное письмо)

dbLangChineseTraditional

Китайский (традиционное письмо)

dbLangCyrillic

Русский

dbLangCzech

Чешский

dbLangDutch

Голландский

dbLangGreek

Греческий

dbLangHebrew

Иврит

dbLangHungarian

Венгерский

dbLangIcelandic

Исландский

dbLangJapanese

Японский

dbLangKorean

Корейский

dbLangNordic

Скандинавские языки (только ядро СУБД Microsoft Jet версии 1.0)

dbLangNorwDan

Норвежский и датский

dbLangPolish

Польский

dbLangSlovenian

Словенский

dbLangSpanish

Традиционный испанский

dbLangSwedFin

Шведский и финский

dbLangThai

Тайский

dbLangTurkish

Турецкий

Можно использовать одну или несколько из следующих констант в аргументе options, чтобы указать, какую версию должен иметь формат данных и следует ли шифровать базу данных.

Константа

Описание

dbEncrypt

Создает зашифрованную базу данных.

dbVersion10

Создает базу данных, которая использует формат файла ядра СУБД Microsoft Jet версии 1.0.

dbVersion11

Создает базу данных, которая использует формат файла ядра СУБД Microsoft Jet версии 1.1.

dbVersion20

Создает базу данных, которая использует формат файла ядра СУБД Microsoft Jet версии 2.0.

dbVersion30

Создает базу данных, которая использует формат файла ядра СУБД Microsoft Jet версии 3.0 (совместимый с версией 3.5).

dbVersion40

Создает базу данных, которая использует формат файла ядра СУБД Microsoft Jet версии 4.0.

dbVersion120

Создает базу данных, которая использует формат файла ядра СУБД Microsoft Access версии 12.0.

Если опустить константу шифрования, CreateDatabase создаст незашифрегированную базу данных.

Используйте метод CreateDatabase , чтобы создать и открыть пустую базу данных и вернуть объект Database . Необходимо завершить его структуру и содержимое с помощью дополнительных объектов DAO. Если вы хотите создать частичную или полную копию существующей базы данных, можно использовать метод CompactDatabase , чтобы создать копию, которую можно настроить.

Пример

В этом примере используется метод CreateDatabase для создания нового зашифрованного объекта Database.

    Sub CreateDatabaseX() 
     
       Dim wrkDefault As Workspace 
       Dim dbsNew As DATABASE 
       Dim prpLoop As Property 
     
       ' Get default Workspace. 
       Set wrkDefault = DBEngine.Workspaces(0) 
     
       ' Make sure there isn't already a file with the name of  
       ' the new database. 
       If Dir("NewDB.mdb") <> "" Then Kill "NewDB.mdb" 
     
       ' Create a new encrypted database with the specified  
       ' collating order. 
       Set dbsNew = wrkDefault.CreateDatabase("NewDB.mdb", _ 
          dbLangGeneral, dbEncrypt) 
     
       With dbsNew 
          Debug.Print "Properties of " & .Name 
          ' Enumerate the Properties collection of the new  
          ' Database object. 
          For Each prpLoop In .Properties 
             If prpLoop <> "" Then Debug.Print "  " & _ 
                prpLoop.Name & " = " & prpLoop 
          Next prpLoop 
       End With 
     
       dbsNew.Close 
     
    End Sub