Über den
SQL Befehl ging es leider nicht hatte ich vorher schon probiert.
Hab was gefunden wie es geht. JRO-Libray muss eingebunden werden.
Delphi-Quellcode:
JetEngine := CoJetEngine.Create;
JetEngine.CompactDatabase('Data Source=' + File + ';Jet OLEDB:Database Password=oldpass', 'Data Source=' + BakFile + ';Jet OLEDB:Database Password=newpass');