运行时错误“70”权限在 VB6 中被拒绝答案

【问题标题】：RunTime Error '70' Permission Denied in VB6运行时错误“70”权限在 VB6 中被拒绝
【发布时间】：2019-11-27 21:34:28
【问题描述】：

我正在使用 VB6。我创建的工具提取了几个 zip 文件并将它们解压缩到我在本地创建的文件夹中。在我的代码的清理部分中，我使用此代码删除了文件夹

If (f.FolderExists(path + "Extracted Files") = True) Then
     f.DeleteFolder (path + "Extracted Files")
End If

当我运行此代码时，我在 f.DeleteFolder(path + 'Extracted Files') 行中收到错误 Run Time Error '70' 和 Permission Denied。

我哪里出错了？还是我需要创建具有不同权限的文件夹？

【问题讨论】：

标签： vb6

【解决方案1】：

也许一个或多个文件是只读的？使用可选的 force 参数强制删除：

f.DeleteFolder (path + "Extracted Files"), True

【讨论】：

【解决方案2】：

您正在使用用另一种语言编写的库来提取文件？验证是否打开了任何指针，很可能是某个文件已打开，祝你好运！

【讨论】：

【解决方案3】：

在注册表编辑器中，导航到以下注册表项：

HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Policies\System

【讨论】：