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 must first create a connection object and start the Details method to associate a user ID and password with the object. The two methods available are Verify Password that checks the user ID and password within the connection object with the Server Security System, and ChangePassword that allows you to change the password at the server. If successful the connection object password is updated accordingly.
' Connection object already created called conn
on error goto pemhandler
Dim SecAttr as CclOSecAttr
Dim LastVerified as CclOSecTime
Dim lvdate as Date
Set SecAttr = conn.VerifySecurity
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