Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Getting Outlook calender

by Anonymous Monk
on Sep 30, 2002 at 15:04 UTC ( [id://201730]=perlquestion: print w/replies, xml ) Need Help??

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

I want to create a link and use an Outlook calender. Please advise how I could do this in Perl?

Basically I want the link to connect to a Microsoft Outlook calender on our server and use this calender the same way I use it in my Microsoft Outlook mail. Is this something I could do with Perl/CGI??

Replies are listed 'Best First'.
Re: Getting calender
by cacharbe (Curate) on Sep 30, 2002 at 16:05 UTC
    The short answer here is Yes. The longer answer is a bit more complicated.

    Some things you are going to have to do some research on (in no particular order) are:

    • Win32::OLE
    • Using Win32::OLE to connect to Exchange through one of the following:
      • Outlook
      • Outlook Web Access (OWA)
      • CDO-NTS
    • Using the MAPI interface to get the data you need
    • Proper Authentication
    Off the top of my head, the following will get a list of appointments from the current calendar:
    use strict; use Win32::OLE qw(in with); use Win32::OLE::Const 'Microsoft Outlook'; use Win32::OLE::Variant; my $OL = Win32::OLE->GetActiveObject('Outlook.Application') || Win32::OLE->new('Outlook.Application', 'Quit'); my $NameSpace = $OL->GetNameSpace("MAPI"); foreach my $folders (in $NameSpace->{Folders}){ print $folders->{Name}."\n"; my $folder = $folders->Folders("Calendar"); print "\t".$folder->{Name}."\n"; foreach my $item (in $folder->{Items}){ print "\t\t".sprintf("%s",Variant(VT_DATE,$item->{Start})) +." : ". $item->{Subject}."\n"; } }

    C-.

    ---
    Flex the Geek

Re: Getting calender
by sch (Pilgrim) on Sep 30, 2002 at 15:08 UTC

    I'm guessing that this should be do-able using OLE but it's not something I've done myself.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://201730]
Approved by cacharbe
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others admiring the Monastery: (7)
As of 2024-04-25 08:57 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found