http://qs321.pair.com?node_id=517959


in reply to Outlook Write to Calendar

Adding appointment to outlook
#!c:/perl/bin/perl.exe -w use strict; use Win32::OLE; use Win32::OLE::Const 'Microsoft Outlook'; # Connection to Outlook Calendar my $outlook = Win32::OLE->new('Outlook.Application') or die "Error!\n"; my $newappt = $outlook->CreateItem(olAppointmentItem); $newappt->{Subject} = "My Test Appointment"; $newappt->{Start} = "12/21/05 3:50:00 PM"; $newappt->{Duration} = 1 ; #1 minute $newappt->{Location} = "Someplace"; $newappt->{Body} = "Test Stuff"; $newappt->{ReminderMinutesBeforeStart} = 1; $newappt->{BusyStatus} = olFree; $newappt->Save();

I wonder if people would be interested in a tutorial on translating vb/vbscript to perl and Win32::OLE. Then we can just point them to such a tutorial and the zillion vbscript/vb samples on the Internet. hmmm...