Шрифт:
//Объявляем переменные
var
WshShell, //Экземпляр объекта WshShell
Shell, //Экземпляр объекта Shell.Application
SPath="C:\\", //Путь к открываемой папке
Res; //Результат нажатия кнопок в диалоговом окне
//Инициализируем константы для диалоговых окон
var vbYesNo=4,vbQuestion=32,vbYes=6;
//Создаем объект 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.
Листинг 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");