runrig has asked for the wisdom of the Perl Monks concerning the following question:
use strict; use warnings; use Win32::OLE; my $Notes = Win32::OLE->new('Notes.NotesSession') or die "Cannot start Lotus Notes Session object.\n"; my $Database = $Notes->GetDatabase('server', 'dbfile.nsf'); my $View = $Database->GetView("By Start Date"); my $date_range = "03/01/07 - 03/31/07"; my $DateRange = $Notes->CreateDateRange(); $DateRange->{Text} = $date_range; my $Entries = $View->GetAllEntriesByKey($DateRange); my $Entry = $Entries->GetFirstEntry(); while ($Entry) { my $doc = $Entry->Document(); my $subj = $doc->GetFirstItem('Subject')->{Text}; print "Subject: $subject\n"; $Entry = $Entries->GetNextEntry($Entry); }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Lotus Notes date ranges not returning all documents
by CountZero (Bishop) on Feb 23, 2009 at 22:21 UTC | |
by runrig (Abbot) on Feb 24, 2009 at 00:34 UTC | |
by CountZero (Bishop) on Feb 24, 2009 at 07:00 UTC | |
by runrig (Abbot) on Feb 24, 2009 at 16:59 UTC | |
by runrig (Abbot) on Feb 24, 2009 at 17:32 UTC |