Método Workspace.CreateDatabase (DAO)

Aplica-se ao: Access 2013, Office 2013

Cria um novo objeto Database, salva o banco de dados no disco e retorna um objeto Database aberto (apenas espaços de trabalho do Microsoft Access).

Sintaxe

expressão . CreateDatabase(Name, Connect, Option)

expressão Uma variável que representa um objeto Workspace.

Parâmetros

Nome	Necessária/opcional	Tipo de dados	Descrição
Name	Obrigatório	String	Uma String com até 255 caracteres de comprimento que é o nome do arquivo de banco de dados que você está criando. Ela pode ser o caminho completo e o nome do arquivo. Se sua rede oferecer suporte a ele, você também pode especificar um caminho de rede como "\\server1\share1\dir1\db1". Você só pode criar arquivos de bancos de dados do Microsoft Access com esse método.
Connect	Obrigatório	String	Uma expressão de cadeia de caracteres que especifica uma ordem de agrupamento para criar o banco de dados, conforme especificado em Configurações. Você deve fornecer esse argumento ou um erro ocorrerá. Você também pode criar uma senha para o novo objeto Database concatenando a cadeia de caracteres de senha (começando com "; pwd=") com uma constante no argumento local , assim: dbLangSpanish & "; pwd=NewPassword" Se desejar usar o local padrão, mas especificar uma senha, simplesmente digite uma cadeia de caracteres como senha para o argumento local: "; pwd=NewPassword" Use senhas fortes que combinam letras maiúsculas e minúsculas, números e símbolos. As enhas fracas não combinam esses elementos. Senha forte: Y6dh!et5. Senha fraca: Casa27. Use uma senha fraca para que você possa lembrá-la sem precisar escrevê-la.
Opção	Opcional	Variant	Uma constante ou combinação de constantes que indica uma ou mais opções, conforme especificado em Configurações. Você pode combinar opções associando as constantes correspondentes.

Comentários

Você pode usar uma das seguintes constantes para o argumento locale a fim de especificar a propriedade CollatingOrder do texto para comparações de cadeias de caracteres.

Constante	Ordem de agrupamento
dbLangGeneral	Inglês, francês, alemão, português, italiano e espanhol moderno
dbLangArabic	Árabe
dbLangChineseSimplified	Chinês simplificado
dbLangChineseTraditional	Chinês tradicional
dbLangCyrillic	Russo
dbLangCzech	Tcheco
dbLangDutch	Holandês
dbLangGreek	Grego
dbLangHebrew	Hebraico
dbLangHungarian	Húngaro
dbLangIcelandic	Islandês
dbLangJapanese	Japonês
dbLangKorean	Coreano
dbLangNordic	Idiomas nórdicos (apenas mecanismo de banco de dados do Microsoft Jet versão 1.0)
dbLangNorwDan	Norueguês e dinamarquês
dbLangPolish	Polonês
dbLangSlovenian	Esloveno
dbLangSpanish	Espanhol tradicional
dbLangSwedFin	Sueco e finlandês
dbLangThai	Tailandês
dbLangTurkish	Turco

Você pode usar uma ou mais das seguintes constantes no argumento options para especificar que versão o formato dos dados deve ter e se o banco de dados deve ser criptografado ou não.

Constante	Descrição
dbEncrypt	Cria um banco de dados criptografado.
dbVersion10	Cria um banco de dados que usa o formato de arquivo do mecanismo de banco de dados Microsoft Jet versão 1.0.
dbVersion11	Cria um banco de dados que usa o formato de arquivo do mecanismo de banco de dados Microsoft Jet versão 1.1.
dbVersion20	Cria um banco de dados que usa o formato de arquivo do mecanismo de banco de dados Microsoft Jet versão 2.0.
dbVersion30	Cria um banco de dados que usa o formato de arquivo do mecanismo de banco de dados Microsoft Jet versão 3.0 (compatível com a versão 3.5).
dbVersion40	Cria um banco de dados que usa o formato de arquivo do mecanismo de banco de dados Microsoft Jet versão 4.0.
dbVersion120	Cria um banco de dados que usa o formato de arquivo do mecanismo de banco de dados Microsoft Access versão 12.0.

Se você omitir a constante de criptografia, CreateDatabase criará um banco de dados não criptografado.

Use o método CreateDatabase para criar e abrir um banco de dados novo e vazio e retornar o objeto Database. Você deve completar sua estrutura e seu conteúdo utilizando objetos DAO adicionais. Se você quiser fazer uma cópia parcial ou completa de um banco de dados existente, poderá usar o método CompactDatabase para fazer uma cópia que pode ser personalizada.

Exemplo

Este exemplo usa o CreateDatabase para criar um objeto Database novo e criptografado.

    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