//Создаем объект WshShell
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.
/*******************************************************************/
/* Имя: 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.
/*******************************************************************/
/* Имя: 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, в котором происходит блокировка компьютера с помощью этой функции.
/*******************************************************************/
/* Имя: Lock.js */
/* Язык: JScript */
/* Описание: Блокировка рабочей станции */
/*******************************************************************/
//Объявляем переменные
var
WshShell, //Экземпляр объекта WshShell
Res; //Результат нажатия кнопок в диалоговом окне
//Инициализируем константы для диалоговых окон
var vbYesNo=4,vbQuestion=32,vbYes=6;
//Создаем объект WshShell
WshShell = WScript.CreateObject('WScript.Shell');
//Выводим запрос на блокировку рабочей станции