Question

我有以下问题：

我们在远程服务器上有一个MS Access文件，可供3人访问。每天都应该通过复制文件并重命名来进行备份。（我无权访问服务器，所以不能在那里放一个脚本！）

一旦第一个人打开文件并进行备份，除非它已经存在，否则是否有可能启动备份过程？

或者您有其他易于实施的建议吗？

我真的很感激这里的任何帮助。不是Windows用户。

谢谢

Answer 1

您可以使用VBA和FileSystemObject：

Function BackUp()
Dim fs As Object 'FileSystemObject
Set fs = CreateObject("Scripting.FileSystemObject")
FileName = CurrentProject.Path & "\" & Format(DATE, "yyyymmdd.bak")
If Not fs.FileExists(FileName) Then
    fs.copyfile CurrentProject.FullName, FileName, False
End If
End Function

可以通过创建一个autoexec宏来运行该函数 - 一个名为autoexec的宏将在数据库打开时运行。

但是，似乎存在一些问题，因为您没有指定应用程序的后端或前端所在的位置。此外，当没有用户访问后端时，运行此类副本是最好的事情。

MS Access会在打开访问时自动创建副本

1 个答案: