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";

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