DeliriumNZ has asked for the wisdom of the Perl Monks concerning the following question:
if(($start=index($subject, "Telecom Service Event", $start)) != -1) { ($SubjectRefuge, $Ref) = split(/Ref. /, $subject); my $newoutlook = Win32::OLE->new('Outlook.Application') or die + "Error!\n"; my $newappt = $newoutlook->CreateItem(olAppointmentItem); $newappt->{Subject} = "Telecom Outage Ref: $Ref"; $newappt->{Start} = "$Date $NZStd"; $newappt->{Duration} = 1 ; #1 minute $newappt->{Body} = "$body"; $newappt->{ReminderMinutesBeforeStart} = 1; $newappt->{BusyStatus} = olFree; $newappt->Save(); }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Adding Appointments to other users outlook calendar
by Perlbotics (Archbishop) on May 01, 2009 at 18:57 UTC | |
by spectre9 (Beadle) on May 01, 2009 at 19:56 UTC |