DeleteFile 或 CopyFile 失败，错误 32813

Question

我们在 VBscript 中使用这些简单的命令运行在客户端遇到了一个奇怪的问题：

FileSystemObject.DeleteFile(AppLocalPath)
FileSystemObject.CopyFile AppRemotePath, AppLocalPath

该脚本多年来每天都有运行。突然间，这些命令现在失败并出现错误 32813。

这只发生在客户端的一个用户身上，所以我认为这是一个本地问题。

我已经尝试重新创建位于 %LocalAppData% 中的本地文件夹结构，甚至重新启动了保存源文件夹的文件服务器。

有问题的文件可以手动删除和复制，没有错误。

Experts Exchange 的一位成员偶然报告了一个看似相同的问题。因此，这可能是一个更广泛的问题。

我未能找到 FilesystemObject 的一些 错误代码文档 以便进行调试。有人有这些的 link 吗？

OS 是 Windows 10 64 位运行宁默认 Windows Defender。

编辑：完整脚本可查看here

Answer 1

错误是由 Windows Defender 在 wscript.exe 上检测到误报引起的。

一旦被标记为异常，脚本运行将按预期执行。

最后离线扫描机器，没有发现任何威胁。

Answer 2

您可以自动禁用 Windows Defedner real-time 保护和 re-enable 类似：

Dim objShell
Set objShell = CreateObject("Wscript.Shell")
objShell.Run "powershell.exe -NoProfile -Command ""& {Set-MpPreference -DisableRealtimeMonitoring $true}""",0,True
' YOUR CODE HERE
FileSystemObject.DeleteFile(AppLocalPath)
FileSystemObject.CopyFile AppRemotePath, AppLocalPath
' YOUR CODE HERE
objShell.Run "powershell.exe -NoProfile -Command ""& {Set-MpPreference -DisableRealtimeMonitoring $false}""",0,True
Set objShell = Nothing
Wscript.Quit

仍然禁用整个实时保护不会完全安全。相反，您也可以在路径的那个位置使用 Add-MpPreference -ExclusionPath ""YOUR PATH"" 或使用 Wscript.ScriptFileName。

DeleteFile 或 CopyFile 失败，错误 32813

DeleteFile or CopyFile fail with error 32813

vbscript

windows-10