vbscript - vbscript 在删除过程中保留访问拒绝文件

Question

当我尝试在有限时间内删除服务器上一个指定文件夹中的某些文件夹/文件时遇到问题，并且某些文件夹/文件在处于拒绝访问状态时无法删除和保留某些文件夹/文件，可以vbs做吗？

Answer 1

我在这里在您的评论中回答您的问题，因为有更多的空间来写:)

如果您想访问并且失败，则 VBscript 会引发错误。您的脚本停止工作。这里的解决方案是实现错误处理。因此，您可以做的是将该部分移动到子例程或函数中并On Error Resume Next像这样激活：

Sub DeleteFolder(p_sFolder)
  Err.Clear
  On Error Resume Next

  Dim fso : Set fso = CreateObject("scripting.FileSystemObject")
  Dim deletefolder : Set deletefolder = fso.GetFolder(p_sFolder)
  deletefolder.Delete(True) 
  Set fso = Nothing

  If Err.Number<>0 THen
    Wscript.Echo Err.Number
    Wscript.Echo Err.Description
    ' here you can handle with the error with additional code
  End If

End Sub