Удалить метод vbscript, создающий путь не найден Ошибка, когда путь является действительным

Question

strFolderPathToDelete = strBackupFoldToDelete & strInternationalDate

set objFSOFolderToDelete = CreateObject("Scripting.FileSystemObject")

set objDeleteFolder = CreateObject("Scripting.FileSystemObject")

'Wscript.Echo strFolderPathToDelete the folder path is valid

set objDeleteFolder = objFSOFolderToDelete.GetFolder(strFolderPathToDelete)

'Wscript.Echo objDeleteFolder the folder path is valid

objDeleteFolder.Delete true ' why this line produces error path not found?

Answer 1

Попробуйте вызвать DeleteFolder метод FileSystemObject , чтобы увидеть, помогает ли это, и окружить его обработкой ошибок с надеждой на выявление проблемы, например:

strFolderPathToDelete = strBackupFoldToDelete & strInternationalDate

With CreateObject("Scripting.FileSystemObject")
    If .FolderExists(strFolderPathToDelete) Then
        On Error Resume Next : Err.Clear
        .DeleteFolder strFolderPathToDelete, True
        If 0 = Err.Number Then 
            WScript.Echo "Successfully deleted folder: " & strFolderPathToDelete
        Else
            WScript.Echo "Error (" & CStr(Err.Number) & ") deleting folder: " & Err.Description
        End If
        On Error Goto 0
    Else
        WScript.Echo "Sorry, folder does not exist: " & strFolderPathToDelete
    End If
End With

Вполне возможно, что папка может быть символической c ссылкой или переходом на другой физический путь, или, возможно, ссылкой или общей папкой DFS, к которой у вас нет достаточных разрешений DELETE.

Кроме того, убедитесь, что папка пуста (не содержит скрытых или системных файлов), и убедитесь, что к ней нет доступа (с открытыми маркерами) перед ее удалением. Корпоративные решения для обеспечения безопасности, защиты от вирусов и резервного копирования могут иногда вызывать неожиданные проблемы, а также вредоносные программы на зараженных системах.

Надеюсь, это поможет.