Profiles: IUserProfiles;
The Profiles property returns the collection of the profiles of users, included in the current group.
Each profile contains the information about e-mail addresses, corresponding to the user and additional properties of the user.
Sub UserProc;
Var
Mb: IMetabase;
Group: IMetabaseGroup;
Profs: IUserProfiles;
Prof: IUserProfile;
Begin
Mb := MetabaseClass.Active;
Group := Mb.Security.ResolveName(ADMINISTRATORS) As IMetabaseGroup;
Profs := Group.Profiles;
For Each Prof In Profs Do
Debug.WriteLine(Profile: + Prof.Name);
Debug.WriteLine(Default Email: " + Prof.Email);
End For;
End Sub UserProc;
Execution of the example will output to the development environment console the names of the profiles and e-mail addresses, set in each profile by default, for all users, included in the group of administrators.
See also: