CheckInternalAuthenticationAbility;
CheckInternalAuthenticationAbility;
Метод CheckInternalAuthenticationAbility проверяет возможность включения авторизации средствами платформы.
Метод устарел, используйте IMetabasePolicy.CheckUserPassword.
При невозможности включения авторизации средствами платформы будет сгенерирована исключительная ситуация.
Для выполнения примера добавьте ссылку на системную сборку Metabase.
Sub UserProc;
Var
MB: IMetabase;
MS: IMetabaseSecurity;
Policy: IMetabasePolicy;
AP: IMetabaseAuthenticationPolicy;
Begin
MB := MetabaseClass.Active;
MS := MB.Security;
Policy := MS.Policy;
AP := Policy.AuthenticationPolicy;
AP.CheckInternalAuthenticationAbility;
End Sub UserProc;
Будет проверена возможность включения авторизации средствами платформы. Если включить авторизацию средствами платформы нет возможности, то будет сгенерирована исключительная ситуация.
Указанная процедура является точкой входа для .NET-сборки.
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
MS: IMetabaseSecurity;
Policy: IMetabasePolicy;
AP: IMetabaseAuthenticationPolicy;
Begin
MB := Params.Metabase;
MS := MB.Security;
Policy := MS.Policy;
AP := Policy.AuthenticationPolicy;
AP.CheckInternalAuthenticationAbility();
End Sub;
Будет проверена возможность включения авторизации средствами платформы. Если включить авторизацию средствами платформы нет возможности, то будет сгенерирована исключительная ситуация.
См. также: