Thema: Delphi NetGroupAddUser

Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.107 Beiträge
 
Delphi 11 Alexandria
 
#4

Re: NetGroupAddUser

  Alt 8. Okt 2003, 13:27
Moin Steppo,

ein Aufruf wie dieser sollte gehen:

Delphi-Quellcode:
type
  NET_API_STATUS = DWORD;

function NetLocalGroupAddMembers(const servername : PWChar;const groupname : PWChar;const buf : pointer;const totalentries : DWORD) : NET_API_STATUS; stdcall; external 'netapi32.dll';

const
  NERR_SUCCESS = 0;

var
  lgmiWork : LOCALGROUP_MEMBERS_INFO_3;
  dwResult : DWORD;

begin
  lgmiWork.lgrmi3_domainandname := 'Rechnername\username';
  dwResult := NetLocalGroupAddMembers(nil,'Name der lokalen Gruppe',3,@lgmiWork,1);
  //...
für Nähere Informationen zu den Funktionen usw. kannst Du ja im PSDK bzw. auf MSDN nachsehen.
Im PSDK könntest Du dann in den Header Dateien auch die Konstanten nachschlagen.

Zitat von Steppo:
Ich lerne es glaub´ ich nie!
Wieso? Ist doch alles nur Übungssache.
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat