Получение OutlookID из папки Livelink

Question

Я пытаюсь получить Outlook ID папки Livelink в моем проекте VBA (по умолчанию VbaProject.otm). Это позволило бы мне быстро перемещать почту из Outlook в Livelink. У меня уже есть идентификатор папки Livelink, но я знаю, что у Outlook есть свой собственный.

Я могу получить LiveID StoreID со следующим:

storeID = Application.GetNamespace("MAPI").Folders("LiveLink").storeID

Теперь я понятия не имею, как я мог получить идентификатор Outlook. Вот один пример того, как это выглядит:

00000000524436FBAAD59A46B79DBE44072FFD06010000007A010000307E7E2D317E305C307E4C6976656C696E6B204851457E307E2D315C307E4C6976656C696E6B204851457E2D357E305C307E4C6976656C696E6B204851457E313233373235387E2D355C307E4C6976656C696E6B204851457E31303233363334317E313233373235385C307E4C6976656C696E6B204851457E31323930393430387E31303233363334315C307E4C6976656C696E6B204851457E31343539333439307E31323930393430385C307E4C6976656C696E6B204851457E31383735353632377E31343539333439305C307E4C6976656C696E6B204851457E3131313833393433357E31383735353632375C307E4C6976656C696E6B204851457E3131313833393433387E3131313833393433355C307E4C6976656C696E6B204851457E3131313833393436367E3131313833393433385C307E4C6976656C696E6B204851457E3131313834313634367E3131313833393436365C307E4C6976656C696E6B204851457E3131363035373238377E313131383431363436

У кого-нибудь есть идея? Спасибо.

Даниил

Answer 1

Взгляните на Outlook Spy или MFCMapi. Вероятно, идентификатор содержится в виде свойства MIME, доступ к которому можно получить через Folder.PropertyAccessor, Смотрите соответствующий пост.

 Dim liveLinkFolder as Outlook.Folder = Application.GetNamespace("MAPI").Folders("LiveLink")
 Dim id as String = liveLinkFolder.PropertyAccessor.GetProperty("LiveLink ID").ToString()