Bonsoir,
j'ai trouvé un code qui permet de modifier un utilisateur, le voici :
Ce code fonctionne, mais il ne me permet pas de modifier le UserName de l'utilisateur... Or je voudrais modifier ce parametre... comment puis-je procéder???
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 With IBSecurityService1 do begin with Params do begin Clear; Add('user_name=sysdba'); Add('password=masterkey'); End; Active := true; UserName:=sPseudo; //pseudo de l'utilisateur à modifier Password:=sMotDePasse; // nouveau mot de passe FirstName:=sPrenom; // nouveau prenom LastName:=sNom; // nouveau nom try ModifyUser; except on E:Exception do begin ShowMessage(E.ClassName+':'+E.Message); // traitement des erreurs end; end; end;
Partager