On Mar 26, 6:15 am, "Sue Mosher [MVP-Outlook]"
<sue...@outlookcode.com> wrote:

Hey Sue & all,

Here is the code that handles the CommandBar event OnUpdate - this
function is in the ThisAddin.cs file:

       /// <summary>
       /// This function handles the click event of the "New MS
Event" button on the context menu.
       /// </summary>
       /// <param name="btn"></param>
       /// <param name="cancel"></param>
       public void newButton_Click(Office.CommandBarButton btn, ref
bool cancel)
       {
           try
           {
               // get the MS Event calendar folder
               Microsoft.Office.Interop.Outlook.MAPIFolder Calendar =
m_applicationObject.GetNamespace("MAPI").GetDefaultFolder(Microsoft.Office.Interop.Outlook.OlDefaultFolders.olFolderCalendar);
               Outlook.MAPIFolder msEventFolder =
Calendar.Folders["MS Event"];

               // creates a new IPM.Appointment.Event object to store
the form region content
               Outlook.AppointmentItem newItem =
(Outlook.AppointmentItem)msEventFolder.Items.Add("IPM.Appointment.Event");
               // displays the MS Event region form
               newItem.Display(false);
           }
           catch (Exception ex)
           {
               Utilities.Log.WriteToLog(m_EventLogName,
"newButton_Click() err: " + ex.Message,
System.Diagnostics.EventLogEntryType.Error);
           }
       }

so... I am getting the Calendar collections of folders and then
looking for the "MS Event" calendar folder.  at that point I use the
code you suggested... it creates a MS Event form for me, however, on
the save (see code below in the MSEventRegion.cs file - I could not
find a "Save" event on the Outlook.AppointmentItem - so I used the
Item_Write event) it does not save the item to the MS Event calendar.

       // Outlook application object
       private Outlook.Application m_applicationObject;
       private Outlook.AppointmentItem Item;

       // Occurs before the form region is displayed.
       // Use this.OutlookItem to get a reference to the current
Outlook item.
       // Use this.OutlookFormRegion to get a reference to the form
region.
       private void FormRegion_FormRegionShowing(object sender,
System.EventArgs e)
       {
           m_applicationObject = new Outlook.Application();

           Item = this.OutlookItem as Outlook.AppointmentItem;
           Item.Write += new
Microsoft.Office.Interop.Outlook.ItemEvents_10_WriteEventHandler(Item_Write);
       }

       /// <summary>
       /// This function handles the save event of the MS Event
object
       /// </summary>
       /// <param name="Cancel"></param>
       public void Item_Write(ref bool Cancel)
       {
           try
           {
               SaveAppointment();
               Cancel = false;

               if (Item != null)
                   Item = null;
           }
           catch (Exception ex)
           {
               Utilities.Log.WriteToLog("FormRegion.Item_Write(..)
err: " + ex.Message, System.Diagnostics.EventLogEntryType.Error);
           }
       }

       // Occurs when the form region is closed.
       // Use this.OutlookItem to get a reference to the current
Outlook item.
       // Use this.OutlookFormRegion to get a reference to the form
region.
       private void FormRegion_FormRegionClosed(object sender,
System.EventArgs e)
       {
           MessageBox.Show("Form Closed");
       }

       /// <summary>
       /// This function saves the MSEvent object in a
IPM.Appointment item
       /// </summary>
       private void SaveAppointment()
       {
           try
           {
               // get the MS Event folder
               Microsoft.Office.Interop.Outlook.MAPIFolder Calendar =
m_applicationObject.GetNamespace("MAPI").GetDefaultFolder(Microsoft.Office.Interop.Outlook.OlDefaultFolders.olFolderCalendar);
               Outlook.MAPIFolder msEventFolder =
Calendar.Folders["MS Event"];

               if( msEventFolder != null )
               {
                   Outlook.AppointmentItem appointmentItem =
(Outlook.AppointmentItem)m_applicationObject.CreateItem(Outlook.OlItemType.olAppointmentItem);
                   AddUserPropToAppointment(appointmentItem);

                   appointmentItem.Subject = this.TextBoxName.Text;
                   appointmentItem.Start =
this.DatePickerStartDate.Value;
                   appointmentItem.End =
this.DatePickerEndDate.Value;
                   appointmentItem.Location =
this.TextBoxLocation.Text;

appointmentItem.UserProperties["Description"].Value =
this.TextBoxDescription.Text;
                   if(this.ComboBoxType.SelectedItem != null)
                       appointmentItem.UserProperties["Type"].Value =
this.ComboBoxType.SelectedItem.ToString();
                   appointmentItem.UserProperties["KeySpeaker"].Value
= this.TextBoxKeySpeaker.Text;

appointmentItem.UserProperties["MSEventWebsite"].Value =
this.TextBoxWebsite.Text;
                   appointmentItem.UserProperties["Attendance"].Value
= this.TextBoxEstAttendance.Text;
                   appointmentItem.UserProperties["BusOwner"].Value =
this.TextBoxBusOwner.Text;
               }
           }
           catch(Exception ex)
           {
               Utilities.Log.WriteToLog("SaveAppointment() err: " +
ex.Message, System.Diagnostics.EventLogEntryType.Error);
           }
       }

       /// <summary>
       /// This function creates the custom user fields that will
allow for storage of an MSEvent object in a IPM.Appointment item
       /// </summary>
       /// <param name="appointmentItem"></param>
       private void AddUserPropToAppointment(Outlook.AppointmentItem
appointmentItem)
       {
           try
           {
               appointmentItem.UserProperties.Add("Description",
Microsoft.Office.Interop.Outlook.OlUserPropertyType.olText, false,
System.Reflection.Missing.Value);
               appointmentItem.UserProperties.Add("Type",
Microsoft.Office.Interop.Outlook.OlUserPropertyType.olText, false,
System.Reflection.Missing.Value);
               appointmentItem.UserProperties.Add("KeySpeaker",
Microsoft.Office.Interop.Outlook.OlUserPropertyType.olText, false,
System.Reflection.Missing.Value);
               appointmentItem.UserProperties.Add("MSEventWebsite",
Microsoft.Office.Interop.Outlook.OlUserPropertyType.olText, false,
System.Reflection.Missing.Value);
               appointmentItem.UserProperties.Add("Attendance",
Microsoft.Office.Interop.Outlook.OlUserPropertyType.olText, false,
System.Reflection.Missing.Value);
               appointmentItem.UserProperties.Add("BusOwner",
Microsoft.Office.Interop.Outlook.OlUserPropertyType.olText, false,
System.Reflection.Missing.Value);
           }
           catch (Exception ex)
           {
               Utilities.Log.WriteToLog("AddUserPropToAppointment(..)
err: " + ex.Message, System.Diagnostics.EventLogEntryType.Error);
           }
       }