IMetabasePolicy.MaxFailedLogons

Синтаксис

MaxFailedLogons: Integer;

Описание

Свойство MaxFailedLogons определяет число неудачных попыток входа или ввода старого пароля при смене пароля.

Комментарии

Если осуществляется вход в репозиторий, то при превышении заданного числа попыток пользователь будет заблокирован.

Если осуществляется смена пароля подключенного пользователя, то при превышении количества неудачных попыток ввода старого пароля сессия пользователя будет прервана.

Пример

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

Sub UserProc;
Var
    MB: IMetabase;
    MS: IMetabaseSecurity;
    Policy: IMetabasePolicy;
    Lic: Object;
Begin
    MB := MetabaseClass.Active;
    // Получим лицензию для возможности работы с менеджером безопасности
    Lic := MB.RequestLicense(UiLicenseFeatureType.Adm);
    MS := MB.Security;
    Policy := MS.Policy;
    // Установим число неудачных попыток
    Policy.MaxFailedLogons := 6;
    // Сохраним изменения
    MS.Apply;
    // Освободим лицензию
    Lic := Null;
End Sub UserProc;

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

См. также:

IMetabasePolicy