1 2 3 4 5 6 7 8 9 10 11 12 13 |
Clear-Host Add-Type -Assembly "Microsoft.Office.Interop.Outlook" $Outlook = New-Object -ComObject Outlook.Application $sam = New-Object -comObject SAPI.SpVoice $Namespace = $Outlook.GetNameSpace("MAPI") $NameSpace.Folders.Item(6) $Email = $NameSpace.Folders.Item(6).Folders.Item(2).Items $Email | Sort-Object LastModificationTime -Descending | % { $_.TaskSubject $sam.Speak($_.ConversationTopic) ($_.CreationTime).Date ($_.LastModificationTime).Date } |