我的Outlook 2010-Add-In(c#)中有很多文件夹。它们位于我的私人邮箱或我的共享邮箱中。
现在我正在寻找一个解决方案,找出如何获得与专用文件夹相关联的正确电子邮件地址(发件人/收件人)。它可以是我私人或任何共享邮箱中的任何文件夹。
我想,也许我可以使用文件夹项中的EntryId / StoreId来识别相应的电子邮件地址。
我已经知道,我可以从任何邮件中获取电子邮件地址,但我并不是在寻找这个解决方案。
答案 0 :(得分:0)
我想回答我自己的问题:我认为我找到了一个合理的解决方案。
我不会在函数内部处理任何异常,我是从外部那样做的。
private string GetSMTPAddressByFolderItem(Outlook.MAPIFolder mapiFolder)
{
string PR_MAILBOX_OWNER_ENTRYID = @"http://schemas.microsoft.com/mapi/proptag/0x661B0102";
string PR_SMTP_ADDRESS = @"http://schemas.microsoft.com/mapi/proptag/0x39FE001E";
Outlook.Store store = null;
Outlook.NameSpace ns = null;
Outlook.AddressEntry sender = null;
Outlook._ExchangeUser exchUser = null;
try
{
if (mapiFolder == null)
{
return null;
}
// Get the parent store.
store = mapiFolder.Store;
string storeOwnerEntryId = store.PropertyAccessor.BinaryToString(store.PropertyAccessor.GetProperty(PR_MAILBOX_OWNER_ENTRYID)) as string;
ns = Application.GetNamespace(Constants.OL_NAMESPACE); // i.e. "MAPI"
sender = ns.GetAddressEntryFromID(storeOwnerEntryId);
if (sender != null)
{
if (sender.AddressEntryUserType == Outlook.OlAddressEntryUserType.olExchangeUserAddressEntry ||
sender.AddressEntryUserType == Outlook.OlAddressEntryUserType.olExchangeRemoteUserAddressEntry)
{
exchUser = sender.GetExchangeUser();
if (exchUser != null)
{
return exchUser.PrimarySmtpAddress;
}
else
{
return null;
}
}
else
{
return sender.PropertyAccessor.GetProperty(PR_SMTP_ADDRESS) as string;
}
}
return null;
}
finally
{
if (ns != null)
{
Marshal.ReleaseComObject(ns);
ns = null;
}
if (store != null)
{
Marshal.ReleaseComObject(store);
store = null;
}
if (sender != null)
{
Marshal.ReleaseComObject(sender);
sender = null;
}
if (exchUser != null)
{
Marshal.ReleaseComObject(exchUser);
exchUser = null;
}
}
}
答案 1 :(得分:0)
您可以尝试
使用Store.PropertyAccessor.GetProperty从商店中检索PR_MAILBOX_OWNER_ENTRYID属性,但它仅由在线商店公开,缓存商店不会公开它。
解析Exchange商店条目ID以提取商店所有者的DN,然后创建GAL用户条目ID。
您可以查看配置文件数据以查找商店所有者条目ID。
如果使用Redemption是一个选项,它会公开RDOExchangeMailboxStore。所有者属性:
skPrimaryExchangeMailbox = 3
skDelegateExchangeMailbox = 4
set Session = CreateObject("Redemption.RDOSession")
Session.MAPIOBJECT = Application.Session.MAPIOBJECT
for each Store in Session.Stores
If (Store.StoreKind = skPrimaryExchangeMailbox) or (Store.StoreKind = skDelegateExchangeMailbox) Then
MsgBox "Store " & Store.Name & " is owned by " & Store.Owner.Name
End If
next