скрипт на переименование групп в AD

Question

добрый день, помогите написать скрипт для переименования групп в AD п ошаблону. например с test_ad1 test_ad2 test_ad3 на data_ad1 data_ad2 data_ad3

Answer 1

Используя PowerShell:

1) Модуль AD
Get-ADGroup -Filter {name -like "test_ad*"} | Foreach { $_ | Rename-ADObject -NewName ($_.name -replace "test","data")}

2) Quest Software 
Get-QADGroup test_ad* | Foreach {$_ | Rename-QADObject -NewName ($_.name -replace "test","data")}

3) ADSI
$searcher = [adsisearcher]"(&(objectclass=group)(name=test_ad*))"
$grs = $searcher.FindAll()
foreach($gr in $grs)
{
    $Name = $gr.Properties.Item("sAMAccountName")
    $CN = $gr.Properties.Item("cn")
    $Display = $gr.Properties.Item("displayName")

    $Name = $Name -Replace "test", "data"
    $CN = $CN -Replace "test", "data"
    $Display = $Display -Replace "test", "data"
    $gr = $gr.GetDirectoryEntry()

    $gr.sAMAccountName = $Name
    $gr.displayName = $Display

    $gr.SetInfo()
    $gr.Rename("cn=$CN")
}