como puedo compactar una base de datos mdb?

[viajero2015]

Hola amigos, como puedo compactra una base d edatos mdb desde el menu de mi sistema. que dll exite en windows que puedo usar para tal objetivo?.

saludos TOMAS

[delphi.com.ar]

http://www.clubdelphi.com/vertruco.php?id=21

Saludos!

[viajero2015]

Hola, encontre un procedimeinto para compactar una BD access con ADO peor en el momento que envio a compactar con la siguiente instruccion

JE.CompactDatabase(CustomerData.ADOConnection1.ConnectionString, Conexao);

me dice que que la base de datos esta siendo usada en forma exclusiva por el user admin y que no puede compactar, sin embargo en el

CustomerData.ADOConnection1..Mode := cmReadWrite; peor aun si me da problemas

alquien me podra ayudar en esto, de poder abrir una BD mdb en forma que yo pueda compactar la Bd sin problema?.

saludos TOMAS

[delphi.com.ar]

viajero2015 comentó:
...me dice que que la base de datos esta siendo usada en forma exclusiva por el user admin y que no puede compactar...

Si la base de datos, la tiene abierta algún usuario en modo exclusivo, no va a funcionar nunca!... Te recomiendo verificar que en el momento de compactar la base, solo tu tengas acceso de modo exclusivo a esta DB, y no tener ninguna aplicación conectada a esta, o tu misma aplicación con una conexión anterior.

Saludos!

[viajero2015]

Hola, gracias si, yo solo soy el que la uso o sea solamente la usa ene se momento la aplicacion, como hago para poder compactarla, desconectarla en ese momento? y luego conectarla?.

cuando compacto la base de datos que estoy garantizando?.


saludos TOMAS

[zerelho]

Muy facil, suponiendo que ConexionBD es la TADOConnection y CompactarBD es la funcion donde compactas las BD en Access:

Código Delphi [-]
 
ConexionBD.Close; 
CompactarBD(ficheroAccess);
ConexionBD.Open

Primero cierras la conexión con la BD, y una vez compactado el MDB, vuelves a abrir la conexión.