Creating a Recurring Appointment (Windows CE 5.0)

Article
09/14/2012

The following Visual C++ code example shows you how to create a recurring appointment. This appointment will occur every Monday at 10:00 AM. Microsoft assumes you already have an Application object and have logged on.

IAppointment *pAppt;
IRecurrencePattern *pRec;
SYSTEMTIME st;
DATE date;

// Call CreateItem to create an item directly from the Application object.
polApp->CreateItem (olAppointmentItem, (IDispatch**)&pAppt);

// Convert Monday, 4/5/99 at 10:00 am to a DATE
memset (&st, 0, sizeof (SYSTEMTIME));
st.wMonth = 4;
st.wDay   = 5;
st.wYear  = 1999;
st.wHour  = 10;

// Note the use of the SystemTimeToVariantTime method in the 
// Application object. Because it is not defined on Palm-size
// PC version 1.0, this is necessary for the code to compile for
// that OS. If you will not be compiling this code on that
// OS, call SystemTimeToVariantTime directly.
polApp->SystemTimeToVariantTime (&st, &date);

// Set the subject and the start date to 10:00 am
pAppt->put_Subject (TEXT ("Recurring Appointment"));
pAppt->put_Start (date);

// Now, set the RecurrencePattern
pAppt->GetRecurrencePattern (&pRec);
pRec->put_RecurrenceType (olRecursWeekly);
pRec->put_DayOfWeekMask (olMonday);
pRec->put_NoEndDate (VARIANT_TRUE);

// And save the appointment
pAppt->Save ();

// Release objects
pRec->Release ();
pAppt->Release ();

The following Visual Basic code example shows you how to create a recurring appointment.

' olAppointmentItem is replaced with 1
Set pAppt = polApp.CreateItem (1)
pAppt.Subject = "Recurring Appointment"
pAppt.Start = #4/5/1999 10:00 AM#

' olRecursWeekly is replaced with 1 and olMonday is replaced with 2.
Set pRec = pAppt.GetRecurrencePattern
pRec.RecurrenceType = 1
pRec.DayOfWeekMask = 2
pRec.NoEndDate = True
' Save the appointment
pAppt.Save

Creating a Recurring Appointment (Windows CE 5.0)

See Also

Additional resources