Résolu Optimisation du temps de traitement

cls
$starttime=Get-Date
$Alldn = Get-ADComputer -Filter * | Select-Object -Property DistinguishedName |sort -Property DistinguishedName
$totDN = $Alldn.Count
$dnList = @{}
$id = 0
Write-Host "Nombre de PC: $totDN"
foreach ($item in $Alldn)
{
    # Extraction des OU ou CN de chaque ordinateur
    $pos = $item.DistinguishedName.IndexOf("OU=")
    if ($pos -ge 0) 
    {
        $dn = $item.DistinguishedName.Substring($pos)
        #Write-Host $dn
        #$dnList[$id] = $dn
    }else #si pas de OU dans DistinguishedName alors l'ordinateur se trouve dans un CN
    {
        $dn = $item.DistinguishedName      # recuperation du DistinguishedName entier
        $lg = $dn.Length                   # longueur de la chaine DistinguishedName
        $dn = $dn.Substring(3,$lg-3)       # Suppression du premier "CN=" au début de la chaine        
        $pos = $dn.indexof("CN=")          # index du "CN=" dans la nouvelle chaine 
        $lg = $dn.Length                   # longueur de la chaine $cn
        $dn = $dn.Substring($pos,$lg-$pos) # recuperation du DistinguishedName sans le nom de l'ordinateur
        #Write-Host -BackgroundColor DarkCyan -ForegroundColor White $dn
    }
    # Recherche de doublons
    $exist = $false
    if ($id -eq 0) # Si 1er OU ou CN on l'ajoute au tableau
    {
        $dnList[$id] = $dn
        $exist = $true
    }else          # Sinon on parcours la liste des OU pour vérifier si celui en cours existe déjà
    {
        for ($j=0; $j -lt $id; $j++)
        {
            if ($dnList[$j] -match $dn) 
            { 
                $exist = $true # indique l presence
                break          # sortie de la boucle
            }            
        }
    }
    # Si le chemin n'est pas present dans la liste on l'ajoute
    if ($exist -eq $false) 
    { 
        $dnList[$id] = $dn 
    }
    # increment de l'index $id du tableau
    $id++
}
$dncount = $dnList.Count
$dnList | Out-GridView -Title "Emplacement des ordinateurs" -OutputMode None 
$endtime=Get-Date
$totaltime=($endtime-$starttime).TotalSeconds
$minutes="{0:N0}" -f ($totaltime/60)
$seconds="{0:N0}" -f ($totaltime%60)
Write-Host  -BackgroundColor DarkCyan -ForegroundColor White "Recherche et tri des $dncount emplacements uniques effectué en $minutes minutes $seconds secondes."

cls
$starttime=Get-Date
$Alldn = Get-ADComputer -Filter * | Select-Object -Property DistinguishedName |sort -Property DistinguishedName
$totDN = $Alldn.Count
$dnList = @{}
$id = 0
Write-Host "Nombre de PC: $totDN"
foreach ($item in $Alldn)
{
    # Extraction des OU ou CN de chaque ordinateur
    $pos = $item.DistinguishedName.IndexOf("OU=")
    if ($pos -ge 0) 
    {
        $dn = $item.DistinguishedName.Substring($pos)
    }else #si pas de OU dans DistinguishedName alors l'ordinateur se trouve dans un CN
    {
        $dn = $item.DistinguishedName          # recuperation du DistinguishedName entier
        $lg = $dn.Length                                  # longueur de la chaine DistinguishedName
        $dn = $dn.Substring(3,$lg-3)               # Suppression du premier "CN=" au début de la chaine        
        $pos = $dn.indexof("CN=")                  # index du "CN=" dans la nouvelle chaine 
        $lg = $dn.Length                                  # longueur de la chaine $cn
        $dn = $dn.Substring($pos,$lg-$pos)   # recuperation du DistinguishedName sans le nom de l'ordinateur xpl: CN=Computers,DC=Societe,DC=local
    }
    # Ajout dans le tableau
    $dnList[$id] = $dn
    $id++    
}
$dncount = $dnList.Count
$SelectedOU = $dnList.Values | Select-Object -Unique| Sort-Object -Descending |Out-GridView -Title "Selection de l'OU de destination" -OutputMode Single
$endtime=Get-Date
$totaltime=($endtime-$starttime).TotalSeconds
$minutes="{0:N0}" -f ($totaltime/60)
$seconds="{0:N0}" -f ($totaltime%60)
Write-Host  -BackgroundColor DarkCyan -ForegroundColor White "Recherche et tri des $dncount emplacements uniques effectué en $minutes minutes $seconds secondes."
Write-Host  -BackgroundColor DarkCyan -ForegroundColor White "OU selectionnée: $SelectedOU"