Pretraga AD za radnim stanicama

Skeniranje Active Directory i daje spisak svih racunara u domenu

#################################################################################

####Lista sve racunare u domenu###

$strCategory = "computer"

 

$objDomain = New-Object System.DirectoryServices.DirectoryEntry

 

$objSearcher = New-Object System.DirectoryServices.DirectorySearcher

 $objSearcher.SearchRoot = $objDomain

 $objSearcher.Filter = ("(objectCategory=$strCategory)")

 

$colProplist = "name"

 foreach ($i in $colPropList){$objSearcher.PropertiesToLoad.Add($i)}

 

$colResults = $objSearcher.FindAll()

 

foreach ($objResult in $colResults)

     {$objComputer = $objResult.Properties; $objComputer.name}

#################################################################################