[Active Directory] Modification de paramètre

**Arrown** · 20/09/2007, 15h49

Bonjour, je cherche désespérément comment modifier des valeurs d'un utilisateur créé sur l'active directory (tel que "l'appel entrant autorisé" : OUI).

Sur toutes les messages que je recherche sur le forum, je ne trouve rien qui correspond à ma demande.

Voici mon code actuel, ce qu'il me manque c'est ce que je te dis plus haut, mais en y pensant, c'est aussi comment modifier le numéro de téléphone et les autres options, je ne vois pas quoi appeller. (Comme après avoir créer un user, comment faire pour le désactivé ?)

Voici mon code actuelle de création et d'affection à un GROUPE :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
function AddUser(FUsername, fpassword, fhomedir, fcomment, fscript, fserver : string; privi, flags : cardinal) : LongInt;
var
  tUserName : Array [0..255] Of WideChar;
  tPassword : Array [0..255] Of WideChar;
  tHomeDir : Array [0..255] Of WideChar;
  tComment : Array [0..255] Of WideChar;
  tScript : Array [0..255] Of WideChar;
  tServer : Array [0..255] Of WideChar;
  tgroupe : Array [0..255] Of WideChar;
  MyInfo : USER_INFO_1;
  Where : DWORD;
begin
StringToWideChar(FUserName,@tUserName,255);
StringToWideChar(FPassword,@tPassword,255);
StringToWideChar(FHomeDir,@tHomeDir,255);
StringToWideChar(FComment,@tComment,255);
StringToWideChar(FScript,@tScript,255);
StringToWideChar(FServer,@tServer,255);
 
MyInfo.usri1_name:=@tUserName;
MyInfo.usri1_password:=@tPassword;
MyInfo.usri1_password_age:=1;
MyInfo.usri1_priv:=privi;
MyInfo.usri1_home_dir:=@tHomeDir;
MyInfo.usri1_comment:=@tComment;
MyInfo.usri1_flags:=flags; // allways include UF_SCRIPT !!!
MyInfo.usri1_script_path := @tScript;
NetUserAdd(@tServer, 1, @MyInfo, @Where);
 
StringToWideChar('ENQ',@tgroupe,255);
NetGroupAddUser(@tServer, @tGroupe, @tUsername);
StringToWideChar('z_enqueteurs',@tgroupe,255);
NetGroupAddUser(@tServer, @tGroupe, @tUsername);
Result := Where;
end;

Je ne veux pas trop utiliser ADSI, ACTIVEDS_TLB, j'ai tout testé la dessus et c'est pas du tout concluant.

Merci de me dire si vous pouvez me conseiller.

Arrown

PS : Juste le nom NETUSERquelquechose pourrai m'aider, je ne trouve rien sur le msdn

**Eric Boisvert** · 21/09/2007, 17h39

Pour Activé, Desactivé un compte utilisateur, j'utilise
NetUserSetInfo() avec le level 1008

Fonction NetUserSetInfo()
http://msdn2.microsoft.com/en-us/library/aa370659.aspx

Info_Level_1008:
http://msdn2.microsoft.com/en-us/library/aa370968.aspx
pour cette partie...j'ai peut-être un bout de code quelque part...

Pour le contrôle du "Dialin" (l'appel entrant)
je crois bien que la fonction MprAdminUserSetInfo() dans mprapi.dll est ton ami!
http://msdn2.microsoft.com/en-us/library/aa375854.aspx