Удаление старых файлов VB script

Пытаюсь удалить файлы старше 3 минут, не удаляются, подскажите где копать. Заранее спасибо.


Dim objFile
Dim objFolder
Dim objfso

Set objfso = CreateObject("Scripting.FileSystemObject")
Set objFolder = objfso.GetFolder("X:\Копия")
Set objFile = objFolder.Files

For Each objFile In objFolder.Files
    
If DateDiff("n", objFile.DateLastModified, Now) > 3 Then
    objFile.Delete, True
End If

Next
End Sub```

Ответы (0 шт):