|
Платные хостинги
Раскрутка сайта
Книги по программированию
список пользователей..., под ХР и 9х
- Как получить список пользователей под ХР и под 9х PS: Пример из DRKB ничего у меня не возвращяет. Порылся в реестре, но ничего не нашёл...Заранее СПАСИБО!!!
- Код function NetUserEnum(Server:PWideChar;Level:DWORD;Filter:DWORD;BufPtr:Pointer;PrefMaxLen:DWORD;EntriesRead:LPDWORD;TotalEntries:LPDWORD;ResumeHandle:LPDWORD):LongInt; stdcall; external 'netapi32.dll' name 'NetUserEnum'; function NetApiBufferFree(Buffer:Pointer):LongInt; stdcall; external 'netapi32.dll' name 'NetApiBufferFree';procedure TForm1.GETUSERS;Type USER_INFO_0=record usri0_name:LPWSTR; End; USER_INFO_A = array[1..1] of USER_INFO_0;var pb:^USER_INFO_A; cc, tc, rs: dword; i: integer;begin rs := 0; pb := nil; NetUserEnum(nil,0,0,@pb,$FFFFFFFF,@cc,@tc,@rs); Memo1.Clear; for i := 1 to cc do begin Memo1.lines.Add(pb^[i].usri0_name); end; NetApiBufferFree(pb);end;highlightSyntax('delphiNhYWQw','delphi'); Это сообщение отредактировал RAdmin - 2.5.2005, 21:38
- спасибо...Разобрался...
- Только под 98 эта штука даже запускаться не хочет...... под ХР нашёл еще несколько хитростей... Это сообщение отредактировал Albinos_x - 7.5.2005, 21:55
Интернет казино
Онлайн игры
Увеличение члена
Купить DVD
|
