vb连接access数据库:VB 压缩Access数据库代码

’工程-引入MicrosoftJetandReplicationObjectsLibrary

PrivateSubCommand1_Click()

DimFIXDBAsNewJRO.JetEngine
FIXDB.CompactDatabase\"Provider=Microsoft.Jet.OLEDB.4.0;DataSource=c:aa.mdb\",_
\"Provider=Microsoft.Jet.OLEDB.4.0;DataSource=c:aac.mdb\"
EndSub

’CompactDatabase第一个参数是原始数据库，第二个是目标数据库

延伸阅读

• 2009-2-12-- access数据库查询:完成Access数据库地Web查询
• 2009-9-30-- access数据库连接:C# 建立和ACCESS的数据库连接
• 2009-9-12-- access数据库连接:远程连接access数据库的思路方法
• 2009-2-12-- vb连接数据库:如何设置对VB数据库连接的动态路径
• 2009-2-12-- vb连接access数据库:使用Perl连接Access数据库详解
• 2008-9-26-- sqlserver数据库:SQL Server连接ACCESS数据库
• 2009-2-12-- vb远程数据库:VB中远程数据库的访问（1）－数据连接
• 2008-9-25-- vb数据库查询:VB查询数据库记录(2)
• 2009-1-15-- vbaccess:VB.net2008和ACCESS创建登录程序
• 2009-2-12-- vbaccess删除:VB程序实现删除Access的多个表