Windows Script Host для Windows 2000/XP - Андрей Попов

var vbCritical=16;

tryВ  {

 //Соединяемся с WMI

В WMI=GetObject("winMgmts:");

} catch (e) {  //Обрабатываем возможные ошибки

В if (e != 0) {

  //Выводим сообщение об ошибке

  Mess="Ошибка при соединении с WMI";

  WshShell.Popup(Mess,0,"Запущенные процессы",vbCritical);

  //Выходим из сценария

В  WScript.Quit();

В }

}

//Создаем коллекцию всех запущенных процессов

Processes=new Enumerator(WMI.ExecQuery("SELECT * FROM Win32_Process"));

//Рнициализируем строку SList

SList="Запущенные процессыnn";

//Цикл по всем элементам коллекции

while (!Processes.atEnd()) {

В //Рзвлекаем текущий элемент коллекции (запущенный процесс)

В Process=Processes.item();

 //Формируем строку с именами процессов

В SList+=Process.Name+"n";

 //Переходим к следующему элементу коллекции

В Processes.moveNext();

}

//Выводим информацию на экран

WScript.Echo(SList);

/*************  Конец *********************************************/

Закрытие всех экземпляров запущенного приложения

WMI позволит нам закрывать сразу все экземпляры какого-либо запущенного приложения.

В сценарии KillNotepads.js мы будем закрывать все копии Блокнота (Notepad.exe). Как и в предыдущем примере, сначала мы соединяемся с WMI внутри блока try конструкции try…catch:

try {

 //Соединяемся с WMI

В WMI=GetObject("winMgmts:");

} catch (e) {

 //Обрабатываем возможные ошибки

В if (e != 0) {

  //Выводим сообщение об ошибке Mess="Ошибка при соединении с WMI";

  WshShell.Popup(Mess, 0, "Закрытие всех Блокнотов", vbCritical);

  //Выходим из сценария

В В WScript.Quit();

В }

}

Далее нам нужно получить коллекцию всех процессов с именем "Notepad.exe". Для этого мы выполняем соответствующий SQL-запрос, текст которого предварительно заносится в переменную SQuery:

//Формируем текст запроса

SQuery="SELECT * FROM Wln32_Process WHERE Name='Notepad.exe'"

//Создаем коллекцию-результат запроса

Processes=new Enumerator(WMI.ExecQuery(SQuery));

Теперь, имея коллекцию нужных нам процессов, мы в цикле while перебираем все ее элементы, вызывая для каждого элемента (запущенного экземпляра Блокнота) метод Terminate(), который завершает этот процесс:

//Цикл по всем элементам коллекции

while (!Processes.atEnd()) {

В //Рзвлекаем текущий элемент коллекции (процесс СЃ именем Notepad.exe)

В Process=Processes.item();

В try {

  //Завершаем процесс

В  Process.Terminate();

В } catch (e) {

  //Обрабатываем возможные ошибки if (e != 0) {

  //Выводим сообщение об ошибке

  Mess="Ошибка при закрытии текущего экземпляра";

  WshShell.Popup(Mess, 0, "Закрытие всех Блокнотов", vbCritical);

В }

}

//Переходим к следующему элементу коллекции

Processes.moveNext();

Полностью текст сценария KillNotepads.js приведен в листинге 11.22.

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

/* РРјСЏ: KillNotepads.jsВ В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В  */

/* Язык: JScript                                                    */

/* Описание: Закрытие всех запущенных экземпляров Блокнота          */

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

var

 WMI,       //Экземпляр WMI

 SQuery,    //Текст запроса

 Processes, //Коллекция процессов

 Process,   //Экземпляр коллекции

 WshShell;  //Объект WshShell

//Рнициализируем константы для диалоговых РѕРєРѕРЅ

var vbCritical=16;

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

WshShell = WScript.CreateObject("WScript.Shell");

try {

 //Соединяемся с WMI

В WMI=GetObject("winMgmts:");

} catch (e) {  //Обрабатываем возможные ошибки

В if (e != 0) {

  //Выводим сообщение об ошибке

  Mess="Ошибка при соединении с WMI";

  WshShell.Popup(Mess,0,"Закрытие всех Блокнотов",vbCritical);

  //Выходим из сценария

В  WScript.Quit();

В }

}

//Формируем текст запроса 

SQuery="SELECT * FROM Win32_Process WHERE Name='Notepad.exe'"

//Создаем коллекцию-результат запроса

Processes=new Enumerator(WMI.ExecQuery(SQuery));

//Цикл по всем элементам коллекции

while (!Processes.atEnd()) {

В //Рзвлекаем текущий элемент коллекции (процесс СЃ именем Notepad.exe)

В Process=Processes.item();

В try {В 

  //Завершаем процесс

В  Process.Terminate();

 } catch (e) {  //Обрабатываем возможные ошибки

В  if (e != 0) {

   //Выводим сообщение об ошибке

   Mess="Ошибка при закрытии текущего экземпляра";

   WshShell.Popup(Mess,0,"Закрытие всех Блокнотов",vbCritical);

В  }

В }

 //Переходим к следующему элементу коллекции 

В Processes.moveNext();

}

/*************  Конец *********************************************/

Заключение

Для того чтобы автоматизировать и существенно облегчить повседневную работу пользователей и администраторов компьютерных систем, базирующихся на Windows, следует использовать мощные возможности, которые предоставляет сервер сценариев Windows Script Host (WSH), позволяющий создавать полноценные сценарии, работающие непосредственно в операционной системе и использующие внешние объекты ActiveX.

Конечно, написание сценариев WSH по сравнению, скажем, с созданием командных файлов поначалу может показаться довольно непростой задачей — кроме знания специальных языков сценариев (например, VBScript или JScript) и представления об объектах ActiveX, нужно знать, по крайней мере, собственную объектную модель WSH и структуру объекта FileSystemObject. Однако с помощью этих средств уже можно писать сценарии, которые имеют полный доступ к файловой системе компьютера, системному реестру и ресурсам локальной сети.