Чтение онлайн

на главную - закладки

Жанры

Windows Script Host для Windows 2000/XP

Попов Андрей Викторович

Шрифт:

//Добавляем описание созданного пользователя

UserObj.Description="Этот пользователь создан из сценария WSH";

//Сохраняем информацию на компьютере

UserObj.SetInfo;

/************* Конец *********************************************/

Группа на рабочей станции создается аналогичным образом (листинг 11.3). 

Листинг 11.3. Создание новой локальной группы на рабочей
станции

/********************************************************************/

/* Имя: AddGroup.js */

/* Язык: JScript */

/* Описание: Создание новой группы на компьютере */

/********************************************************************/

//Объявляем переменные

var

 ComputerObj, //Экземпляр объекта Computer

 GroupObj, //Экземпляр объекта Group

 GroupStr = "XGroup"; //Имя создаваемой группы

//Связываемся с компьютером 404_Popov

ComputerObj = GetObject("WinNT://404_Popov");

//Создаем объект класса Group

GroupObj=DomainObj.Create("group", GroupStr);

//Сохраняем информацию на компьютере

GroupObj.SetInfo;

/************* Конец *********************************************/

Вывод информации о пользователе и смена его пароля

В листинге 11.4 приведен сценарий UserInfo.js, в котором выводится на экран информация о созданном в сценарии AddUser.js пользователе XUser (рис. 11.2).

Рис. 11.2. Информация о локальном пользователе XUser

Для получения этой информации мы производим связывание с нужным пользователем, т.е. создаем экземпляр

UserObj
объекта
User
и читаем данные из полей этого объекта:

//Связываемся с пользователем XUser компьютера 404_Popov

UserObj=GetObject("WinNT://404_Popov/XUser, user");

//Формируем строку с информацией о пользователе

SInfо="Информация о пользователе XUser:\n";

SInfо+="Имя: "+UserObj.Name+"\n";

SInfо+="Описание: "+UserObj.Description+"\n";

//Выводим сформированную строку на экран

WScript.Echo(SInfo);

После

этого в сценарии выдается запрос на изменение пароля пользователя XUser. Для этого мы используем метод
Popup
объекта
WshShell
:

//Создаем объект WshShell

WshShell=WScript.CreateObject("WScript.Shell");

//Запрос на изменение пароля

Res=WshShell.Popup("Изменить пароль у XUser?", 0, "Администрирование пользователей", vbQuestion+vbYesNo);

В случае утвердительного ответа пароль изменяется с помощью метода

SetPassword
объекта
User
, после чего все произведенные изменения сохраняются на рабочей станции с помощью метода
SetInfo
:

if (Res==vbYes) {

 //Нажата кнопка "Да"

 //Устанавливаем новый пароль

 UserObj.SetPassword("NewPassword");

 //Сохраняем сделанные изменения

 UserObj.SetInfо;

 WScript.Echo("Пароль был изменен");

}

Листинг 11.4. Вывод информации о пользователе компьютера и смена его пароля

/********************************************************************/

/* Имя: UserInfo.js */

/* Язык: JScript */

/* Описание: Вывод информации о пользователе компьютера и смена */

/* его пароля */

/********************************************************************/

var

 UserObj, //Экземпляр объекта User

 Res, //Результат нажатия кнопки в диалоговом окне

 SPassword, //Строка с новым паролем

 SInfo; //Строка для вывода на экран

//Инициализируем константы для диалогового окна

var vbYesNo=4,vbQuestion=32,vbYes=6;

//Связываемся с пользователем XUser компьютера 404_Popov

UserObj=GetObject("WinNT://404_Popov/XUser,user");

//Формируем строку с информацией о пользователе

SInfo="Информация о пользователе XUser:\n";

SInfo+="Имя: "+UserObj.Name+"\n";

SInfo+="Описание: "+UserObj.Description+"\n";

//Выводим сформированную строку на экран

Поделиться:
Популярные книги

Годы странствий

Чулков Георгий Иванович
Документальная литература:
биографии и мемуары
6.25
рейтинг книги
Годы странствий

Жертва

Привалов Сергей
2. Звездный Бродяга
Фантастика:
боевая фантастика
космическая фантастика
рпг
попаданцы
6.25
рейтинг книги
Жертва

Под знаком Песца

Видум Инди
1. Под знаком Песца
Фантастика:
альтернативная история
аниме
5.00
рейтинг книги
Под знаком Песца

Наследник

Ищенко Геннадий Владимирович
4.00
рейтинг книги
Наследник

Полночная страсть

Кэмпбелл Анна
Любовные романы:
исторические любовные романы
8.80
рейтинг книги
Полночная страсть

Цикл романов "Целитель". Компиляция. Книги 1-17

Большаков Валерий Петрович
Целитель
Фантастика:
попаданцы
альтернативная история
5.00
рейтинг книги
Цикл романов Целитель. Компиляция. Книги 1-17

Башня

Сафонов Дмитрий Геннадьевич
1. Роман-катастрофа
Детективы:
триллеры
8.50
рейтинг книги
Башня

На границе империй. Том 8

INDIGO
12. Фортуна дама переменчивая
Фантастика:
космическая фантастика
попаданцы
5.00
рейтинг книги
На границе империй. Том 8

Об идолах и идеалах

Ильенков Эвальд Васильевич
Научно-образовательная:
философия
6.25
рейтинг книги
Об идолах и идеалах

Кодекс Крови. Книга VII

Борзых М.
7. РОС: Кодекс Крови
Фантастика:
боевая фантастика
попаданцы
аниме
5.25
рейтинг книги
Кодекс Крови. Книга VII

Егерь. Системный зверолов

Скиба Николай
1. Зверолов
Фантастика:
рпг
уся
фэнтези
фантастика: прочее
попаданцы
6.50
рейтинг книги
Егерь. Системный зверолов

Турнир

Скиба Николай
7. Зверолов
Фантастика:
фэнтези
рпг
уся
фантастика: прочее
попаданцы
6.00
рейтинг книги
Турнир

Маленькая женщина Большого

Зайцева Мария
5. Наша
Любовные романы:
эро литература
современные любовные романы
5.71
рейтинг книги
Маленькая женщина Большого

Улисс (часть 3)

Джеймс Джойс
5.00
рейтинг книги
Улисс (часть 3)