Разыскал у себя в архиве: когда-то давно делал похожие задачи WSH на JS. Если пригодится, буду рад.
Подключение сетевых дисков
читать дальше »
Код:
/********************************************************************/
/* Язык: JScript */
/* Описание: Отключение и подключение сетевых дисков */
/********************************************************************/
var WshNetwork,
WshShell,
Drive,
NetPath,
Port,
NetPrinter,
Mess,
Mess_On,
IsError;
//Инициализируем константы для диалоговых окон
var vbCritical=16,vbInformation=64;
WshNetwork = WScript.CreateObject("WScript.Network"); //Создаем объект WshNetwork
WshShell = WScript.CreateObject("WScript.Shell"); //Создаем объект WshShell
Mess_On=""
Mess_On+=DiskConnect("M:","\\\\Имя_сервера1\\Имя_ресурса1");
Mess_On+=DiskConnect("N:","\\\\Имя_сервера2\\Имя_ресурса2");
Mess_On+=DiskConnect("K:","\\\\Имя_сервера3\\Имя_ресурса3");
Mess_On+=DiskConnect("P:","\\\\Имя_сервера4\\Имя_ресурса4");
WshShell.Popup(Mess_On,10,"Подключение сетевого диска",vbInformation);
/************* Конец *********************************************/
function DiskConnect(Drive,NetPath)
{
/************* Отключение сетевого диска ***********************/
if (false) { //Этот блок отключен за ненадобностью, текст оставлен для примера
IsError=false;
try {WshNetwork.RemoveNetworkDrive(Drive);} //Отключаем сетевой диск
catch (e) //Обрабатываем возможные ошибки
{
if (e != 0) //Выводим сообщение об ошибке
{
IsError=true;
Mess="Ошибка при отключении диска "+Drive+"\nКод ошибки: "+
e.number+"\nОписание: "+e.description;
WshShell.Popup(Mess,0,"Отключение сетевого диска",vbCritical);
}
}
if (!IsError) //Все в порядке
{
Mess="Диск "+Drive+" отключен успешно";
WshShell.Popup(Mess,0,"Отключение сетевого диска",vbInformation);
}
}
/************* Подключение сетевого диска ***********************/
IsError=false;
try {WshNetwork.MapNetworkDrive(Drive,NetPath);} //Подключаем сетевой диск
catch (e) //Обрабатываем возможные ошибки
{
if (e != 0) //Выводим сообщение об ошибке
{
IsError=true;
return Drive+" не подключен к " + NetPath+ " " +e.description + "\n";
}
}
if (!IsError) //Все в порядке
{
return Drive+" подключен к " + NetPath+"\n" ;
}
return "";
}
Создание групп,пользователей,помещение пользователей в группу
читать дальше »
Код:
/********************************************************************/
/* Имя: Add_Groups_Users.js */
/* Язык: JScript */
/* Описание: Создание групп на компьютере */
/* Создание пользователей на компьютере */
/* Помещение пользователей в группы на компьютере */
/********************************************************************/
var NetWork=WScript.CreateObject("WScript.Network");
var NameComp=NetWork.ComputerName; // Имя текущего компьютера
//var NameComp="Enother_Comp"; // Имя произвольного компьютера
var WshShell=WScript.CreateObject("WScript.Shell"),
ComputerObj=GetObject("WinNT://"+NameComp), //Экземпляр объекта Computer
Mess=""; //Текст сообщения
// Делаю группы
Make_Group("Наименование_Группы1","Описание, например: Отдел рогов и копыт");
Make_Group("Наименование_Группы2","Описание, например: Отдел хвостов и ушей");
WScript.Echo(Mess);
// Делаю юзеров
Make_User("Наименование_Группы1","Ivanov","Иванов Александр Петрович","Начальник отдела","пароль");
Make_User("Наименование_Группы2","Sidorov","Сидоров Александр Петрович","Зам. Начальника отдела","пароль");
Make_User("","Barmaley","Бармалей Александр Петрович","Инженер по инф. безопасности","пароль");
// Помещаю юзеров в группы, отличные от первоначальных
UserInGroup(NameComp,"Администраторы","Barmaley");
UserInGroup(NameComp,"Наименование_Группы2","Ivanov");
/************* Конец *********************************************/
// Функции
// Создаю группу с именем ng, описанием dg
function Make_Group(ng,dg)
{
var i_err=true;
var GroupObj=ComputerObj.Create("group",ng); //Создаем объект класса Group
GroupObj.Description=dg; //Меняем описание
try {GroupObj.SetInfo()}; //Сохраняем информацию на компьютере
catch (e)
{
i_err=false;
Mess+="\n Группа "+ng+" "+e.description;
}
if (i_err)
{
Mess+="\n Группа "+ng+" создана";
}
}
// Создаю пользователя в группе ng
// с именем входа nu
// полное имя fu
// описание du
// начальный пароль pu
//
function Make_User(ng,nu,fu,du,pu)
{
var i_err=true;
var Mess;
var UserObj=ComputerObj.Create("user",nu); //Экземпляр объекта User
UserObj.FullName=fu; //Добавляем полное имя
UserObj.Description=du; //Добавляем описание созданного пользователя
UserObj.SetPassword(pu); //Добавляем пароль
try {UserObj.SetInfo()}; //Сохраняем информацию на компьютере
catch (e)
{
i_err=false;
Mess="\n Безуспешно пользователь "+nu+" "+e.description;
}
if (i_err)
{
Mess="\n Пользователь "+nu+" создан";
}
i_err=YesNever(nu);
if (ng != "") {UserInGroup(NameComp,ng,nu)};
WshShell.Popup(Mess,1,"Создаем пользователей",64);
}
// В компьютере nc в группу ng помещаю пользователя nu
function UserInGroup(nc,ng,nu)
{
var GroupObj= GetObject("WinNT://"+nc+"/"+ng), //Связываемся с компьютером
UserObj, //Экземпляр объекта User
Mess;
try {GroupObj.Add("WinNT://"+nc+"/"+nu)}; //Сохраняем информацию на компьютере
catch (e)
{
Mess="\n Безуспешно в группу "+nu+" "+e.description;
WshShell.Popup(Mess,1,"Ошибка при группировке",64);
}
}
//// ставим юзеру птичку пароль никогда не меняется
function YesNever(NUser)
{
var OUser,ltry=true;
try // Пытаемся найти имя в текущем компьютере
{
OUser=GetObject("WinNT://"+NameComp+"/"+NUser+",user");
}
catch (e)
{
ltry=e==0;
}
if (ltry)
{
var Never=OUser.Get("UserFlags");
OUser.Put("UserFlags",0x10000);
OUser.SetInfo();
}
return true;
}
Почитать можно здесь |
