Цитата: OlegON ➤ Надо именно запустить и отломиться...
тогда просто - то что ниже гарантированно запустит то что можно запустит и отвалится :)
========
Запуск приложения производится при помощи объекта WScript.Shell. Первая строка для работы с этим объектом выглядит как
Dim WshShell
set WshShell = WScript.CreateObject("WScript.Shell")
Сам запуск производится при помощи метода Run:
WshShell.Run "Имя_приложения"
Необязательные параметры: цифра (1-10) - вид диалогового окна, true/false - приостанавливать выполнение скрипта пока не завершится работа программы или нет.
Обычно существует две ситуации, когда нам нужно запустить приложения из скрипта:
1) запускаем утилиты командной строки (например, из Resource Kit) и нам нужно получить то, что они возвращают
2) запускаем графическое приложение и передаем туда нажатия клавиш
При запуске утилиты командной строки обратить внимание на следующие моменты:
o если нам нужно возвращать код ошибки, делаем это следующим образом:
sReturn = WshShell.Run("ping " & "192.168.1.2", 1, TRUE)
обязательно должно стоять ключевое слово TRUE, иначе возвращаемый код всегда будет 0;
o если нужно получить вывод от утилиты, записываем его при помощи > в текстовый файл, затем открываем на чтение при помощи FSO, скачиваем в переменную и удаляем. В переменной можно искать значение при помощи функции inStr (не найдено - 0, найдено - значение, отличное от 0).
o если используете не исполняемые файлы, а команды интерпретатора (DIR, CD, MD и т.п.), то команда на запуск должна выглядеть как
WshShell.Run("%COMSPEC% /K dir")
%COMSPEC% - чтобы не выяснять, какой командный интерпретатор работает, /K - чтобы не закрывалось окно командного интерпретатора.
o для того, чтобы не зависеть от наличия утилит на компьютере пользователя, есть смысл выложить используемые утилиты на сервер в сети и обращаться к ним по сетевому имени;