G
GR
Hello,
I am having a problem getting an accurate result from reading the
number of exceptions to a recurring meeting when that appointment item
is in a shared folder.
Specifically, after I delete an instance of a recurring meeting, my
code is called in the calendar ItemChange event for that calendar and
I then call a sub that reads the number of exceptions for that
appointment item that just had an instance deleted.
When I look at the number of exceptions for that item it is properly
incremented by 1 each time I delete an instance of a recurring
appointment that is in my default calendar folder, UNLESS, that
appointment item is on a shared calendar. In that case, it is set to 1
exception (correct) the first time but will not increment for each
subsequent deletion unless I close Outlook and re-open it.
It almost seems as though I need to refresh the exception list somehow
before checking? Any ideas?
Here is a code snippet that I am using:
Dim excepts As Outlook.Exceptions
Dim anExcep As Outlook.Exception
Dim nExceptions As Integer
I am having a problem getting an accurate result from reading the
number of exceptions to a recurring meeting when that appointment item
is in a shared folder.
Specifically, after I delete an instance of a recurring meeting, my
code is called in the calendar ItemChange event for that calendar and
I then call a sub that reads the number of exceptions for that
appointment item that just had an instance deleted.
When I look at the number of exceptions for that item it is properly
incremented by 1 each time I delete an instance of a recurring
appointment that is in my default calendar folder, UNLESS, that
appointment item is on a shared calendar. In that case, it is set to 1
exception (correct) the first time but will not increment for each
subsequent deletion unless I close Outlook and re-open it.
It almost seems as though I need to refresh the exception list somehow
before checking? Any ideas?
Here is a code snippet that I am using:
Dim excepts As Outlook.Exceptions
Dim anExcep As Outlook.Exception
Dim nExceptions As Integer