Страница:
Страница:
Вопрос: VBS>>Command
Добавлено: 30.07.07 20:32
Автор вопроса: Valya | ICQ: 419-283-432
'Почему не работает ключ "-r" ???
----------------------
Option Explicit
Dim S
dim amp
Dim Args
Set Args = WScript.Arguments
'S = Args.Count & amp & " arguments." & amp & vbNewLine
Dim I
For I = 0 to Args.Count - 1
S = Args(I) & & vbNewLine
Next
Set Args = Nothing
if S = "-r" then
MsgBox "-rrr"
end if
Ответы
Всего ответов: 0