[Iska]

1) Как все это дело скрыть? »

Код:

objShell.Run("%COMSPEC% /с cacls """ & strFolder1 & """ /E /P %Username%:R", 0)

2) Как сделать из этого чуда не 5 окон, а одно? »

Использовать пакетный файл. Вам здесь, в принципе, WSH не нужен, коль Вы напрямую задаёте названия каталогов.

[Добрый Фей]

Iska Спасибо.
Нам нужен именно vbs.
И вот еще один вопрос.. Как автоматически закрыть окна cmd (а их 5!) после выполнения скрипта?

[Iska]

Нам нужен именно vbs. »

Почему? Изложите причины.

И вот еще один вопрос.. Как автоматически закрыть окна cmd (а их 5!) после выполнения скрипта? »

Внимательно перечитать пост, обратив внимание на выделенное цветом.

[Добрый Фей]

Почему? Изложите причины. »

Потому что у пользователей, которым мы делаем этот скрипт, нет прав запускать bat файлы

Внимательно перечитать пост, обратив внимание на выделенное цветом. »

проверили все работает как нужно! спасибо!

[Iska]

Потому что у пользователей, которым мы делаем этот скрипт, нет прав запускать bat файлы »

Спасибо, ясно.

[gora]

cacls.exe - самостоятельная утилита, а не оператор cmd.exe. Может запускать ее непосредственно, без вызова cmd.exe?