|OLKeeper reliably prevents users from closing their Outlook window and thus possibly missing reminders or e-mails.|
CDO 1.21 is not as comfortable to use as the Outlook object model. On the other hand, it provides you with more functionality than the OOM does.
The CDO 1.21 library is an optional component that can be found on the Office or Outlook installation disk. Because it is not installed by default you might make it up via Control Panel, Add/Remove programs; select Microsoft Office (or Outlook) and click to Add/Edit features. Then select 'Collaboration Data Objects' from the collection of Outlook components.
The following sample demonstrates how to logon a MAPI session and get the corresponding MAPI object from an Outlook MailItem. Because the GetMessage function needs the Outlook item's EntryID, the item must be stored once beforehand.
Public Function GetMessage(oObj As Object) As MAPI.Message On Error Resume Next Dim oSess As MAPI.Session Dim sEntryID As String Dim sStoreID As String sEntryID = oObj.EntryID sStoreID = oObj.Parent.StoreID Set oSess = CreateObject("MAPI.Session") oSess.LogOn , , False, False, , True Set GetMessage = oSess.GetMessage(sEntryID, sStoreID) End Function