[решено] Запрос параметров и выполнение команды

[sea707]

Добрый день! Как сделать скрипт для запроса ввода данных и выполнение команды!?

:) Вообщем, нужно вывести запрос для ввода имени компьютера и выполнить команду: radmin.exe /connect:имя_компа:4899

Что-то написал, но не вышло (((

Set objShell = CreateObject("Wsсriрt.Shell")
intValue = InputBox("Please Enter Computer Name:")
WshShell.Run "radmin.exe /connect:" & intValue & ":4899"

[DmitriiV]

1. В выражении Wscriрt замените русскую букву "р" на английскую "p".
2. В выражении WshShell.Run замените WshShell на objShell.
3. Возможно, потребуется указать полный путь к файлу запускаемого приложения (путь, содержащий пробелы заключайте в кавычки).
Пример: """C:\Program Files\Radmin Viewer\radmin.exe"" /connect:"

[sea707]

1. В выражении Wscriрt замените русскую букву "р" на английскую "p". »
+100500

Копировал несколько строк с другого скрипта, по всей видимости он тоже не пашет )))

Окончательный вариант:

Set objShell = CreateObject("Wscript.Shell")
intValue = InputBox("Please Enter Computer Name:")
objShell.Run "radmin.exe /connect:" & intValue & ":4899"