数据库备份，恢复

 
备份数据库是利用文件的复制功能，即FileCopy命令。在进行文件备份前，应对VB作如下设置，在“部件”中加入Microsoft Jet and Replication Object 2.5 library，并在适当的位置加入以下程序代码

Dim jro As jro.JetEngine

Set jro = New jro.JetEngine

jro.CompactDatabase"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & file_mdb, " __’来源文件Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & copy_mdb & ";Jet OLEDB:Engine Type=4" ’目的文件

上述代码要在Data Source处加入相应来源文件内容及目的文件的路径。

Original Copy: http://blog.csdn.net/raymondzhang/archive/2007/04/03/1551074.aspx