|
Удаление содержимого временного каталога Windows
В файле deltemp.vbs (см. листинг) помещен текст скрипта, который удаляет содержимое временного каталога Windows.
Комментарии к коду:
Все операции осуществляются через объект FileSystemObject.
Полный путь ко временному каталогу Windows определяется через метод GetSpecialFolder. К сожалению, в отличие от функций SHGetSpecialFolderLocation и SHGetSpecialFolderPath, этот метод может вернуть пути только к трем каталогам: Windows, System и Temp.
Перед тем, как удалить файл, скрипт обнуляет его атрибуты - чтобы можно было удалять read-only файлы.
Обязательно нужно обеспечить обработку ошибок (On Error): как правило, во временном каталоге находятся несколько открытых на запись файлов, которые используются разными программами для хранения своих временных данных. Без обработчика ошибок скрипт завершит работу по ошибке доступа (Access denied) после попытки удалить первый же такой файл.
Листинг: deltemp.vbs
Option Explicit
Dim FSO
Set FSO = WScript.CreateObject("Scripting.FileSystemObject")
Dim TempFolder
Set TempFolder = FSO.GetSpecialFolder(2) ' 2 = TEMP
On Error Resume Next
Dim Files, File
Set Files = TempFolder.Files
For Each File In Files
File.Attributes = 0
File.Delete
Next
у начальника работает у меня нет, попробуй чего выйдет то ?
|