使用JRO(工程菜单->引用->Microsoft jet and replication objects 2.5)
JRO jetengine对象用一个CompactDatabase方法可以压缩数据库。
下面是一个使用CompactDatabase压缩数据库的例子:
strConnOriginal = "Prvider = Microsoft.jet.oledb.4.0;Data Source = FilePath;" '源数据库
strConnNew = "Microsoft.jet.oledb.4.0;Data Source = FilePath;" '压缩后数据库
set jroEngine = New JRO.JetEngine
jroEngine.CompactDatabase strConnOriginal,strConnNew
JRO jetengine对象用一个CompactDatabase方法可以压缩数据库。
下面是一个使用CompactDatabase压缩数据库的例子:
strConnOriginal = "Prvider = Microsoft.jet.oledb.4.0;Data Source = FilePath;" '源数据库
strConnNew = "Microsoft.jet.oledb.4.0;Data Source = FilePath;" '压缩后数据库
set jroEngine = New JRO.JetEngine
jroEngine.CompactDatabase strConnOriginal,strConnNew
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货