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
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
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
¿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
activa el q dice microsoft dao 3.6 objeto library