Hi-
I am using OLE to access information in my Contacts folder in my Outlook PST file. All
is fine, but I need the last modification information and I am having trouble with it.
When I access that data, it is a long integer (possibly a Julian date?). I am not sure
how to interpret it into a useable date. Can anyone help? Here is my code:
use strict;
use Win32::OLE;
use Win32::OLE::Const 'Microsoft Outlook';
my $Outlook = Win32::OLE->new('Outlook.Application', 'Quit');
my $ol = Win32::OLE::Const->Load($Outlook);
my $namespace = $Outlook->GetNamespace("MAPI");
my $Folder = $namespace->GetDefaultFolder(olFolderContacts);
my $contacts = $Folder->{Items};
my $ncon = $contacts->{Count};
print "number of contacts - $ncon\n\n";
my $con;
for my $ii (1 .. $ncon) {
$con = $contacts->Item($ii);
print "$ii - $con->{FullName}\n";
print "Phone is $con->{HomeTelephoneNumber}\n";
print "Last Modified ${$con->{LastModificationTime}}\n";
}
Thanks
Doug
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
