Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.03.28;
Скачать: CL | DM;

Вниз

Как получить список групп и пользователей домена ?   Найти похожие ветки 

 
Nosov   (2004-01-08 10:01) [0]

Как получить список групп и пользователей домена ?


 
Andersen   (2004-01-12 12:16) [1]

NetLocalUserEnum, NetLocalGroupEnum что - то в этом духе


 
Balu ©   (2004-01-12 14:55) [2]

У меня так:
function getGroups(ulist: TStringList; compName: string):TStringList;
 var
   info: PGROUP_INFO_1;
   pinfo: pointer;
   size: DWORD;
   total: DWORD;
   resume: DWORD;
   res: DWORD;
   i: integer;
   p: PChar;
   pwszComp: PWideChar;
 begin
   pinfo := nil;
   resume := 0;
   GetMem(pwszComp,length(compName)*2+2);
   StringToWideChar(compName,pwszComp,length(compName)*2+2);
   res := NetLocalGroupEnum(pwszComp,1,@pinfo,65536,@size,@total,@resume);
   if res<>nerr_success then
   begin
     ShowMessage("Error");
     Result := nil;
     exit;
   end;
   p := PChar(pinfo);
   for i := 0 to size-1 do
   begin
     info := PGROUP_INFO_1(p + i * SizeOf(GROUP_INFO_1));
     ulist.Add(WideCharToString(PWideChar((info^).grpi1_name)));
   end;
   NetApiBufferFree(pinfo);
   result := ulist;
 end;


 
Nosov   (2004-01-13 11:01) [3]

Это то ясно. А из под рабочей станции Win98 Как ?
Пишет ошибку что нет такой функции в netapi32.all.
А когда включаешь доступ на уровне пользователей
винда то списки считывает с сервера... :(


 
Nosov   (2004-01-13 11:02) [4]

Это то ясно. А из под рабочей станции Win98 Как ?
Пишет ошибку что нет такой функции в netapi32.dll
А когда включаешь доступ на уровне пользователей
винда то списки считывает с сервера... :(



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

Текущий архив: 2004.03.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.121 c
3-1077827859
Рулон Обоев
2004-02-26 23:37
2004.03.28
ER модель


3-1078041929
YurikGl
2004-02-29 11:05
2004.03.28
TADOQuery, TADOTable и TADODataset


1-1078396427
Sphinx
2004-03-04 13:33
2004.03.28
OnMouseEnter and OnMouseExit


6-1073902992
Delphin
2004-01-12 13:23
2004.03.28
Соединение при помощи сокетов


8-1060668956
Dmitrich
2003-08-12 10:15
2004.03.28
Как переместиться на любой кадр avi с помощью DSPack 2.3?