Base de datos

Miguel
13 de Abril del 2004
Con que sentencia (desde Form load) puedo crear una base de datos desde visual cada vez que ejecute el programa.

Gracias

Meifer
13 de Abril del 2004
Hola Miguel, espero q t sirva este codigo

declara estas variables
Dim MiBaseDeDatos As Database
Dim MiWorkspace As Workspace
Dim Ruta As String

Private Sub Form_Load()
Set MiWorkspace = DBEngine.Workspaces(0)
Ruta = App.Path & "\BD.mdb"
Set MiBaseDeDatos = MiWorkspace.CreateDatabase(Ruta, dbLangGeneral, dbVersion30)
End sub

Miguel
13 de Abril del 2004
me da problemas al declarar database me dice que no esta definido por el usuario,
¿tendré que introducir un código en el módulo?

gracias

Meifer
13 de Abril del 2004
En el menu proyecto =====> referencia

activa el q dice microsoft dao 3.6 objeto library