You can perform security management on servers that support Password Expiry Management.
Refer to Password expiry management for more information on supported servers and protocols.
To use these features you first must have created a Terminal object and invoked the SetTerminalDefinition method to associate a user ID and password with the object. The two methods available are VerifyPassword which checks the user ID and password within the terminal object with the Server Security System, and ChangePassword which allows you to change the password at the server. If successful, the terminal object password is updated accordingly.
If either call is successful, you are returned a CclOSecAttr object. This object provides access to information such as last verified Date and Time, Expiry Date and Time and Last access Date and Time. If you query for example last verified Date, you are returned a CclOSecTime object which allows you to get the information in various formats. The following shows the use of these various objects.
' Terminal object already created called term
on error goto pemhandler
dim SecAttr as CclOSecAttr
dim LastVerified as CclOSecTime
dim lvdate as Date
set SecAttr = term.VerifyPassword
set LastVerified = SecAttr.LastVerifiedTime
lvdate = LastVerified.GetDate
strout = Format(lvdate, "hh:mm:ss, dddd, mmm d yyyy")
Text1.Text = strout
exit sub
pemhandler:
' handle a expired password here maybe
end sub