| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Работа с пользователями в домене WinNT [D7]

Wistler ©   (2004-07-06 16:53:00) 

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

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;

---

Wistler   (2004-07-07 14:04:00) [1]

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


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

---

clickmaker   (2004-07-06 17:21:00) [2]

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

---

Wistler   (2004-07-06 17:03:00) [3]

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


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

---

clickmaker   (2004-07-06 16:59:00) [4]

Текст E.message ?

---

Наверх