Цитата Roman3D:
Повесил его на кнопку в TC.
|
Там ведь можно задать дополнительные параметры? Добавьте
%P (это текущая панель), а в скрипте примерно так:
Код:

Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.CreateFolder WScript.Arguments(0) & "Новая папка 1"
FSO.CreateFolder WScript.Arguments(0) & "Новая папка 2"
FSO.CreateFolder WScript.Arguments(0) & "Новая папка 3"
Set FSO = Nothing
WScript.Quit