Андрей Попов - Windows Script Host для Windows 2000/XP
WshShell = WScript.CreateObject("WScript.Shell");
//Создаем объект Shell.Application
Shell=WScript.CreateObject("Shell.Application");
//Выводим запрос
Res=WshShell.Popup("Открыть папку "+SPath+"?",0,
 "Вызов стандартных диалогов Windows",vbQuestion+vbYesNo);
if (Res==vbYes) //Нажата кнопка Да
 //Открываем папку в Проводнике
В Shell.Explore(SPath);
/************* Конец *********************************************/
Вызов окна форматирования диска
Диалогoвое окно, позволяющее форматировать диск с заданными параметрами (рис. 11.26), вызывается с помощью системной  функции SHFormatDrive() из библиотечного файла shell32.dll.
Рис. 11.26. Диалоговое окно форматирования диска
Соответствующий пример приведен в листинге 11.16.
Листинг 11.16. Вызов окна форматирования диска
/*******************************************************************/
/* РРјСЏ: FormatDisk.jsВ В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В */
/* Язык: JScript                                                  */
/* Описание: Вызов окна форматирования диска                      */
/*******************************************************************/
//Объявляем переменные
var
В WshShell, //Ркземпляр объекта WshShell
 Res;     //Результат нажатия кнопок в диалоговом окне
//Рнициализируем константы для диалоговых РѕРєРѕРЅ
var vbYesNo=4,vbQuestion=32,vbYes=6;
//Создаем объект WshShell
WshShell = WScript.CreateObject("WScript.Shell");
//Выводим запрос
Res=WshShell.Popup("Открыть окно форматирования?",0,
 "Вызов стандартных диалогов Windows",vbQuestion+vbYesNo);
if (Res==vbYes) //Нажата кнопка Да
 //Вызываем окно форматирования
В WshShell.Run("Rundll32.exe shell32.dll,SHFormatDrive");
/************* Конец *********************************************/
Вызов окна запуска программ
Окно запуска программ открывается с помощью метода FileRun() объекта Shell.Application. Соответствующий пример приведен в листинге 11.17.
Листинг 11.17. Вызов окна запуска программ/*******************************************************************/
/* РРјСЏ: FileRun.jsВ В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В */
/* Язык: JScript                                                  */
/* Описание: Вызов окна запуска программ                          */
/*******************************************************************/
//Объявляем переменные
var
В WshShell, //Ркземпляр объекта WshShell
В Shell,В В В //Ркземпляр объекта Shell.Application
 Res;     //Результат нажатия кнопок в диалоговом окне
//Рнициализируем константы для диалоговых РѕРєРѕРЅ
var vbYesNo=4,vbQuestion=32,vbYes=6;
//Создаем объект WshShell
WshShell = WScript.CreateObject("WScript.Shell");
//Создаем объект Shell.Application
Shell=WScript.CreateObject("Shell.Application");
//Выводим запрос
Res=WshShell.Popup("Открыть окно запуска программ?",0,
 "Вызов стандартных диалогов Windows",vbQuestion+vbYesNo);
if (Res==vbYes) //Нажата кнопка Да
 //Вызываем окно запуска программ
В Shell.FileRun();
/************* Конец *********************************************/
Блокировка рабочей станции
Заблокировать рабочую станцию Windows ХРможно с помощью вызова функции LockWorkStation() из библиотечного файла user32.dll. В листинге 11.18 приведен сценарий Lock.js, в котором происходит блокировка компьютера с помощью этой функции.
Листинг 11.18. Блокировка рабочей станции/*******************************************************************/
/* РРјСЏ: Lock.jsВ В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В */
/* Язык: JScript                                                  */
/* Описание: Блокировка рабочей станции                           */
/*******************************************************************/
//Объявляем переменные
var
В WshShell, //Ркземпляр объекта WshShell
 Res;     //Результат нажатия кнопок в диалоговом окне
//Рнициализируем константы для диалоговых РѕРєРѕРЅ
var vbYesNo=4,vbQuestion=32,vbYes=6;
//Создаем объект WshShell
WshShell = WScript.CreateObject("WScript.Shell");
//Выводим запрос на блокировку рабочей станции
Res=WshShell.Popup("Заблокировать рабочую станцию?",0,
В "",vbQuestion+vbYesNo);
if (Res==vbYes) //Нажата кнопка Да
 //Блокируем рабочую станцию
В WshShell.Run("Rundll32.exe user32.dll,LockWorkStation");
/************* Конец *********************************************/
Вызов РѕРєРЅР° выключения компьютераВ
РР· сценария WSH можно вызвать диалоговое РѕРєРЅРѕ, РІ котором производится выбор действия РїСЂРё завершении работы Windows (СЂРёСЃ. 11.27).
Рис. 11.27. Диалоговое окно выключения компьютера
Для этого необходимо вызвать метод ShutdownWindows() объекта Shell.Application. Соответствующий пример приведен в листинге 11.19.
Листинг 11.19. Вызов окна выключения компьютера/*******************************************************************/
/* РРјСЏ: ShutdownWindow.jsВ В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В В */
/* Язык: JScript                                                  */
/* Описание: Вызов окна выключения компьютера                     */
/*******************************************************************/
//Объявляем переменные
var
В WshShell, //Ркземпляр объекта WshShell
В Shell,В В В //Ркземпляр объекта Shell.Application
 Res;     //Результат нажатия кнопок в диалоговом окне
//Рнициализируем константы для диалоговых РѕРєРѕРЅ
var vbYesNo=4,vbQuestion=32,vbYes=6;
