Попов Андрей Викторович
Шрифт:
//Создаем объект 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;
//Создаем объект WshShell
WshShell = WScript.CreateObject("WScript.Shell");
//Создаем объект Shell.Application
Shell=WScript.CreateObject("Shell.Application");
//Выводим запрос
Res=WshShell.Popup("Открыть окно выключения компьютера?",0,
"Вызов стандартных диалогов Windows",vbQuestion+vbYesNo);
if (Res==vbYes) //Нажата кнопка Да
//Вызываем окно выключения компьютера
Shell.ShutdownWindows;
/************* Конец *********************************************/