IMetabaseAuthenticationPolicy.DisableInternalAuthentication

Синтаксис Fore

DisableInternalAuthentication;

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

DisableInternalAuthentication;

Описание

Метод DisableInternalAuthentication отключает авторизацию средствами платформы.

Пример Fore

Для выполнения примера добавьте ссылку на системную сборку 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.DisableInternalAuthentication;
    MS.Apply;
End Sub UserProc;

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

Пример Fore.NET

Указанная процедура является точкой входа для .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.DisableInternalAuthentication();
    MS.Apply();
End Sub;