vb.net - 如何在 vb.net 中备份 ms access 数据库？

Question

如何在vb.net中备份ms access数据库？我们要给某公司做一个系统，但是我们老师根本不教我们，请大家帮忙。知道怎么做吗？

Answer 1

备份 Access 数据库(或任何单文件数据库)的最简单方法是简单地复制文件。但要注意异常，因为文件可能已被锁定。

System.IO.File.Copy( _
    "C:\Your\original\database.mdb", _
    String.Format("D:\BackUps\{0:yyyyMMdd}.mdb", Date.Today) _
)

此外，您可以允许用户指定文件应复制到的位置和文件名。这是一种相当简单的方法，只需使用 System.Windows.Forms 控件 OpenFileDialog和 SaveFileDialog .

Using openDialog As New OpenFileDialog()
    openDialog.CheckFileExists = True
    openDialog.CheckPathExists = True
    openDialog.Filter = "Microsoft Access Database (*.mdb)|*.mdb"
    openDialog.RestoreDirectory = True

    Using saveDialog As New SaveFileDialog()
        saveDialog.CheckFileExists = False
        saveDialog.CheckPathExists = True
        saveDialog.FileName = Date.Now.ToString("yyyyMMdd") & ".mdb"
        saveDialog.Filter = "Microsoft Access Database (*.mdb)|*.mdb"
        saveDialog.RestoreDirectory = True

        If openDialog.ShowDialog() = Windows.Forms.DialogResult.OK AndAlso saveDialog.ShowDialog() = Windows.Forms.DialogResult.OK Then
            If File.Exists(openDialog.FileName) Then
                File.Copy(openDialog.FileName, saveDialog.FileName)
            End If
        End If
    End Using
End Using

如果您想知道那些 RestoreDirectory 是什么property is doing: 这两个对话框正在将应用程序的当前目录移动到指定的路径，如果您假设当前目录仍未更改，这可能会在以后产生有趣的效果。为了防止这种行为，我们设置了这个属性。