quote:

---

Originally posted by Jazzy

The value TotalDeletedItemSize applies to the items in the dumpster, not the Deleted items folder.

---

$Excel = New-Object -Com Excel.Application
$Excel.visible = $True
$Excel = $Excel.Workbooks.Add()

$Sheet = $Excel.WorkSheets.Item(1)
$Sheet.Cells.Item(1,1) = "Name                  "
$Sheet.Cells.Item(1,2) = "SMTP                  "
$Sheet.Cells.Item(1,3) = "Alias                 "
$Sheet.Cells.Item(1,4) = "DataBase              "
$Sheet.Cells.Item(1,5) = "Quota Default         "
$Sheet.Cells.Item(1,6) = "Litigation Hold       "
$Sheet.Cells.Item(1,7) = "IssueWarningQuota                          "
$Sheet.Cells.Item(1,8) = "ProhibitSendQuota                          "
$Sheet.Cells.Item(1,9) = "ProhibitSendReceiveQuota                   "
$Sheet.Cells.Item(1,10) = "ItemCount                                 "
$Sheet.Cells.Item(1,11) = "TotalItemSize                             "
$Sheet.Cells.Item(1,12) = "StorageLimitStatus                        "
$Sheet.Cells.Item(1,13) = "DeletedItemSize                           "
$Sheet.Cells.Item(1,14) = "DeletedItems                              "

$WorkBook = $Sheet.UsedRange
# http://dmcritchie.mvps.org/excel/colors.htm
$WorkBook.Interior.ColorIndex = 34
$WorkBook.Font.ColorIndex = 1
$WorkBook.Font.Bold = $True

$intRow = 2

# Creating $mbox as an object
# Get-Mailbox -Filter Is pulling ALL of the MailBoxes that are NOT using the Default Database Quotas
# -ResultSize Unlimited makes sure that I do not get the size limitation errror
# select = Everything I want from Get-Mailbox
$mbox = Get-Mailbox -Filter 'UseDatabaseQuotaDefaults -eq $False' -ResultSize Unlimited | select samAccountName,primarySmtpAddress,alias,database,UseDatabaseQuotaDefaults,LitigationHoldEnabled,IssueWarningQuota,ProhibitSendQuota,ProhibitSendReceiveQuota


# Passing the $mbox object to a for-each " % " and adding items.
$mbox | % {
$obj = "" | select Name,SMTP,Alias,Database,QuotaDefault,"Litigation Hold",IssueWarningQuota,ProhibitSendQuota,ProhibitSendReceiveQuota,ItemCount,TotalItemSize,StorageLimitStatus,DeletedItemSize,"Deleted Items"
# The SamAccountName will also be used for -Identity for the following cmdlets
$obj.Name = $_.samaccountname
$obj.SMTP = $_.primarySmtpAddress.tostring()
$obj.alias = $_.alias
$obj.database = $_.database.tostring()
$obj.quotadefault = $_.UseDatabaseQuotaDefaults.tostring()
$obj."Litigation Hold" = $_.LitigationHoldEnabled.tostring()
$obj.IssueWarningQuota = $_.IssueWarningQuota.tostring()
$obj.ProhibitSendQuota = $_.ProhibitSendQuota.tostring()
$obj.ProhibitSendReceiveQuota = $_.ProhibitSendReceiveQuota.tostring()

# For every item in $mbox select these items to add from Get-MailboxStatistics for each item from above.
Get-MailboxStatistics -Identity $_.SamAccountName | % {
$obj.ItemCount = $_.itemcount.tostring()
$obj.totalitemsize = $_.totalitemsize.tostring()
$obj.StorageLimitStatus = $_.StorageLimitStatus.tostring()

}

# For every item in $mbox select these items to add from Get-MailboxFolderStatistics for each item from above.
Get-MailboxFolderStatistics -Identity $_.SamAccountName | Where {$_.FolderPath -eq "/Deleted Items"} | % { 
$obj.DeletedItemSize = $_.FolderAndSubfolderSize.tostring()
$obj."Deleted Items" = $_.ItemsInFolderAndSubfolders.tostring()


}

$obj

} | % { 



$Sheet.Cells.Item($intRow,  1) = $_.Name
$Sheet.Cells.Item($intRow,  2) = $_.SMTP
$Sheet.Cells.Item($intRow, 3) = $_.alias
$Sheet.Cells.item($intRow, 4) = $_.database
$Sheet.Cells.Item($intRow,  5) = $_.quotadefault
$Sheet.Cells.Item($intRow,  6) = $_."Litigation Hold"
$Sheet.Cells.Item($intRow,  7) = $_.IssueWarningQuota
$Sheet.Cells.Item($intRow,  8) = $_.ProhibitSendQuota
$Sheet.Cells.Item($intRow,  9) = $_.ProhibitSendReceiveQuota
$Sheet.Cells.Item($intRow,  10) = $_.ItemCount
$Sheet.Cells.Item($intRow,  11) = $_.totalitemsize
$Sheet.Cells.Item($intRow,  12) = $_.StorageLimitStatus 
$Sheet.Cells.Item($intRow,  13) = $_.DeletedItemSize 
$Sheet.Cells.Item($intRow,  14) = $_."Deleted Items"
$intRow = $intRow + 1

}
$WorkBook.EntireColumn.AutoFit()
#Clear