Checking Password Age

[jdteichmer]

I need help in determining a users password age so I can determine if it is time for them to change their password.

Thanks,

Darin

 

[btnet]

This tool should work for 2k and NT

http://optimumx.com/download/#NetPWAge

Run it and then parse the output file...

 

[RoobarbnCustard]

This will give you the age of the password in days :-

on error resume next
dim wshshell, objuser, myfile, FSO
objPath =inputbox("Please enter users login&quot
adsPath = "WinNT://idghead/" & objPath &",user"
Set objuser = GetObject(adsPath)
set FSO = CreateObject("scripting.FileSystemObject&quot
set myFile = fso.CreateTextFile(""&objpath&".txt", true)
myfile.writeline("Password Age : "&objuser.passwordage/86400&"&quot