Delphi + ADSI

Вопросы программирования БД, их оптимизации, резервирования и восстановления данных.

Модераторы: Trinity admin`s, Free-lance moderator`s

Ответить
Аватара пользователя
ip_demon
member
Сообщения: 32
Зарегистрирован: 23 фев 2003, 11:28
Откуда: Moscow
Контактная информация:

Delphi + ADSI

Сообщение ip_demon » 29 май 2005, 02:14

Кто-нить умеет из Дельфей создавать пользователя в Active Directory?

Я написал такую вещь, но она вылетает с ошибкой:

Project1.exe raised exception class EAccessViolation with message "Access violation at address 00453E08 in module Project1.exe" Process stopped. Use step or Run to continue.

Текст кода такой(на форме одна кнопке "Create" логин в тексте проги "user1"):
--------------------
procedure TForm1.Button1Click(Sender: TObject);

var
Container : IADsContainer;
NewObject : IADs;
User : IADsUser;
hr : HREsult;

begin
 try
   hr := ADsGetObject('WinNT://localhost',IADsContainer,Container);
   if Failed(hr) then exit;
   NewObject := Container.Create('user', 'user1') as IADs;
   User.SetInfo;
 except
   on E: EOleException do
   begin
     ShowMessage(E.message);
   end;
end;

end;
----------------


Может у кого есть уже рабочая прога для создания юзера из дельфи, дайте исходник, а то я чота совсем запутался уже.

Спасибо.
Йода вам это все припомнит, Дмитрий

Аватара пользователя
Stranger03
Сотрудник Тринити
Сотрудник Тринити
Сообщения: 12979
Зарегистрирован: 14 ноя 2003, 16:25
Откуда: СПб, Екатеринбург
Контактная информация:

Re: Delphi + ADSI

Сообщение Stranger03 » 30 май 2005, 10:38

ip_demon писал(а):Кто-нить умеет из Дельфей создавать пользователя в Active Directory?

Я написал такую вещь, но она вылетает с ошибкой:
Вам наверное стоит поискать форумы программистов. Здесь в основном системщики обитают. Хотя, может кто что и посоветует.

Ответить

Вернуться в «Серверы - ПО, Базы Данных и их использование»

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и 9 гостей