#TYPE Selected.Microsoft.Exchange.Management.StoreTasks.MailboxFolderPermission                
SmtpAddress    Identity    FolderName    User    AccessRights
kaigiA@mhlw.go.jp    mhlw.go.jp/会議室A:\calendar    Calendar    既定    System.Collections.ObjectModel.Collection`1[Microsoft.Exchange.Management.StoreTasks.MailboxFolderAccessRight]
kaigiA@mhlw.go.jp    mhlw.go.jp/会議室A:\calendar    Calendar    匿名    System.Collections.ObjectModel.Collection`1[Microsoft.Exchange.Management.StoreTasks.MailboxFolderAccessRight]
kaigiA@mhlw.go.jp    mhlw.go.jp/会議室A:\calendar    Calendar    B    System.Collections.ObjectModel.Collection`1[Microsoft.Exchange.Management.StoreTasks.MailboxFolderAccessRight]
kaigiB@mhlw.go.jp    mhlw.go.jp/会議室B:\calendar    Calendar    既定    System.Collections.ObjectModel.Collection`1[Microsoft.Exchange.Management.StoreTasks.MailboxFolderAccessRight]
kaigiB@mhlw.go.jp    mhlw.go.jp/会議室B:\calendar    Calendar    匿名    System.Collections.ObjectModel.Collection`1[Microsoft.Exchange.Management.StoreTasks.MailboxFolderAccessRight]
kaigiB@mhlw.go.jp    mhlw.go.jp/会議室B:\calendar    Calendar    B    System.Collections.ObjectModel.Collection`1[Microsoft.Exchange.Management.StoreTasks.MailboxFolderAccessRight]
 

# 実行ファイルのディレクトリ
$CurrentDir = Split-Path $MyInvocation.MyCommand.path
# 出力先ディレクトリ
$ExpDir = $CurrentDir + "\export_file\"
# 検索対象

# ディレクトリの存在チェック
If (!(Test-Path $ExpDir)) {
    # 存在しない場合、ディレクトリ作成
    New-Item $ExpDir -ItemType Directory
}

# パーミッション一覧
$GetMB = Get-Mailbox -Filter "ResourceType -eq 'Room'" | Select PrimarySmtpAddress
$GetPL = foreach ($i in $GetMB.PrimarySmtpAddress ){ Get-MailboxFolderPermission -Identity $i":\calendar" | Select @{n="SmtpAddress";e={$i}},Identity,FolderName, User, AccessRights }
$GetPL | Export-Csv -Encoding UTF8 -Path $ExpDir"Permission.csv"

Start-Transcript .\Exchange_internal.log -Append

Get-DistributionGroup -Resultsize Unlimited | select-Object *Name*,Alias,Legacy*,PrimarySmtpAddress,RecipientType*,CustomAttribute* | export-csv .\All_DistributionGroup_internal.csv -encoding utf8

$All_DistGroupMember = foreach ( $i in Get-DistributionGroup -Resultsize Unlimited ) { Get-DistributionGroupMember $i.DistinguishedName -Resultsize Unlimited | select-Object @{n="DistributionGroup";e={$i.DisplayName}},@{n="GroupAddress";e={$i.PrimarySmtpAddress}},DisplayName,PrimarySmtpAddress,RecipientType* }
$All_DistGroupMember | export-csv .\All_DistributionGroupMember_internal.csv -encoding utf8

stop-Transcript