HashedPasswords: IHashedPasswords;
HashedPasswords: Prognoz.Platform.Interop.IMetabase.IHashedPasswords;
Свойство HashedPasswords определяет параметры хэширования пароля.
Sub UserProc;
Var
MB: IMetabase;
MBSecurity: IMetabaseSecurity;
MBPolicy: IMetabasePolicy;
MBPasswordPolicy: IMetabasePasswordPolicy;
HPass: IHashedPasswords;
Begin
Mb := MetabaseClass.Active;
MBSecurity := MB.Security;
MBPolicy := MBSecurity.Policy;
MBPasswordPolicy := MBPolicy.PasswordPolicy;
HPass := MBPasswordPolicy.HashedPasswords;
HPass.IsON := True;
HPass.ExcludeAdmin := True;
MBSecurity.Apply;
End Sub UserProc;
После выполнения примера будет включено хэширование паролей, при этом пароль администратора хэшироваться не будет.
Imports Prognoz.Platform.Interop.Metabase;
Public Sub Main(Params: StartParams);
Var
MB: IMetabase;
MBSecurity: IMetabaseSecurity;
MBPolicy: IMetabasePolicy;
MBPasswordPolicy: IMetabasePasswordPolicy;
HPass: IHashedPasswords;
Begin
MB := Params.Metabase;
MBSecurity := MB.Security;
MBPolicy := MBSecurity.Policy;
MBPasswordPolicy := MBPolicy.PasswordPolicy;
HPass := MBPasswordPolicy.HashedPasswords;
HPass.IsON := True;
HPass.ExcludeAdmin := True;
MBSecurity.Apply();
End Sub;
После выполнения примера будет включено хэширование паролей, при этом пароль администратора хэшироваться не будет.
См. также: