ACCESS问题(100分)

  • 主题发起人 主题发起人 yjying
  • 开始时间 开始时间
Y

yjying

Unregistered / Unconfirmed
GUEST, unregistred user!
请问ACCESS中的数据记录删除后,为何文件大小没有改变,是不是该记录可恢复,如何恢复???
 
压缩一下就变小了
 
同意:LawrenceZhang
工具—> 数据库实用工具 ->
 
请问,如何在Delphi中调用Access的压缩功能?
 
var
AccessApp: variant;

AccessApp := CreateOleObject('Access.Application');
AccessApp.DBEngine.CompactDatabase(Edit3.Text, 'F:/Temp/Compacted.mdb');
AccessApp := NULL;
 
Edit3.Text为原文件名,'F:/Temp/Compacted.mdb'即为压缩后的文件名
 
多谢xWolf兄丈义相助,我已试过你的方法,取得成功,只是如果Access已加密如何解决?
 
//Password:Access密ma
AccessApp.DBEngine.CompactDatabase(
FileName, NewFileName, '', 0, ';pwd=' + Password);
 
多人接受答案了。
 
后退
顶部