IMetabaseUser.PasswordChangedUser

Синтаксис Fore

PasswordChangedUser: IMetabaseUser;

Синтаксис Fore.NET

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

Описание

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

Комментарии

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

Пример Fore

Для выполнения примера добавьте ссылки на системныe сборки Metabase и Ui. В менеджере безопасности в списке пользователей должен быть пользователь «User_1».

Sub UserProc;
Var
    MB: IMetabase;
    SE: IMetabaseSecurity;
    MU, MU1: IMetabaseUser;
Begin
    mb := MetabaseClass.Active;
    SE := mb.Security;
    MU := SE.ResolveName("USER_1") As IMetabaseUser;
    MU1 := MU.PasswordChangedUser;
    If mu1=Null Then
        WinApplication.InformationBox("Смена пароля не требовалась");
    Else
        WinApplication.InformationBox("Смену пароля потребовал пользователь " + MU1.Name);
    End If;
End Sub UserProc;

После выполнения примера будет выдано сообщение с информацией о требовании смены пароля.

Пример Fore.NET

В менеджере безопасности в списке пользователей должен быть пользователь «User_1». Указанная процедура является точкой входа для .NET-сборки.

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    SE: IMetabaseSecurity;
    MU, MU1: IMetabaseUser;
Begin
    mb := Params.Metabase;
    SE := mb.Security;
    MU := SE.ResolveName("USER_1") As IMetabaseUser;
    MU1 := MU.PasswordChangedUser;
    If mu1=Null Then
        System.Diagnostics.Debug.WriteLine("Смена пароля не требовалась");
    Else
        System.Diagnostics.Debug.WriteLine("Смену пароля потребовал пользователь " + MU1.Name);
    End If;
End Sub;

После выполнения примера в окно консоли будет выдано сообщение с информацией о требовании смены пароля.

См. также:

IMetabaseUser