none
Odd GetProperty problem RRS feed

  • Question

  • Hello,

       I cant seem to read the first Property (858F001F) PF_Unicode Value with this simple program.

    The second entry (8596001F) reads just fine, OutlookSpy and MFCMapi show a Value present for the first entry.

    Any ideas?

    Regards,

    Rich

    Sub GetReceiveByAddy()

        Dim oM As Outlook.MailItem

        Dim oP As Outlook.propertyAccessor

        Set oM = Application.ActiveExplorer.Selection.Item(1)

        Set oP = oM.propertyAccessor

     
       MsgBox oP.GetProperty("ttp://schemas.microsoft.com/mapi/id/{00062008-0000-0000-C000-000000000046}/858F001F")

        MsgBox oP.GetProperty("ttp://schemas.microsoft.com/mapi/id/{00062008-0000-0000-C000-000000000046}/8596001F")

    End Sub

    (http h deleted since I cant post links)

    Tuesday, October 2, 2012 7:32 PM

Answers

  • The property names are missing "h" in "http", but even with the fix, I can reproduce the problem...

    OutlookSpy displays that property just fine and Redemption can display its value without any problems:

      set Session = CreateObject("Redemption.RDOSession")
      Session.MAPIOBJECT = Application.Session.MAPIOBJECT
      'set Msg = Session.GetMessageFromID(Application.ActiveExplorer.Selection(1).EntryID)
      set Msg = Session.GetRDOObjectFromOutlookObject(Application.ActiveExplorer.Selection(1))
      MsgBox Msg.Fields("http://schemas.microsoft.com/mapi/id/{00062008-0000-0000-C000-000000000046}/858F001F")


    Dmitry Streblechenko (MVP)
    http://www.dimastr.com/redemption
    Redemption - what the Outlook
    Object Model should have been
    Version 5.4 is now available!

    Tuesday, October 2, 2012 8:50 PM

All replies

  • The property names are missing "h" in "http", but even with the fix, I can reproduce the problem...

    OutlookSpy displays that property just fine and Redemption can display its value without any problems:

      set Session = CreateObject("Redemption.RDOSession")
      Session.MAPIOBJECT = Application.Session.MAPIOBJECT
      'set Msg = Session.GetMessageFromID(Application.ActiveExplorer.Selection(1).EntryID)
      set Msg = Session.GetRDOObjectFromOutlookObject(Application.ActiveExplorer.Selection(1))
      MsgBox Msg.Fields("http://schemas.microsoft.com/mapi/id/{00062008-0000-0000-C000-000000000046}/858F001F")


    Dmitry Streblechenko (MVP)
    http://www.dimastr.com/redemption
    Redemption - what the Outlook
    Object Model should have been
    Version 5.4 is now available!

    Tuesday, October 2, 2012 8:50 PM
  • Many thanks Dmitry,

          I had to remove the "h" in http since the website does not allow new users to post links.

    I had to rename Session to something else to run in the Outlook VBA compiler, but Redemption worked fine.

    The propertyAccessor method still fails but I can use Redemtion from now on.

    -Rich

    Tuesday, October 2, 2012 9:39 PM