Поиск и удаление папки у пользователей

[Aventer]

Доброго времени суток. Необходим скрипт (VBS, желательно, но не критично). Для поиска и удаления папки в профилях доменных юзеров. (Temporary Internet Files).
С дальнейшим его запуском через планировщик.

[Iska]

Aventer, зачем нужно удалять папку «Temporary Internet Files»?

[Aventer]

Работаем через терминальные сервера, на каждом довольно большое количество пользователей. Места на диске не хватает, а темпы outlook'a у наших юзеров занимают не мало. Да и, в принципе, инициатива не моя... Так что выбор не велик. Мне ее удалять нужно не больше, чем вам, но "хозяин-барин". Так что буду признателен, если кто поможет :)

[Iska]

Пробуйте:
Option Explicit

Dim strRootFolder


strRootFolder = WScript.CreateObject("Shell.Application").NameSpace("shell:cache").self.Path

With WScript.CreateObject("Scripting.FileSystemObject")
On Error Resume Next

.DeleteFile objFSO.BuildPath(strRootFolder, "*.*"), True
.DeleteFolder objFSO.BuildPath(strRootFolder, "*.*"), True
End With

WScript.Quit 0

С дальнейшим его запуском через планировщик. »
Не советую. Назначьте на вход пользователя посредством групповой политики.

[Aventer]

Код:
Option Explicit
Dim strRootFolder
strRootFolder = WScript.CreateObject("Shell.Application").NameSpace("shell:cache").self.Path
With WScript.CreateObject("Scripting.FileSystemObject")
On Error Resume Next
.DeleteFile objFSO.BuildPath(strRootFolder, "*.*"), True
.DeleteFolder objFSO.BuildPath(strRootFolder, "*.*"), True
End With
WScript.Quit 0 »
Либо я что-то не то делаю, либо не работает :(

[Iska]

Либо я что-то не то делаю, либо не работает »
Описывайте подробно, что и как Вы делаете.