GetSharedDefaultFolder（）引发错误MAPI_E_NOT_FOUND-兑换

Question

我正在Windows应用程序中使用赎回。那里我写了这段代码

try
{
     rFolder = rSession.GetSharedDefaultFolder(memberName, rdoDefaultFolders.olFolderCalendar);
     rItems = rFolder.Items;
}

但是执行包含Session.GetSharedDefaultFolder()的行时，将引发以下异常。

“ IAddrBook.ResolveName中的错误：MAPI_E_NOT_FOUND”

我在网上搜索了此问题，但无法直接解决。请给我建议。

Answer 1

您将如何传递给GetSharedDefaultFolder？可以在Outlook的“编辑”框中的Outlook中解析该名称吗？

请记住，GetSharedDefaultFolder使用字符串或RDOAddressEntry对象。在后一种情况下，没有什么要解决的，因此，如果您已经有RDOAddressEntry对象的实例，则传递它而不是字符串可能会更可靠。

Answer 2

为什么需要使用兑换？

相反，我建议改用Namespace类的GetSharedDefaultFolder方法。它返回一个Folder对象，该对象代表指定用户的指定默认文件夹。

 Sub ResolveName() 
  Dim myNamespace As Outlook.NameSpace 
  Dim myRecipient As Outlook.Recipient 
  Dim CalendarFolder As Outlook.Folder 
  Set myNamespace = Application.GetNamespace("MAPI") 
  Set myRecipient = myNamespace.CreateRecipient("Eugene Astafiev") 
  myRecipient.Resolve 
  If myRecipient.Resolved Then 
   Call ShowCalendar(myNamespace, myRecipient) 
  End If 
 End Sub 

 Sub ShowCalendar(myNamespace, myRecipient) 
  Dim CalendarFolder As Outlook.Folder 
  Set CalendarFolder = _ 
  myNamespace.GetSharedDefaultFolder _ 
  (myRecipient, olFolderCalendar) 
  CalendarFolder.Display 
 End Sub

请注意，您需要将收件人类的实例（已解析）传递给方法，而不仅仅是成员名称。

运行上面列出的代码（当然，使用有效名称）时，您会遇到任何错误吗？