web-dev-qa-db-ja.com

ActiveDirectoryからのすべてのグループとグループメンバーのエクスポート

私はPowerShellに比較的慣れていないので、ドメイン内のすべてのグループとそれぞれのメンバーのリストを取得しようとしています。これが私が今取り組んでいるものです:

Import-Module ActiveDirectory
$OutPutFile = New-Item -type file -force "AllGroups.txt"

#Filters for Groups

# 2 Global distribution group
# 4 Domain local distribution group
# 8 Universal distribution group
# -2147483646 Global security group
# -2147483644 Domain local security group
# -2147483640 Universal security group

$D = [System.DirectoryServices.ActiveDirectory.Domain]::GetCurrentDomain()
$Domain = [ADSI]"LDAP://$D"
$Searcher = New-Object System.DirectoryServices.DirectorySearcher
$Searcher.PageSize  = 10000

$Searcher.Filter = "(&(objectCategory=Group)(|(groupType=2)(groupType=4)(groupType=8)))"
$Searcher.SearchRoot = "LDAP://" + $Domain.Name

$Results = $Searcher.FindAll()
foreach ($Result in $Results)
{
    $Item = $Result.Properties

    foreach ($Member in $Item.member) 
    {
    $Name = Get-ADUser "$Member" -Properties DisplayName | select -expand displayname
    $Item.cn, "$Name" | Out-File $OutPutFile -encoding ASCII -append
    }
}

出力をGroup; DisplaynameまたはGroup-Displaynameにしたいのですが(Excelに入れてそこからフォーマットできるように)、同じ行に出力を取得できないようです。現在、出力は次のようになります。

Group
DisplayName
Group
DisplayName

何が間違っているのですか、またはコードを調整して同じ行に2つの項目を表示するにはどうすればよいですか?グループが所属するOUを追加することも考えていましたが、結果からそれを取得する方法を見つけることができませんでした。

3
bg.ranken

リストをOut-File -Appendにパイプすると、各エントリが新しい行に書き込まれます。

代わりに、2つの値から文字列を作成し、次のことをパイプします。

$MemberLine = '"{0}","{1}"' -f $Item.CN,$Name 
$MemberLine | Out-File $OutPutFile -encoding ASCII -append

または、Export-Csvを使用すると、値が正しくコンマで区切られます。

$Members = foreach ($Result in $Results)
{
    $Item = $Result.Properties

    foreach ($Member in $Item.member) 
    {
        Get-ADUser "$Member" -Properties DisplayName |Select @{Name='Group';Expression={$Item.CN}},@{Name='Member',Expression={$_.displayname}}
    }
}
$Members | Export-Csv $OutPutFile -Encoding ASCII -NoTypeInformation

すでに述べたように、[adsisearcher]Get-ADGroupコマンドレットに置き換えることができます。これは、はるかに簡潔です。

$Groups = Get-ADGroup -Filter {GroupCategory -eq 'Distribution'}
$Groups | ForEach-Object {
  $Group = $_
  $Group.Member |ForEach-Object {
    Get-ADUser $_ -Properties displayName
  } | Select @{N='Group';E={$Group.Name}},@{N='Member';E={$_.displayName}}
} | Export-Csv $OutPutFile -Encoding ASCII -NoTypeInformation
3

次のPowerShellコードを使用するだけです。

Get-ADGroup -filter "name -like 'CWS*'" | % {
$Group = $_.Name $_ | Get-ADGroupMember | select @{n="Group";e={$Group}}, 
@{n='Users';e={$_.Name}} | Export-CSV c:\temp\report.csv -NoTypeInformation -Append -Delimiter ";" }
0
Sergey Sypalo