vb.net - 尝试使用 .ResolveName 时出现 EWS 错误

Question

我有一个 vb.net 应用程序，它使用 EWS 发送邮件。该用户帐户没有邮箱，但有权代表另一个邮箱发送。通常，此代码运行良好，因为它具有要发送到的完整电子邮件地址，但是当我尝试通过解析名称查找地址时，它会失败:

当以没有邮箱的帐户身份发出请求时，您必须为任何可区分的文件夹 ID 指定邮箱主 SMTP 地址。

代码如下:

Private Function ResolveName(ByVal Name As String) As String
        Dim returnValue As NameResolutionCollection
        returnValue = _MainService.ResolveName(Name)

        Dim resolution As NameResolution

        For Each resolution In returnValue            
            Return resolution.Mailbox.Address
        Next
        Call _Owner.LogThreadMessage(frmMain.ObjectTypes.Error, "Error resolving address", Name)

        Return ""

    End Function

我认为它试图使用用户帐户访问地址簿，而不是邮箱。

Answer 1

为了防止其他人遇到同样的问题，我仅通过查看目录来解决此问题:

returnValue = _MainService.ResolveName(Name, ResolveNameSearchLocation.DirectoryOnly, True)

我认为现在查看的是全局地址列表，而不是联系人列表，而联系人列表并不存在。