如果您尝试在当前打开的文件上使用FileCopy语句,则会发生错误.但是,FileSystemObject的CopyFile函数没有问题,所以请改用它.首先,您需要添加对Microsoft Scripting Runtime的引用(在Project-> References ...菜单上).然后你可以这样做:
Dim fso As New FileSystemObject
fso.CopyFile "\\someOtherComputer\share\foo.mdb", "C:\foo.mdb"
Run Code Online (Sandbox Code Playgroud)