Export-OutlookMessage.ps1
|
function Export-OutlookMessage { <# .SYNOPSIS OutlookConnector function: Saves Outlook message to a file on disk. .DESCRIPTION Saves one or messages to a file on disk at specified path. All messages are saved in same folder, and file names are built based on customizable parameter FileNameFormat. Messages can be obtained by one of Get-Outlook commands. Messages are saved in MSG format. If message with same name exists, numbering will be added at the end of file name. .EXAMPLE (Get-OutlookInbox | sort receivedtime -Descending)[0] | Export-OutlookMessage -OutputFolder 'C:\tmp' Save last message from Inbox to C:\tmp folder .EXAMPLE Get-OutlookMessage Inbox | ? Sendername -Match 'boss' | Export-OutlookMessage -OutputFolder 'C:\boss' Get-OutlookMessage SentMail | ? To -Match 'boss' | Export-OutlookMessage -OutputFolder 'C:\boss' Save your entire communication with boss to a folder on a disk. .PARAMETER Messages Mandatory parameter which is content of one or more messages that will be saved to disk. Messages can be obtained with one of Get-Outlook commands. Type Get-Command Get-Outlook* for list of commands. Messages can be provided either as parameter, or via pipeline. .PARAMETER OutputFolder Mandatory parameter which specifies to which folder messages will be saved. It can be both local disk, as well as network location. .PARAMETER FileNameFormat Optional parameter that specifies how individual files will be named based. If omitted, files will be saved in format 'FROM= %SenderName% SUBJECT= %Subject%'. File name can contain any of message parameters surrounded with %. For list of parameters, type Get-OutlookInbox | Get-Member. .PARAMETER SkippedMessages Optional parameter that specifies varaible to which will be stored messages that can not be processed. Messages can be skipped for different reasons (wrong object, missing property specified in FileNameFormat parameter, etc. Variable must be referenced, i.e. sent in format [ref]$Variable, and it must be declared in advance. Current value of variable will be deleted. .OUTPUTS Function is not returning any value. .LINK about_OutlookConnector .NOTES NAME: Export-OutlookMessage AUTHOR: Igor Iric, iricigor@gmail.com CREATEDATE: September 29, 2015 #> # ---------------------- [Parameters definitions] ------------------------ [CmdletBinding()] Param( [parameter(Mandatory=$true,ValueFromPipeline=$true)] [ValidateNotNullOrEmpty()] [psobject[]]$Messages, [parameter(Mandatory=$true,ValueFromPipeline=$false)] [string]$OutputFolder, [parameter(Mandatory=$false,ValueFromPipeline=$false)] [string]$FileNameFormat='FROM= %SenderName% SUBJECT= %Subject%', [parameter(Mandatory=$false,ValueFromPipeline=$false)] [ref]$SkippedMessages ) #end param # ------------------------- [Function start] ----------------------------- BEGIN { Write-Verbose -Message 'Export-OutlookMessage starting...' $olSaveAsTypes = "Microsoft.Office.Interop.Outlook.olSaveAsType" -as [type] # convert format message to real file name, replace %...% with message attribute $RegEx = '(\%)(.+?)(\%)' $ReqProps = @('Subject','SaveAs') $ReqProps += ([regex]::Matches($FileNameFormat,$RegEx) ).Value -replace '%','' # initialize queue for skipped messages, if it is passed if ($SkippedMessages) { $SkippedMessages.Value = @() } } PROCESS { foreach ($Message in $Messages) { # check input object $NotFoundProps = Validate-Properties -InputObject $Message -RequiredProperties $ReqProps # Validate-Properties is internal function if ($NotFoundProps) { if ($Message.Subject) { # TODO Simplify this section $ErrorMessage = 'Message ' + $Message.Subject + ' is not proper object.' } else { $ErrorMessage = 'Message is not proper object.' } $ErrorMessage += ' Missing: ' + ($NotFoundProps -join ',') if ($SkippedMessages) { $SkippedMessages.Value += $Message # adding skipped messages to referenced variable if passed } Write-Error -Message $ErrorMessage Continue # next foreach } Write-Verbose -Message ('Processing '+($Message.Subject)) # creating file name $FileName = Create-FileName -InputObject $Message -FileNameFormat $FileNameFormat # Create-FileName is internal function # fix file name $FileName = Get-ValidFileName -FileName $FileName $FullFilePath = Add-Numbering -FileName (Join-Path -Path $OutputFolder -ChildPath $FileName) -FileExtension 'msg' Write-Verbose -Message "Saving message to $FullFilePath" # save message to disk try { $Message.SaveAs($FullFilePath,$olSaveAsTypes::olMSGUnicode) } catch { if ($SkippedMessages) { $SkippedMessages.Value += $Message # adding skipped messages to referenced variable if passed } Write-Error -Message ('Message save exception.'+$Error[0].Exception) } } # end foreach $Message } # End of PROCESS block END { # function closing phase Write-Verbose -Message 'Export-OutlookMessage completed.' } # ------------------------- [End of function] ---------------------------- } |