We help IT Professionals succeed at work.
Get Started

Modifying PowerShell script to list Exchange server mailbox server name ?

Senior IT System Engineer
Senior IT System Engineer asked
on
6 Comments
3 Solutions
206 Views
Last Modified: 2017-07-22
I had this question after viewing Modifying PowerShell script to list the Exchange Server 2013 Mailbox Database white space ?.

Hi All,

Can anyone here please assist me in modifying the PowerShell script below to show the server name and the drive letter of the mailbox database ?

$Session = New-PSSession -ConfigurationName Microsoft.Exchange -ConnectionUri http://PRODMBXCAS02-VM/PowerShell/ -Authentication Kerberos
Import-PSSession $Session -AllowClobber
Import-Module ActiveDirectory -ErrorAction STOP 
 
############################################################################## 
 
$whitespace  = ".\whitespace.htm" 
 
$checkrep = Test-Path ".\whitespace.htm"  
 
If ($checkrep -like "True") { 
	Remove-Item ".\whitespace.htm"  
} 
 
New-Item ".\whitespace.htm" -type file 
 
$smtphost = "owa.domain.com"  
$from = "white_space_report@Powershell.com"  
$to = "IT@domain.com" 
################################ADD HTML Content############################# 

Add-Content $whitespace "<html>"  
Add-Content $whitespace "<head>"  
Add-Content $whitespace "<meta http-equiv='Content-Type' content='text/html; charset=iso-8859-1'>"  
Add-Content $whitespace '<title>Whitespace Report</title>'  
add-content $whitespace '<STYLE TYPE="text/css">'  
add-content $whitespace  "<!--"  
add-content $whitespace  "td {"  
add-content $whitespace  "font-family: Tahoma;"  
add-content $whitespace  "font-size: 11px;"  
add-content $whitespace  "border-top: 1px solid #999999;"  
add-content $whitespace  "border-right: 1px solid #999999;"  
add-content $whitespace  "border-bottom: 1px solid #999999;"  
add-content $whitespace  "border-left: 1px solid #999999;"  
add-content $whitespace  "padding-top: 0px;"  
add-content $whitespace  "padding-right: 0px;"  
add-content $whitespace  "padding-bottom: 0px;"  
add-content $whitespace  "padding-left: 0px;"  
add-content $whitespace  "}"  
add-content $whitespace  "body {"  
add-content $whitespace  "margin-left: 5px;"  
add-content $whitespace  "margin-top: 5px;"  
add-content $whitespace  "margin-right: 0px;"  
add-content $whitespace  "margin-bottom: 10px;"  
add-content $whitespace  ""  
add-content $whitespace  "table {"  
add-content $whitespace  "border: thin solid #000000;"  
add-content $whitespace  "}"  
add-content $whitespace  "-->"  
add-content $whitespace  "</style>"  
Add-Content $whitespace  "</head>"  
Add-Content $whitespace  "<body>"  
add-content $whitespace  "<table width='100%'>"  
add-content $whitespace  "<tr bgcolor='Aliceblue'>"  
add-content $whitespace  "<td colspan='7' height='25' align='center'>"  
add-content $whitespace  "<font face='tahoma' color='#003499' size='4'><strong>Whitespace Report</strong></font>"  
add-content $whitespace  "</td>"  
add-content $whitespace  "</tr>"  
add-content $whitespace  "</table>"  
  
add-content $whitespace  "<table width='100%'>"  
Add-Content $whitespace "<tr bgcolor='BlanchedAlmond'>"  
Add-Content $whitespace  "<td width='10%' align='center'><B>Database Name</B></td>"  
Add-Content $whitespace  "<td width='10%' align='center'><B>AvailableNewMailboxSpace</B></td>"  
Add-Content $whitespace "</tr>"  

######################################################################################################## 
 
################################## White Space ################################################# 
 
$databases = Get-MailboxDatabase -Status | sort -Descending AvailableNewMailboxSpace 
foreach($Database in $databases) { 
	 Write-Host $Database.Name `t $Database.Server `t $Database.AvailableNewMailboxSpace -ForegroundColor Green  
	  
	 $machineName = $Database.Name  
	 $svcState = $Database.AvailableNewMailboxSpace 

	 Add-Content $whitespace "<tr>"  
	 Add-Content $whitespace "<td bgcolor= 'Lavendar' align=center>  <B> $machineName</B></td>"  
	 Add-Content $whitespace "<td bgcolor= 'Aquamarine' align=center><B>$svcState</B></td>"  
	 Add-Content $whitespace "</tr>"            
} 
 
############################################Close HTMl Tables######################################### 

Add-content $whitespace  "</table>"  
Add-Content $whitespace "</body>"  
Add-Content $whitespace "</html>"  

##################################################################################################### 
#############################################Send Email############################################## 
$subject = "WhiteSpace Report"  
$body = Get-Content ".\whitespace.htm"  
$smtp= New-Object System.Net.Mail.SmtpClient $smtphost  
$msg = New-Object System.Net.Mail.MailMessage $from, $to, $subject, $body  
$msg.isBodyhtml = $true  
$smtp.send($msg)  
#####################################################################################################

Open in new window


Thanks in advance.
Comment
Watch Question
Tahir QureshiSystem Analyst
Commented:
This problem has been solved!
Unlock 3 Answers and 6 Comments.
See Answers
Why Experts Exchange?

Experts Exchange always has the answer, or at the least points me in the correct direction! It is like having another employee that is extremely experienced.

Jim Murphy
Programmer at Smart IT Solutions

When asked, what has been your best career decision?

Deciding to stick with EE.

Mohamed Asif
Technical Department Head

Being involved with EE helped me to grow personally and professionally.

Carl Webster
CTP, Sr Infrastructure Consultant
Ask ANY Question

Connect with Certified Experts to gain insight and support on specific technology challenges including:

  • Troubleshooting
  • Research
  • Professional Opinions
Did You Know?

We've partnered with two important charities to provide clean water and computer science education to those who need it most. READ MORE