Script Repository

$exchangeServer = "exchangeServer.domain.com" # TODO: Modify me

try
{
    # Connect to the Exchange Server
    $session = New-PSSession -connectionURI "http://$exchangeServer/powershell" -ConfigurationName Microsoft.Exchange
    Import-PSSession -session $session -AllowClobber -DisableNameChecking

    # Get the message tracking log for the distribution list
    $messageTrackingLog = Get-MessageTrackingLog -Recipients "%mail%" -ResultSize Unlimited | Select-Object sender, timestamp | Sort timestamp -Descending
}
finally
{
    # Close connection to the Exchange Server
    Remove-PSSession -Session $session
}

if ($messageTrackingLog -eq $NULL)
{
    $Context.LogMessage("There were no messages sent to this mailbox", "Information")
    return
}

$sender = $messageTrackingLog[0].Sender
$timeStamp = $messageTrackingLog[0].TimeStamp

$Context.LogMessage("Last message received from '$sender' on '$timeStamp'", "Information")

# Get email address
$recipientAddress = "%mail%"
if ([System.String]::IsNullOrEmpty($recipientAddress))
{
    if ($Context.TargetObject.RecipientLocation -eq "ADM_EXCHANGERECIPIENTLOCATION_NONE")
    {
        $Context.LogMessage("The object does not have an Exchange mailbox", "Error")
        return
    }

    $mailboxParams = $Context.TargetObject.GetMailParameters()
    $emailAddresses = $mailboxParams.EmailAddresses
    for ($i = 0; $i -lt $emailAddresses.Count; $i++)
    {
        $emailAddress = $emailAddresses.GetAddress($i,[ref]"ADS_PROPERTY_NONE")
        if ($emailAddress.Prefix -eq "smtp" -and $emailAddress.IsPrimary)
        {
            $recipientAddress = $emailAddress.Address
            break
        }
    }
}

$today = Get-Date
$tenDaysAgo = $today.AddDays(-10)

# Connect to Exchange Online
$Context.CloudServices.ConnectExchangeOnline()

# Get the message trace
try
{
    $messageTrace = Get-MessageTrace -RecipientAddress $recipientAddress -StartDate $tenDaysAgo -EndDate $today -ErrorAction Stop | Sort Received -Descending
}
catch
{
    $Context.LogMessage("An error occurred while getting messages trace. Error: " + $_.Exception.Message, "Error")
    return
}

if ($NULL -eq $messageTrace)
{
    $Context.LogMessage("There were no messages sent to this distribution list", "Information")
    return
}

$senderAddress = $messageTrace[0].SenderAddress
$received = $messageTrace[0].Received

$Context.LogMessage("Last message received from '$senderAddress' on '$received'", "Information")