EternalPassword: Boolean;
The EternalPassword property determines whether password has expiry date.
Available values:
· True. Password has no expiry date.
· False. Password has expiry date.
Add a link to the Metabase system assembly.
Sub UserProc;
Var
MB: IMetabase;
Us: IMetabaseUsers;
User: IMetabaseUser;
SecCat: ISecurityCategory;
SecLevel: ISecurityLevel;
Begin
// Get active repository
MB := MetabaseClass.Active;
// Get security settings for the first user
Us := MB.Security.Users;
User := Us.Item(0);
// Determine whether password has expiry date
User.EternalPassword := True;
// Apply security policy
MB.Security.Apply;
End Sub UserProc;
After executing the example the password will not have expiry date.
See also: