Я написал простую функцию, которая удаляет все файлы в каталоге. Все файлы в моем каталоге (включая каталог) имеют полное разрешение для всех пользователей, но моя функция не работает, и я получаю эту ошибку: «Доступ к пути запрещен».
Очень важно : эта ошибка появляется только для файла, который я скопировал вручную из другого каталога, вместо этого для тех файлов, которые моя программа создает и сохраняет, ошибки нет.
Это моя функция:
Private Sub DeleteFile(ByVal Folder As IO.DirectoryInfo)
Dim _fl As IO.FileInfo
For Each _fl In Folder.GetFiles
_fl.Delete()
Next
_fl = Nothing
End Sub