Показать полную графическую версию : Выгрузка данных из AD: Группа -> Пользователи
JimmLight
03-09-2020, 13:56
Добрый день!
Подскажите пожалуйста в реализации скрипта, который бы выгружал необходимый мне перечень групп с пользователями.
Использую такую команду:
Get-ADGroupMember -Identity "NameGroup" | Select-Object name | Export-Csv C:\SuperScripts\Group.csv -Encoding UTF8 -Delimiter ";"
Для выгрузки содержимого одной группы.
Но необходимо выполнить таким образом, чтобы можно было добавлять в скрипт любое количество групп и получать CSV следующего формата:
------------------------------------------------------------------------------------------------------
NameGr1 -|- NameGr2 -|- NameGr3 -|- NameGr4 -|- NameGr5 -|- NameGr6 -|-
------------------------------------------------------------------------------------------------------
NameUser | NameUser | NameUser | NameUser | NameUser | NameUser |
NameUser | NameUser | NameUser | NameUser | NameUser | NameUser |
NameUser | NameUser | NameUser | NameUser | NameUser | NameUser |
NameUser | NameUser | NameUser | NameUser | NameUser | NameUser |
csv - это строки связанных друг с другом данных, а в вашем примере просто текст столбиками написан
JimmLight
04-09-2020, 12:58
csv - это строки связанных друг с другом данных, а в вашем примере просто текст столбиками написан »
Okay.
Прошу прощения.
На выходе нужно получить CSV-файл следующего содержания:
"NameGr1";"NameGr2";"NameGr3";"NameGr4";"NameGr5";"NameGr6"
"NameUser";"NameUser";"NameUser";"NameUser";"NameUser";"NameUser"
"NameUser";"NameUser";"NameUser";"NameUser";"NameUser";"NameUser"
"NameUser";"NameUser";"NameUser";"NameUser";"NameUser";"NameUser"
"NameUser";"NameUser";"NameUser";"NameUser";"NameUser";"NameUser"
JimmLight, речь была о том, что табличная форма представления данных - это не рисование по клеточкам
На выходе нужно получить CSV-файл следующего содержания: »
Файл именно такого содержания можно получить путём извращённого программирования ровно в одном случае: если в каждой из NameGr* будет содержаться строго одинаковое количество NameUser'ов, что в реальной жизни не бывает. Надо понимать, что CSV — это фактически плоская база данных.
JimmLight
07-09-2020, 06:34
Файл именно такого содержания можно получить путём извращённого программирования ровно в одном случае: если в каждой из NameGr* будет содержаться строго одинаковое количество NameUser'ов, что в реальной жизни не бывает. Надо понимать, что CSV — это фактически плоская база данных. »
Понял. Жаль.
Нашёл вот такой скрипт, мало ли кому пригодится. Чуть-чуть подредактировал под себя.
#// Start of script
#// Get year and month for csv export file
$DateTime = Get-Date -f "yyyy-MM"
#// Set CSV file name
$CSVFile = "C:\AD_Group"+$DateTime+".csv"
#// Create emy array for CSV data
$CSVOutput = @()
#// Get all AD groups in the domain
$ADGroups = Get-ADGroup -Filter * -SearchBase "OU=new_group,DC=domain,DC=ns"
#// Set progress bar variables
$i=0
$tot = $ADGroups.count
foreach ($ADGroup in $ADGroups) {
#// Set up progress bar
$i++
$status = "{0:N0}" -f ($i / $tot * 100)
Write-Progress -Activity "Exporting AD Groups" -status "Processing Group $i of $tot : $status% Completed" -PercentComplete ($i / $tot * 100)
#// Ensure Members variable is empty
$Members = ""
#// Get group members which are also groups and add to string
$MembersArr = Get-ADGroup -filter {Name -eq $ADGroup.Name} | Get-ADGroupMember | select Name, objectClass, distinguishedName
if ($MembersArr) {
foreach ($Member in $MembersArr) {
if ($Member.objectClass -eq "user") {
$MemDN = $Member.distinguishedName
$UserObj = Get-ADUser -filter {DistinguishedName -eq $MemDN}
if ($UserObj.Enabled -eq $False) {
continue
}
}
$Members = $Members + "," + $Member.Name
}
#// Check for members to avoid error for empty groups
if ($Members) {
$Members = $Members.Substring(1,($Members.Length) -1)
}
}
#// Set up hash table and add values
$HashTab = $NULL
$HashTab = [ordered]@{
"Name" = $ADGroup.Name
"Category" = $ADGroup.GroupCategory
"Scope" = $ADGroup.GroupScope
"Members" = $Members
}
#// Add hash table to CSV data array
$CSVOutput += New-Object PSObject -Property $HashTab
}
#// Export to CSV files
$CSVOutput | Sort-Object Name | Export-Csv $CSVFile -Encoding UTF8 -Delimiter ";"
#// End of script
DJ Mogarych
07-09-2020, 13:14
CSV следующего формата »
Интересно, для какой цели требуется именно такое представление этих данных
DJ Mogarych, для начальства, как правило.
DJ Mogarych
07-09-2020, 21:29
...которое и само не знает, зачем это ему в таком виде.
© OSzone.net 2001-2012
vBulletin v3.6.4, Copyright ©2000-2025, Jelsoft Enterprises Ltd.