为什么ACCESS数据库的数据删除了,但是文件却没有变小?(50分)

  • 主题发起人 主题发起人 chen_ke
  • 开始时间 开始时间
C

chen_ke

Unregistered / Unconfirmed
GUEST, unregistred user!
数据库的文件总是在不断地增大?
 
删除是逻辑删除,物理删除需要进行一次“压缩”操作。
 
远帆说的OK,下面是实现代码
procedure TForm1.Button2Click(Sender: TObject);
var
Dest_DB_Connection: OleVariant;
l_Source_Con_Str, l_Dest_Con_Str: string;
begin
try
Dest_DB_Connection := CreateOleObject('JRO.JetEngine');
except
Exit;
end;

l_Source_Con_Str := 'Data Source=C:/1.mdb;';

l_Dest_Con_Str := 'Data Source=C:/2.mdb;';

try
OleCheck(Dest_DB_Connection.CompactDatabase(l_Source_Con_Str, l_Dest_Con_Str));
except
end;
end;
 
用access的,工具-数据库实用工具-压缩数据库
 
对,应该pack一下
 
应该压缩
 
多人接受答案了。
 

Similar threads

回复
0
查看
1K
不得闲
S
回复
0
查看
751
SUNSTONE的Delphi笔记
S
S
回复
0
查看
758
SUNSTONE的Delphi笔记
S
S
回复
0
查看
859
SUNSTONE的Delphi笔记
S
S
回复
0
查看
785
SUNSTONE的Delphi笔记
S
后退
顶部