打印

[转帖] Powershell - 将公共假期加入outlook的calendar.

Powershell - 将公共假期加入outlook的calendar.

$comments = @'
7 f* H2 i$ K' E qScript name: Add-Holidays.ps1' S1 s( v& h- Q+ b- n& e# u
Created on: Saturday, July 21, 2007
) z: t/ D2 t) C pAuthor: Kent Finkle5 m! D9 X# p `+ j( N
Purpose: How can I use Windows Powershell to
! S4 {. F4 _+ r# D% _7 iAdd a List of Holidays to Microsoft Outlook?
4 D8 l. C9 Q. d& A7 z- T- b'@- Y0 s" X8 V% I/ x, y2 t. Z

& W" N6 q% r: b6 X$olFolderCalendar = 9
; Q" q" J3 q8 z- U8 G$olAppointmentItem = 1
- g4 t r. B4 r& I- i$olOutOfOffice = 3/ L" z: s7 Y1 i- i& R

6 p2 J2 O S" R- _5 Q( P$o = new-object -comobject outlook.application$ ?+ W5 H6 W! @; J% |0 \; ~
+ X8 f0 y3 c6 K' _5 w
$objNamespace = $o.GetNamespace("MAPI")1 h0 A6 A7 F' e1 a7 {% G% Q

) C: u9 _% ]4 g5 ^2 ]$objCalendar = $objNamespace.GetDefaultFolder($olFolderCalendar)
5 ]2 a& ]* l H% l5 @ $ y$ _! ~1 R# h n- n5 x
$array = new-object 'object[,]' 3,2
( J8 w5 B$ o. Q8 T# j( e9 ]6 K' M ' O6 P& x- ^& Q: L4 w6 x3 k; n
$array[0,0] = "November 22, 2007"1 i! U c j: }0 G3 m; r6 k5 v
$array[0,1] = "Thanksgiving"
; |' _8 P: F: t" h8 g: \# Z$array[1,0] = "November 23, 2007"! @( F9 W. V7 S& T% ~( u& x
$array[1,1] = "Thanksgiving"* ]: Y. L% R. x+ Q0 Z i
$array[2,0] = "December 25, 2007"
: V1 q+ { F% J$array[2,1] = "Christmas Day"
! l7 ` r$ p: {1 \% K7 T# J- a 2 i+ ~4 s; Z& _$ c! Q; x1 k/ D9 I
for ($i = 0; $i -le 2; $i++) {
. r2 F- w+ o" |7 {5 o8 i# ~ $h = $o.CreateItem($olAppointmentItem)7 P w6 S1 g) Q4 P+ H7 b
$h.Subject = $array[$i,1]4 E% {- V- O, P+ p+ N0 X) s
$h.Start = $array[$i,0] + " 9:00 AM"
/ D' J8 ~3 T @! Z; f $h.End = $array[$i,0] + " 10:00 AM"
3 b" u: ^! c2 c% |( i! p, t& U, } $h.AllDayEvent = $True3 ?: U3 C% f5 @
$h.ReminderSet= $False
: Y/ [! q, }" ?8 M V: ^ $h.BusyStatus = $olOutOfOffice
f/ t$ F2 x9 U $a = $h.Save() i. N9 m- A0 g) [/ q
}
《无量寿经·第十八愿》言:
设我得佛,十方众生,至心信乐,欲生我国,乃至十念,若不生者,不取正觉。唯除五逆,诽谤正法。

TOP