Export non expiry password accounts

I’m doing requests now ;-)

This script will dump a list of user accounts that have “Password never expires” checked

$CurrentDomain = [System.DirectoryServices.ActiveDirectory.Domain]::getcurrentdomain()
$Forest = $CurrentDomain.Forest.ToString()
$Forest = “dc=” + $Forest
$Forest = $Forest.Replace(“.”,”,dc=”)
$Root     = New-Object DirectoryServices.DirectoryEntry $Dom
$selector = New-Object DirectoryServices.DirectorySearcher
$selector.PageSize = 1000
$selector.SearchRoot = $root
$selector.Filter= “(&(objectClass=user)(userAccountControl:1.2.840.113556.1.4.803:=65536))”
$objs= $selector.findall()
$objs

 

Leave a Reply

%d bloggers like this: