Читаем Windows Script Host для Windows 2000/XP полностью

Set Controller = WScript.CreateObject("WshController")

' Создаем сценарий на удаленной машине (объект WshRemote)

Set RemScript = Controller.CreateScript("D:\\RemoteScript.js", "stand")

RemScript.Execute  ' Запускаем удаленный сценарий

WScript.Echo "Удаленный сценарий запущен"

While RemScript.Status <> 2

 ' Цикл выполняется до завершения удаленного сценария

 WScript.Sleep 100  ' Приостанавливаем сценарий на 0,1 сек

Wend

WScript.Echo "Выполнение удаленного сценария завершено"

'*************  Конец *********************************************

Контролировать ход выполнения удаленных сценариев можно не только путем анализа свойства Status, но и с помощью обработки событий Start (запуск сценария), Error (ошибка при выполнении сценария) и End (завершение работы сценария) объекта WshRemote; соответствующие примеры сценариев на языках JScript и VBScript приведены в листингах 2.55 и 2.56.

Напомним, что для обработки событий объекта нужно в сценарии сначала создать экземпляр этого объекта, а затем соединиться с ним при помощи метода ConnectObject, указав нужный префикс для функций-обработчиков:

Controller = WScript.CreateObject("WshController");

RemScript = Controller.CreateScript("D:\\RemoteScript.js ", "stand");

WScript.ConnectObject(RemScript, "RemoteScript_");

Затем в тексте сценария описываются функции RemoteScript_Start, RemoteScript_Error и RemoteScript_End, управление в которые будет передаваться при наступлении соответствующих событий.

Листинг 2.55. Обработка событий объекта WshRemote (JScript)

/**********************************************************************/

/* Имя: RemoteEvents.js                                               */

/* Язык: JScript                                                      */

/* Описание: Обработка событий, возникающих при выполнении удаленного */

/*           сценария                                                 */

/**********************************************************************/

var Controller,RemScript,IsQuit;  //Объявляем переменные

//Создаем объект WshController

Controller = WScript.CreateObject("WshController");

//Создаем сценарий на удаленной машине (объект WshRemote)

RemScript = Controller.CreateScript("D:\\RemoteScript.js ", "stand");

//Устанавливаем соединение с объектом WshRemote

WScript.ConnectObject(RemScript, "RemoteScript_");

RemScript.Execute();  //Запускаем удаленный сценарий

IsQuit = false;

while (!IsQuit) WScript.Sleep(100);  //Приостанавливаем сценарий на 0,1 сек

WScript.Quit();  //Выходим из сценария

/***************  Функции-обработчики событий  ***********************/

function RemoteScript_End() { //Событие End

 WScript.Echo("Выполнение удаленного сценария завершено");

 IsQuit = true;

}

function RemoteScript_Error() { //Событие Error

 //Выводим на экран описание возникшей ошибки

 WScript.Echo("Ошибка при выполнении удаленного сценария: " +

  RemScript.Error.Description);

 IsQuit = true;

}

Перейти на страницу:

Похожие книги

Access 2002: Самоучитель
Access 2002: Самоучитель

В книге рассматривается широкий круг вопросов, связанных с использованием программной среды Access 2002, которая является составной частью пакета Office 2002 и предназначена для создания банка данных в самых различных предметных областях.Подробно описывается методика проектирования объектов базы данных (таблицы, формы, отчеты, страницы доступа к данным, запросы, модули).Детально обсуждаются вопросы создания интегрированной базы данных в единой среде Access 2002: формирование БД с нуля, конвертирование в программную среду баз данных, созданных в ином программном окружении – Clarion, FoxPro.Особое внимание уделяется формированию разнообразных запросов к интегрированной базе данных Access 2002 с использованием языков программирования SQL, VBA и макросов.Приводятся общие сведения о возможностях языка обмена данными между различными компьютерами и приложениями (XML). Описываются возможности использования гиперссылок, связывающих базу данных с другими программными продуктами. Объясняется, как можно работать с базой данных Access 2002 без установки ее на компьютер, используя технологию ODBC (Open Data Base Connectivity). В приложениях приводятся количественные параметры Access 2002 и связанная с этой СУБД терминология.Предлагаемая книга будет полезна специалистам, занимающимся практической разработкой банков данных и приложений на их основе, а также студентам вузов, изучающим информатику.

Павел Юрьевич Дубнов

Программирование, программы, базы данных / ОС и Сети / Книги по IT