Get-OLCalendarItem

1. Function Get-OLCalendarItem { 
2.  
3.  
4. <# 
5. .SYNOPSIS 
6.     A function to retreive Outlook Calender items between two dates.  
7.     Returns PSobjects containing each item. 
8. .DESCRIPTION 
9.     The function opens one's outlook calender, then retrieves the items.  
10.     The function takes 2 parameter: start, end - items are returned that  
11.     start betweween these two dates. 
12. .NOTES 
13.     File Name  : Get-OLCalendarItem 
14.     Author     : Thomas Lee - tfl@psp.co.uk 
15.     Requires   : PowerShell Version 3.0 
16. .LINK 
17.     This script posted to: 
18.         http://www.pshscripts.blogspot.com 
19.      
20. .EXAMPLE 
21.     Left as an exercise for the reader      
22.  
23. #> 
24.  
25. [CmdletBinding()] 
26. Param ( 
27. $start = $(Get-Date) , 
28. $end   = $((Get-date).AddMonths(1)) 
29. ) 
30.  
31. Write-Verbose "Returning objects between: $($start.tostring()) and $($end.tostring())" 
32. # Load Outlook interop and Outlook iteslf 
33. [Reflection.Assembly]::LoadWithPartialname("Microsoft.Office.Interop.Outlook") | out-null 
34. $Outlook = new-object -comobject outlook.application 
35.  
36. # Get OL default folders 
37. $OlFolders = "Microsoft.Office.Interop.Outlook.OlDefaultFolders" -as [type] 
38. $Namespace = $Outlook.GetNameSpace("MAPI") 
39. $Calendar = $namespace.GetDefaultFolder($olFolders::olFolderCalendar) 
40. Write-Verbose "There are $($calendar.items.count) items in the calender in total" 
41.  
42. # Now return psobjects for all items between 2 dates 
43. ForEach ($citem in ($Calendar.Items | sort start)) { 
44. #Write-Verbose "Processing [$($citem.Subject)]  Starting: [$($Citem.Start)]" 
45.  
46. If ($citem.start -ge $start -and $citem.start -LE $end) {  
47.  
48. $CalHT =[ordered]  @{ 
49. Subject          =  $($Citem.Subject) 
50. Location         =  $($Citem.Location); 
51. Start            =  $(Get-Date $Citem.Start); 
52. StartUTC         =  $(Get-Date $Citem.StartUTC);                                   
53. End              =  $(Get-Date $Citem.End); 
54. EndUTC           =  $(Get-Date $Citem.EndUTC); 
55. Duration         =  $($Citem.Duration); 
56. Importance       =  $($Citem.Importance); 
57. IsRecurring      =  $($Citem.IsRecurring); 
58. AllDayEvent      =  $($citem.AllDayEvent); 
59. Sensitivity      =  $($Citem.Sensitivity); 
60. ReminderSet      =  $($Citem.ReminderSet); 
61. CreationTime     =  $($Citem.CreationTime); 
62. LastModificationTime = $($Citem.LastModificationTime); 
63. Body             =  $($Citem.Body); 
64. } 
65.  
66.  
67. # Write the item out as a custom item 
68. $o=New-Object PSobject -Property $CalHT 
69. Write-Output $o 
70.  
71. } 
72. } #End of foreach 
73.  
74. }  # End of function 
75.  
76. Set-Alias GCALI Get-OLCalendarItem  

Technorati Tags: Outlook,Calendar

Get-OutlookStores.ps1

1. <# 
2. .SYNOPSIS 
3.     This script uses the Outlook COM object to  
4.     display the data stores in the current profile 
5. .DESCRIPTION 
6.     This script creates an Outlook object, displays 
7.     user information, and the stores currently 
8.     attached to the profile. 
9. .NOTES 
10.     File Name  : Get-OutlookStores.ps1 
11.     Author     : Thomas Lee - tfl@psp.co.uk 
12.     Requires   : PowerShell Version 2.0 
13. .LINK 
14.     This script posted to: 
15.         http://www.pshscripts.blogspot.com 
16. .EXAMPLE 
17.     PSH [C:\foo]: .\Get-OutlookStores.ps1' 
18.     Current profile has the following configured accounts: 
19.  
20.     Account Type           User Name        SMTP Address 
21.     ------------           ---------        ------------ 
22.     Microsoft Exchange     Thomas.Lee       Thomas.Lee@cookham.net 
23.     thomas_lee@hotmail.com Thomas Lee (MSN) thomas_lee@hotmail.com 
24.  
25.     Exchange Offile Folder Store: 
26.     C:\Users\tfl\AppData\Local\Microsoft\Outlook\outlook0.ost 
27.     
28.     PST Files 
29.     Display Name    File Path  
30.     ------------    --------- 
31.     Archive Folders C:\Users\tfl\AppData\Local\Microsoft\Outlook\archive.pst 
32. #> 
33.  
34. ## 
35. # Begin Script 
36. ## 
37.  
38. # Create Outlook object 
39. $Outlook = New-Object -ComObject Outlook.Application 
40. $stores = $Outlook.Session.Stores 
41. $accounts = $outlook.session.accounts 
42.  
43. # Basic information 
44. "Current profile has the following configured accounts:" 
45. $dn = @{label = "Account Type"; expression={$_.displayname}} 
46. $un = @{label = "User Name"; expression = {$_.username}} 
47. $sm = @{label = "SMTP Address"; expression = {$_.smtpaddress}} 
48. $accounts | Format-Table -AutoSize $dn,$un,$sm 
49. # Check number of stores > 0 
50. if ($stores.Count -le 0) {"No stores found"; return} 
51.  
52. # Outlook Off-Line folder store 
53. $ost = $stores | where{$_.filepath -match ".ost$"} 
54. if (!$ost) 
55. { 
56.    "No Outlook Offline Folder store found" 
57. } 
58. else 
59. { 
60.    "Exchange Offile Folder Store:" 
61.    $ost | ft filepath -HideTableHeaders 
62.   } 
63.  
64. # PST Files 
65. $pst = $stores | where {$_.filepath -match ".pst$"} 
66. if (!$pst) 
67.   { 
68.     "No PST files found" 
69.   } 
70. else 
71.   { 
72.     "PST Files" 
73.     $dn = @{label = "Display Name"; expression={$_.displayname}} 
74.     $fn = @{label = "File Path"; expression={$_.filepath}} 
75.     $pst | ft $dn,$fn        
76.   } 
77. # End Script

Technorati Tags: PowerShell Script,PowerShell,Outlook.Application,Outlook