PowerShell rename a mailbox folder using Exchange Web Services API

A question came up on the Exchange Server Forum on powershellcommunity.org:

‘Is it possible to use PowerShell with a COM access to connect to a remote outlook mailbox and change the name of a folder, especially a custom folder not a system folder like inbox,sent items,contact…etc? I have a project where I need to change the name of a folder called marketing that 1000 users have on their mailbox at the root of the mailbox and change it to something like Market-Values? If possible, can someone steer me into the right direction?”
After several probing replies, it was learned that the folder was really named “Marketing Deals”, and that the original requestor wouldn’t mind using the EWS Managed API, but that she was trying PowerShell “first”

Well, as Glen Scales keeps showing, PowerShell and EWS (especially the managed API) play together very well.

Using some of Glen’s previous work on finding a folder, and some of David Claux’s example on renaming a folder from the TechNet forums, I came up with this:

001 002 003 004 005 006 007 008 009 010 011 012 013 014 015 016 017 018 019 020 021 022 023 024 025 026 027 028 029

$dllpath =` “C:\Program Files\Microsoft\Exchange\Web Services\1.0\Microsoft.Exchange.WebServices.dll” [void][Reflection.Assembly]::LoadFile($dllpath) $service = New-Object Microsoft.Exchange.WebServices.Data.ExchangeService(` [Microsoft.Exchange.WebServices.Data.ExchangeVersion]::Exchange2010) $windowsIdentity = [System.Security.Principal.WindowsIdentity]::GetCurrent() $sidbind = “LDAP://<SID=” + $windowsIdentity.user.Value.ToString() + “>” $aceuser = [ADSI]$sidbind $service.AutodiscoverUrl($aceuser.mail.ToString()) $Domain = $aceuser.mail.ToString().Split(‘@’)[1] foreach ($MailboxName in Get-Content “c:\MailboxList.txt”) { $rfRootFolderID = new-object Microsoft.Exchange.WebServices.Data.FolderId(` [Microsoft.Exchange.WebServices.Data.WellKnownFolderName]::MsgFolderRoot,$MailboxName) $rfRootFolder = [Microsoft.Exchange.WebServices.Data.Folder]::Bind($service,$rfRootFolderID) $fvFolderView = New-Object Microsoft.Exchange.WebServices.Data.FolderView(10000); $fvFolderView.Traversal = [Microsoft.Exchange.WebServices.Data.FolderTraversal]::Deep $fvFolderView.PropertySet = $Propset $ffResponse = $rfRootFolder.FindFolders($fvFolderView); foreach ($folder in $ffResponse.Folders) { if ($folder.Displayname -eq “Marketing Deals”) { Write-Output “Found Marketing Deals on $mailboxName” $folder.Displayname = “Market-Values” $folder.Update() } } }

If you are running Exchange 2007 SP1, changel line 5 from
[Microsoft.Exchange.WebServices.Data.ExchangeVersion]::Exchange2010)
to
[Microsoft.Exchange.WebServices.Data.ExchangeVersion]::Exchange2007_SP1)

You’d also obviously want to change the folder you are searching for, and the name you want to rename it to.

If you want to only rename a folder in the root of the mailbox, remove this line:

$fvFolderView.Traversal = [Microsoft.Exchange.WebServices.Data.FolderTraversal]::Deep

Finally, create a text file with email addresses (one per line), and save it as c:\mailboxlist.txt like:
karlmitschke@contoso.com
smitschke@contoso.com

Run the script, and any mailbox that has the searched for folder should have that folder renamed.

Advertisement