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

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

NetUserSetGroups - не могу переместить пользователя из группы. [D7, Win2k, WinXP]


Denin ©   (2006-02-01 12:38:00) 

Не могу переместить пользователя из одной группы в другую.
Master - контроллер домена DMAIN, группа в домене есть.
Выдает ошибку 2234.
код вот такой:

type
LPBYTE = Windows.PBYTE;
NET_API_STATUS = DWORD;
_GROUP_USERS_INFO_0 = record
grui0_name: LPWSTR;
end;
const
NetApi32 = 'netapi32.dll';

implementation

{$R *.dfm}

function NetUserSetGroups(servername, username: LPCWSTR; level: DWORD; buf: LPBYTE; num_entries: DWORD): NET_API_STATUS; stdcall; external netapi32 name 'NetUserSetGroups'

procedure TForm1.Button1Click(Sender: TObject);
var
gi : _GROUP_USERS_INFO_0;
gn,un,srv : WideString;
nStatus : NET_API_STATUS;
begin
un:='Test';
srv := '\\master';
gi.grui0_name:='Guests';
nStatus:=NetUserSetGroups(PWideChar(srv),PWideChar(un),0,@gi,1);
WriteLn(nStatus);
ReadLn;
end;


Rouse_   (2006-02-01 14:41:00) [1]

Будешь дублировать ветки - снесу их все...


Наверх

Титульная страница Поиск, карта сайта Написать письмо