Скачать: CL | DM;

Работа с пользователями в домене WinNT   Найти похожие ветки 

← →
Wistler   (2004-07-06 16:53) [0]

Ниже приведён код добавления пользвателя. В строке (отмечена ниже) происходит исключительная ситуация. В чём причина? Без неё всё работает засечательно. Если кто знает как добавить созданного пользователя в группу?

var
 Usr: IADsUser;
 Comp: IADsContainer;
begin
 try
   Comp := GetObject("WinNT://SERVER,computer") as IADsContainer;
   Usr := Comp.Create("user", "Us55") as IADsUser;
   Usr.SetPassword("fdgghfg");
   Usr.LoginWorkstations:="COMP1;COMP2;";
   Usr.SetInfo;
   Usr.AccountDisabled:=True;
   Usr.SetInfo;

>>>>>>>>>    Usr.FirstName:="FirstName"; <<<<<<<<<<<<<<<< Здесь

 except
   on E: EOleException do
   begin
     ShowMessage(E.message);
   end;
 end;

---

← →
clickmaker ©   (2004-07-06 16:59) [1]

Текст E.message ?

---

← →
Wistler ©   (2004-07-06 17:03) [2]

> clickmaker ©   (06.07.04 16:59) [1]
> Текст E.message ?


"Предпринятое действие нарушает правила схемы DS."

---

← →
clickmaker ©   (2004-07-06 17:21) [3]

Usr.AccountDisabled:=True на это не может влиять?

---

← →
Wistler ©   (2004-07-07 14:04) [4]

> clickmaker ©   (06.07.04 17:21) [3]
> Usr.AccountDisabled:=True на это не может влиять?


Нет, не влияет, это всего лишь отключает учётную запись.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.019 c