Método Workspace.CreateDatabase (DAO)

Se aplica a: Access 2013, Office 2013

Crea un nuevo objeto Database, guarda la base de datos en el disco y devuelve un objeto Database abierto (sólo áreas de trabajo de Microsoft Access).

Sintaxis

expresión . CreateDatabase(Name, Connect, Option)

expression Variable que representa un objeto Workspace.

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Name	Obligatorio	String	String de hasta 255 caracteres de longitud que es el nombre del archivo de base de datos que va a crear. Puede ser la ruta completa y el nombre del archivo. Si la red lo admite, puede especificar también una ruta de red, como "\\servidor1\recurso_compartido1\dir1\db1". Con este método sólo puede crear archivos de base de datos de Microsoft Access.
Connect	Obligatorio	String	Expresión de cadena que especifica un orden de intercalación para crear la base de datos, tal como se especifica en la sección de configuración. Debe proporcionar este argumento o se producirá un error. También puede crear una contraseña para el nuevo objeto Database concatenando la cadena de contraseña (empezando por "; pwd=") con una constante en el argumento de configuración regional , como esta: dbLangSpanish & "; pwd=NewPassword" Si desea utilizar el argumento locale predeterminado, pero especificar una contraseña, sólo tiene que agregar una cadena de contraseña al argumento locale: "; pwd=NewPassword" Use contraseñas seguras que combinen letras mayúsculas y minúsculas, números y símbolos. En las contraseñas no seguras estos elementos no se combinan. Contraseña segura: Y6dh!et5. Contraseña no segura: Casa27. Use una contraseña segura que pueda recordar para no tener que anotarla.
Opción	Opcional	Variant	Constante o combinación de constantes que indican una o varias opciones, tal como se especifica en la sección de configuración. Puede combinar opciones sumando las constantes correspondientes.

Comentarios

Puede utilizar alguna de las constantes siguientes para el argumento locale si desea especificar la propiedad CollatingOrder de texto para comparaciones de cadenas.

Constante	Orden de intercalación
dbLangGeneral	Inglés, alemán, francés, portugués, italiano y español (alfab. internacional)
dbLangArabic	Árabe
dbLangChineseSimplified	chino simplificado
dbLangChineseTraditional	chino tradicional
dbLangCyrillic	Ruso
dbLangCzech	Checo
dbLangDutch	Neerlandés
dbLangGreek	Griego
dbLangHebrew	Hebreo
dbLangHungarian	Húngaro
dbLangIcelandic	Islandés
dbLangJapanese	Japonés
dbLangKorean	Coreano
dbLangNordic	Idiomas nórdicos (sólo en la versión 1.0 del motor de base de datos de Microsoft Jet)
dbLangNorwDan	Noruego y danés
dbLangPolish	Polaco
dbLangSlovenian	Esloveno
dbLangSpanish	Español (alfab. tradicional)
dbLangSwedFin	Sueco y finlandés
dbLangThai	Tailandés
dbLangTurkish	Turco

Puede utilizar una o varias de las constantes siguientes en el argumento options para especificar la versión que debe tener el formato de datos y si va a cifrar o no la base de datos.

Constante	Descripción
dbEncrypt	Crea una base de datos cifrada.
dbVersion10	Crea una base de datos que utiliza el formato de archivo del motor de base de datos de Microsoft Jet versión 1.0.
dbVersion11	Crea una base de datos que utiliza el formato de archivo del motor de base de datos de Microsoft Jet versión 1.1.
dbVersion20	Crea una base de datos que utiliza el formato de archivo del motor de base de datos de Microsoft Jet versión 2.0.
dbVersion30	Crea una base de datos que utiliza el formato de archivo del motor de base de datos de Microsoft Jet versión 3.0 (compatible con la versión 3.5).
dbVersion40	Crea una base de datos que utiliza el formato de archivo del motor de base de datos de Microsoft Jet versión 4.0.
dbVersion120	Crea una base de datos que utiliza el formato de archivo del motor de base de datos de Microsoft Access versión 12.0.

Si omite la constante de cifrado, CreateDatabase crea una base de datos no cifrada.

Utilice el método CreateDatabase para crear y abrir una nueva base de datos vacía y devolver el objeto Database. Debe completar su estructura y contenido con objetos DAO adicionales. Si desea crear una copia parcial o completa de una base de datos existente, puede utilizar el método CompactDatabase para crear una copia que pueda personalizar.

Ejemplo

En este ejemplo se usa CreateDatabase para crear un objeto Database nuevo y cifrado.

    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