Outlook + Perl + Win32 :: Ole: Comment sélectionnez-vous les entrées de calendrier triées par date?

Question

code actuel ouvre une base de données de calendrier Outlook comme suit:

my $outlook = Win32::OLE->GetActiveObject('Outlook.Application') || Win32::OLE->new('Outlook.Application', 'Quit'); 

my $namespace = $outlook->GetNamespace("MAPI"); 

## only fetch entries from Jan 1, 2007 onwards 
my $restrictDates = "[Start] >= '01/01/2007'"; 

Answer 1

Puisque vous ne montrez pas le code qui est la date de votre objet, cette question est impossible de répondre sans une certaine connaissance des Perspectives objet que vous essayons d'accéder.

Si vous avez un tableau d'objets, vous pouvez les trier par date et les filtrer avant un certain.

my $sub = sub { 
     my $ad = $a->date_string_accessor; 
     my $bd = $b->date_string_accessor; 
     $ad =~ s:(\d+)/(\d+)/(\d+):$3 . sprintf('%0d', $1) . sprintf('%0d', $2):e; 
     $bd =~ s:(\d+)/(\d+)/(\d+):$3 . sprintf('%0d', $1) . sprintf('%0d', $2):e; 
     return $ad cmp $bd; 
}; 

my @sorted = sort $sub @unsorted; 

print join("\n", @sorted); 

Mais il me semble que vous devez utiliser l'application elle-même pour le faire - sans doute Outlook dispose d'une sorte de fonctionnalité requête/de tri.