我想做一个access数据库的备份和恢复的功能

Question

苯苯 把整个数据库 拷到另一个目录不就行了
  另外 你还可以加密啊 压缩什么的
恢复 你就再拷回来啊

Answer 1

使用JRO
VB的代码（从MSDN中COPY的。）
Public Sub CreateRep()   Dim repMaster As New JRO.Replica   ' Connect to the Northwind database.
   repMaster.ActiveConnection = "C:\Program Files\Microsoft Office\" & _
      "Office\Samples\Northwind.mdb"   ' Delete myTestRep if it exists.
   If (Dir("C:\Program Files\Microsoft Office\" & _
      "Office\Samples\myTestRep.mdb") <> "") Then Kill _
      ("C:\Program Files\Microsoft Office\Office\Samples\" & _
      "Replica of Northwind.mdb")   ' Create a full replica.
   repMaster.CreateReplica "C:\Program Files\Microsoft Office\" & _
      "Office\Samples\Replica of Northwind.mdb", "My Full Replica1", _
      jrRepTypeFull, jrRepVisibilityGlobalEnd Sub