IMetabaseUser.PasswordChangedUser

Синтаксис

PasswordChangedUser: IMetabaseUser;

PasswordChangedUser: Prognoz.Platform.Interop.Metabase.IMetabaseUser;

Описание

Свойство PasswordChangedUser возвращает пользователя, который потребовал смену пароля.

Комментарии

Потребовать смену пароля может пользователь, обладающий привилегией «Изменение прав пользователей, раздача ролей, изменение политики».

Пример

Для выполнения примера убедитесь, что в менеджере безопасности содержится пользователь USER.

Добавьте ссылку на системную сборку Metabase.

Sub UserProc;
Var
    MB: IMetabase;
    MS: IMetabaseSecurity;
    User, ChangedUser: IMetabaseUser;
Begin
    MB := MetabaseClass.Active;
    MS := MB.Security;
    User := MS.ResolveName("USER") As IMetabaseUser;
    ChangedUser := User.PasswordChangedUser;
    If ChangedUser = Null Then
        Debug.WriteLine("Смена пароля не требовалась");
    Else
        Debug.WriteLine("Смену пароля потребовал пользователь " + ChangedUser.Name);
    End If;
End Sub UserProc;

Imports Prognoz.Platform.Interop.Metabase;
…
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    MS: IMetabaseSecurity;
    User, ChangedUser: IMetabaseUser;
Begin
    MB := Params.Metabase;
    MS := MB.Security;
    User := MS.ResolveName("USER") As IMetabaseUser;
    ChangedUser := User.PasswordChangedUser;
    If ChangedUser = Null Then
        System.Diagnostics.Debug.WriteLine("Смена пароля не требовалась");
    Else
        System.Diagnostics.Debug.WriteLine("Смену пароля потребовал пользователь " + ChangedUser.Name);
    End If;
End Sub;

После выполнения примера в консоль будет выведен результат требования смены пароля.

См. также:

IMetabaseUser