Reply to Anbindung an Access -> DB komprimieren on Thu, 12 Jul 2007 20:41:05 GMT

AST — Thu, 12 Jul 2007 20:41:05 GMT

Hallo,

ich arbeite von meiner Software aus mit einer Access-DB (ADO, Query). Wie kann ich die Datenbank komprimieren ? Die meisten User haben kein Access auf ihrem Rechner und ich will es automatisiert ablaufen lassen.

AST

Reply to Anbindung an Access -> DB komprimieren on Thu, 12 Jul 2007 21:51:26 GMT

holg_er — Thu, 12 Jul 2007 21:51:26 GMT

Datenbank komprimieren:

bool CompactDatabase(String f1,String psw)
{
 try
 {
   String Provider1="Provider=Microsoft.Jet.OLEDB.4.0"
   ";Data Source="+f1+
   ";Jet OLEDB:Database Password="+psw;
   String Provider2="Provider=Microsoft.Jet.OLEDB.4.0"
   ";Data Source="+f1+".tmp"+
   ";Jet OLEDB:Database Password="+psw;
   Variant Adoobj=Variant::CreateObject("JRO.JetEngine");
   Adoobj.OleProcedure("CompactDatabase",Provider1.c_str(),Provider2.c_str());
   DeleteFile(f1);
   RenameFile(f1+".tmp",f1);
   return true;
 }
 catch(...)
 {
   return false;
 }
}

2. http://support.microsoft.com/kb/508636/de