Как выделить нужное количество файлов

[shveicar]

Добрый день. Подскажите, можно ли в данный скрипт

selector+.vbs

добавить окно - с вводом количества выделяемых файлов? Спасибо.[/quote]

[Rodny]

shveicar
Можно.
В параметр кнопки написать, например, "?100" без кавычек, существенное здесь - вопросительный знак.
В скрипте

Код: Выделить всё

Const NumbFiles = 20000 ' Число выделяемых файлов 
Dim Files, TCS, Selection 
Set TCS = CreateObject("TCScript.Helper")

заменить на

Код: Выделить всё

Dim Files, TCS, Selection, NumbFiles
Set TCS = CreateObject("TCScript.Helper")
NumbFiles = CInt(WScript.Arguments(0)) ' Число выделяемых файлов из параметров

[shveicar]

Большое Спасибо! все работает.