Cómo crear un nuevo archivo de base de datos mediante ADOX en VB6

Las bibliotecas de Microsoft Access ADOX dejan los programadores de Visual Basic 6 se conectan a un archivo de Access y crear una nueva base de datos . Por razones de seguridad , otras bibliotecas de bases de datos bloquean sentencias de creación que establecen nuevas bases de datos . Debe importar las bibliotecas ADOX en la parte superior del archivo de código fuente VB6 utilizar las clases de las bibliotecas para crear la base de datos Access . Instrucciones
1

Abra el programa de desarrollo de software Visual Basic 6 y abra el proyecto de escritorio que desee utilizar para crear la base de datos . Abra el archivo para ver el código en el editor de Visual Basic 6 .
2

Añada la llamada biblioteca ADOX en la parte superior de su archivo de codificación. Copia y pega el código siguiente al principio del archivo abierto en el editor:

Importaciones ADOX
3

Crear una variable de biblioteca de clases "categoría" . Debe crear esta variable de biblioteca de clases para utilizar la función "crear" que crea la base de datos Access . Agregue el código siguiente al archivo :

db As Catalog = Nuevo Catálogo ()
4

Crear la base de datos . Debe especificar el nuevo nombre de la base y la carpeta en la que desea guardarlo. El resto de la sentencia de creación es estándar para los parámetros de la biblioteca ADOX . El siguiente código crea la base de datos :

db.Create ( " Provider = Microsoft.Jet.OLEDB.4.0 ; Data Source = c: \\ database \\ db.mdb ; Jet OLEDB: Engine Tipo = 5 ")

el código anterior crea una nueva base de datos llamada " db.mdb " en la carpeta "base de datos " .