FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Crear archivo .mdb automáticamente
Hola amigos del club, una aplicación debe verificar la existencia de un archivo de base de datos Access, si éste no existe debe crear el archivo y crear las tablas correspondientes, la pregunta es: cómo puedo hacer ésto en tiempo de ejecución ??.
Gracias !! |
#2
|
||||
|
||||
Aquí tienes un ejemplo de como crear la base de datos, las tablas las creas con SQL y ya lo tienes.
Código:
procedure CreateMSAccessDB(filename : String); var DBEngine, Workspace: Variant; const {Important to use the following constant as is} dbLangGeneral = '; LANGID = 0x0409; CP = 1252; COUNTRY = 0'; dbVersion30 = 32; begin DBEngine := CreateOleObject('DAO.DBEngine'); {DBEngine := CreateOleObject('DAO.DBEngine.35'); For DAO 3.5} Workspace := DBEngine.Workspaces[0]; try Workspace.CreateDatabase(filename, dbLangGeneral, dbVersion30); except on EOleException do ShowMessage('Database already exists'); end; end;
__________________
Guía de Estilo de los Foros Cita:
|
#3
|
|||
|
|||
Alguien podria indicarme un ejemplo algo mas extenso de lectura y escritura de mdb's? Basicamente, ademas de crear el mdb vacio, añadir tablas, campos registros grabacion y lectura...
|
#5
|
||||
|
||||
Aquí tienes cómo crear un fichero MDB por código, cómo modificar columnas/campos de las tablas o cómo crear nuevas tablas, campos y restricciones.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#6
|
|||
|
|||
Muchas gracias Neftali.
Necesitaria ademas la forma de añadir y leer registros a/de las diferentes tablas y quisiera hacerlo sin componentes, ¿Es posible? Un saludo |
#7
|
||||
|
||||
Cita:
Supongo que te refieres a hacerlo "sin componentes visuales". Pues sí. Puedes hacerlo por código si lo deseas dirctamente con los componentes de conexión ADOTable/ADOQuery.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
|
|
|