A Microsoft Outlook email forum. Outlook Banter

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » Outlook Banter forum » Microsoft Outlook Email Newsgroups » Outlook - Calandaring
Site Map Home Register Authors List Search Today's Posts Mark Forums Read Web Partners

counting appointments



 
 
Thread Tools Search this Thread Display Modes
  #1  
Old July 16th 09, 05:41 PM posted to microsoft.public.outlook.calendaring
baggers
external usenet poster
 
Posts: 5
Default counting appointments

Hi Guys
I'm trying to count the number of appointments in a calendar using the
restrict method.
If I add "items.IncludeRecurrences = True" then the numbers returned all
equal 2147483647.

Here is a code snippet:
dateFrom = Date.Today
dateTo = CDate("2014-01-01")
strFind = "[Start] = " & DoubleQuote(Format(dateFrom, "dd MMM yyyy")) & "
AND [Start] " & DoubleQuote(Format(dateTo, "dd MMM yyyy"))
items = mapi.GetFolderFromID(sID).Items
items.Sort("[Start]")
items.IncludeRecurrences = True
restrictedItems = items.Restrict(strFind)
itemCounter = itemCounter + restrictedItems.Count

can anyone see where the problem lies?

Thanks
  #2  
Old July 16th 09, 07:43 PM posted to microsoft.public.outlook.calendaring
Brian Tillman [MVP - Outlook]
external usenet poster
 
Posts: 4,874
Default counting appointments

"baggers" wrote in message
...

Hi Guys
I'm trying to count the number of appointments in a calendar using the
restrict method.
If I add "items.IncludeRecurrences = True" then the numbers returned all
equal 2147483647.

Here is a code snippet:
dateFrom = Date.Today
dateTo = CDate("2014-01-01")
strFind = "[Start] = " & DoubleQuote(Format(dateFrom, "dd MMM yyyy")) & "
AND [Start] " & DoubleQuote(Format(dateTo, "dd MMM yyyy"))
items = mapi.GetFolderFromID(sID).Items
items.Sort("[Start]")
items.IncludeRecurrences = True
restrictedItems = items.Restrict(strFind)
itemCounter = itemCounter + restrictedItems.Count

can anyone see where the problem lies?


The programming newgroup would be a better place to ask.
microsoft.public.outlook.program_vba
--
Brian Tillman [MVP-Outlook]

 




Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Finding dates ahead without counting Loracj Outlook - Calandaring 1 March 26th 08 07:38 PM
Counting reocurrances Grandad Outlook - General Queries 1 January 11th 08 01:48 PM
Counting days [email protected] Outlook and VBA 4 November 21st 06 04:09 PM
Counting Attachments in Messages Chris Rhodes Outlook and VBA 5 June 21st 06 05:57 PM
outlook is miss counting contacts, why Rosalind Outlook - Calandaring 0 April 13th 06 08:12 PM


All times are GMT +1. The time now is 09:13 AM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.Search Engine Friendly URLs by vBSEO 2.4.0
Copyright ©2004-2025 Outlook Banter.
The comments are property of their posters.