oliv-
Senior Member
- Outlook version
- Outlook 2010 32 bit
- Email Account
- Exchange Server
Hi,
I need to get properties from an Outlook Mailitem to know if there is a "follow up" (task for me) on this Email and if right i want to get reminder details.
= error "-2147221246 (80040102)" Cannot get property..
I need to get properties from an Outlook Mailitem to know if there is a "follow up" (task for me) on this Email and if right i want to get reminder details.
Code:
Sub baba_Active_item()
Dim oItem As Object
Set oItem = ActiveInspector.CurrentItem
Dim pa As Outlook.PropertyAccessor
Const TASK_REMINDER_TIME = "http://schemas.microsoft.com/mapi/id/{00062008-0000-0000-C000-000000000046}/0x00008502"
Set pa = oItem.PropertyAccessor
MsgBox " Reminder =" _
& pa.GetProperty(TASK_REMINDER_TIME)
End Sub