$DomainContext = New-Object System.DirectoryServices.ActiveDirectory.DirectoryContext("domain", "", “", "")
$ADBBVA = [System.DirectoryServices.ActiveDirectory.Domain]::GetDomain($DomainContext)
$Searcher = New-Object System.DirectoryServices.DirectorySearcher($ADBBVA.GetDirectoryEntry())
$Searcher.Filter = '((objectCategory=computer))'
#$Searcher.SizeLimit = 888
$Searcher.PageSize = 10
$UserAD = $Searcher.findAll()
$UserAD > PCs_Dominio.txt