No replies to this topic

[Alberto Dominguez]

Dejo script para la obtención recursiva de objetos de un dominio que esten dentro de unidades organizativas:

Function ObjetosAD($DN){


$LDAPPath=[ADSI]("LDAP://$DN")
$Objetos = $LDAPPath.psbase.children

foreach ($child in $objetos)
{
$global:i++
if ($child.schemaClassName -ne "OrganizationalUnit")
{
Write-Host ($child.DistinguishedName.ToString()+' ('+$child.psBase.schemaClassName.ToString()+')'+' - '+$global:i)
Write-Output ($child.DistinguishedName.ToString()+' ('+$child.psBase.schemaClassName.ToString()+')')
}
elseif ($child.schemaClassName -eq "OrganizationalUnit")
{
Write-Host ($child.DistinguishedName.ToString()+' ('+$child.psBase.schemaClassName.ToString()+')'+' - '+$global:i)
Write-Output ($child.DistinguishedName.ToString()+' ('+$child.psBase.schemaClassName.ToString()+')')
$DNr='ou='+$child.Name+','+$DN
ObjetosAD($DNr)
}
}
return
}

#*************************************
# PROGRAMA PRINCIPAL
#
#*************************************

$global:i=0
$file1='c:\DAPRE\ObjetosPRE.txt'
$global:logFile='c:\DAPRE\ObjetosAD.log'
$DN1="dc=contoso,dc=comt"



[String](Get-date -Format u)+' '+'*** INICIO EJECUCIÓN PROGRAMA PRINCIPAL ***' | out-file $logfile

ObjetosAD($DN1) > $file1

[String](Get-date -Format u)+' '+'*** FIN EJECUCIÓN PROGRAMA PRINCIPAL ***' | out-file $logfile -Append