Windows Script Host для Windows 2000/XP
Шрифт:
//Объявляем переменные
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");
//Создаем объект 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 */
Поделиться:
Популярные книги
Неучтенный элемент. Том 4
4. Антимаг. Вне системы
Фантастика:
фэнтези
5.25
рейтинг книги
На границе империй. Том 10. Часть 7
Вселенная EVE Online
Фантастика:
боевая фантастика
космическая фантастика
попаданцы
5.00
рейтинг книги
Ёбург
Проза:
современная проза
6.50
рейтинг книги
Мы вместе были в бою
Проза:
советская классическая проза
5.00
рейтинг книги
Быть драконом 2
5.00
рейтинг книги
Монтана. Уровни. Начало
Любовные романы:
5.00
рейтинг книги
США - Империя Зла
Документальная литература:
публицистика
5.00
рейтинг книги
Музыкант-2
5.00
рейтинг книги
Что нас не убивает
Фантастика:
фэнтези
киберпанк
рпг
8.71
рейтинг книги
Меняя маски
1. Унесенный ветром
Фантастика:
боевая фантастика
попаданцы
9.22
рейтинг книги
Біс плоті
Проза:
повесть
5.00
рейтинг книги
Последний Паладин. Том 7
7. Путь Паладина
Фантастика:
фэнтези
попаданцы
аниме
5.00
рейтинг книги
Буря империи
6. Медорфенов
Фантастика:
аниме
фэнтези
фантастика: прочее
эпическая фантастика
5.00
рейтинг книги
Неудержимый. Книга V
5. Неудержимый
Фантастика:
фэнтези
попаданцы
аниме
5.00