HOW TO GET PROPERTIES FOLLOW UP

Status
Not open for further replies.

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.

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
= error "-2147221246 (80040102)" Cannot get property..
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
Why not just check the .IsMarkedAsTask value? If it's true, the item is flagged. Use .ReminderTime to get the reminder time.

Code:
Sub baba_Active_item()

  Dim oItem As Object
  Set oItem = ActiveInspector.CurrentItem

  If oItem.IsMarkedAsTask = True Then
       MsgBox " Reminder = " & oItem.ReminderTime
  End If

End Sub
 

oliv-

Senior Member
Outlook version
Outlook 2010 32 bit
Email Account
Exchange Server
Because i want to test it before is sent, (=oItem.IsMarkedAsTask = False )
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
AFAIK, you can't read the reminder and flag property until after the message is sent, even using propertyaccessor.
 

oliv-

Senior Member
Outlook version
Outlook 2010 32 bit
Email Account
Exchange Server
Thank you for your responses and your time.
 
Status
Not open for further replies.
Top