Outlook Calendar Issues

[robprestwood]

Hi,

Hoping some one can point me in the right direction, I am currently wriing a program to synch my outlook diary with an independant apps diary, I seem to have hit a bit of a wall when dealing with appointments that recur every X years. When I interogate the appointments recurrence data, an Outlook 2007 Outlook appointment set to recur on the 1st of January every 10 Years, in the Outlook collection I can see that an appointment of recurrence type 5, olRecursYearly, MonthOfYear = 1, DayOfMonth = 1, Interval = 120. So I assume that the Interval being 120 indicates the 10 years, however if I try to write an appointment back to Outlook with the same details, i.e recurs on 1st of January every 10 Years, I am unable to set the Interval to 120, the only acceptable figure is 12. The documentation indicates that Interval is not used for olRecursYearly, however it appears Microsoft are violating this. Am I missing something?

Cheers

[robprestwood]

Have I explained clearly enough for people?

[incidentals]

yes you have

can you show code examples

here to help

[robprestwood]

I can do, but something as simple as this will throw the same error.

With Only one Outlook Diary Entry which recurs every 10 years on the 1st January.

Set OutLkAppointment = OutLkItems.GetFirst

Set OutLkAppRecurrence = OutLkAppointment.GetRecurrencePattern

debug.print OutLkAppRecurrence.RecurrenceType ' Prints 5
debug.print OutLkAppRecurrence.DayOfMonth ' Prints 1
debug.print OutLkAppRecurrence.MonthOfYear ' Prints 1
debug.print OutLkAppRecurrence.Interval ' Prints 120

OutLkAppRecurrence.Interval = 120 'Throws Invalid Recurrence Pattern RTE

[robprestwood]

I can do, but something as simple as this will throw the same error.

With Only one Outlook Diary Entry which recurs every 10 years on the 1st January.

Set OutLkAppointment = OutLkItems.GetFirst

Set OutLkAppRecurrence = OutLkAppointment.GetRecurrencePattern

debug.print OutLkAppRecurrence.RecurrenceType ' Prints 5
debug.print OutLkAppRecurrence.DayOfMonth ' Prints 1
debug.print OutLkAppRecurrence.MonthOfYear ' Prints 1
debug.print OutLkAppRecurrence.Interval ' Prints 120

OutLkAppRecurrence.Interval = 120 'Throws Invalid Recurrence Pattern RTE

[robprestwood]

Does anyone have any ideas?

[robprestwood]

Still hoping for some help with this.

[robprestwood]

Set OutLkAppointment = OutLkItems.GetFirst

Set OutLkAppRecurrence = OutLkAppointment.GetRecurrencePattern

debug.print OutLkAppRecurrence.RecurrenceType ' Prints 5
debug.print OutLkAppRecurrence.DayOfMonth ' Prints 1
debug.print OutLkAppRecurrence.MonthOfYear ' Prints 1
debug.print OutLkAppRecurrence.Interval ' Prints 120

OutLkAppRecurrence.Interval = 120 'Throws Invalid Recurrence Pattern RTE

In actual fact any multiple of 12 upto 96 is a valid period, but no 3 digit values are acceptable for OutLkAppRecurrence.Interval, despite Outlook returning 120 as the figure from the diary. Does anyone have any ideas?