用Delphi压缩Access数据库
来源:互联网 发布:mac chrome 广告插件 编辑:程序博客网 时间:2024/05/16 11:03
procedure CompactMdbDatabase(srcDbname,dstDbname,oldpwd,newpwd:string;bAccess97:boolean=true);
var idbEngine:_dbEngine;
begin
if oldpwd <>'' then oldpwd := ';pwd='+oldpwd;
if newpwd <>'' then newpwd := ';pwd='+newpwd;
if bAccess97 then
begin
idbengine := CreateComObject(dao97.CLASS_DBEngine) as _DBEngine;
idbEngine.CompactDatabase(srcDbname,dstDbname,newpwd,dbVersion30,oldpwd);
end else
begin
idbengine := CreateComObject(dao2000.CLASS_DBEngine) as _DBEngine;
idbEngine.CompactDatabase(srcDbname,dstDbname,newpwd,dbVersion40,oldpwd);
end;
end;
- 用Delphi 压缩Access数据库
- 用Delphi压缩Access数据库
- 用DELPHI压缩ACCESS数据库
- Delphi 压缩Access数据库
- Delphi压缩access数据库
- Delphi下压缩Access数据库
- Delphi动态创建、压缩Access数据库
- DELPHI 创建、压缩ACCESS
- 使用Delphi压缩Access
- delphi压宿Access数据库
- Delphi连接access数据库
- Delphi 收缩Access数据库
- 用C#压缩和修复Access数据库
- 用C#压缩和修复Access数据库
- 用C#压缩和修复Access数据库
- 用C#压缩和修复Access数据库
- 用C#压缩和修复Access数据库
- 怎样压缩access数据库
- MySQL的数据文件一般存放在什么位置?
- 优化Derby数据库
- arp病毒利用的Javascript技术
- 转:几种基于HTTP协议的RPC性能比较,以及ICE接口性能测试比较
- GridView实现删除时弹出确认对话框
- 用Delphi压缩Access数据库
- 最近三个月做的流程定义工具(1)
- 什么是数字签名
- 过年回家流水帐
- Struts2数据标签
- struts2控制标签
- VC常用技巧
- Want pretty syntax highlighting when editing your .cu files in Visual Studio?
- SOA