EWS

Question

我是在VB. Net中编写EWS的新手。我的目标是从到达指定收件箱的邮件中提取附件并将它们保存到指定的文件夹中。我测试了一些代码，这些代码在针对我的域/Exchange帐户使用时似乎效果很好。

然后，我创建了一个新帐户并尝试使用相同的代码。它开始产生错误：

请求失败。远程服务器返回错误：（401）未授权。

到目前为止，代码非常基本：

    Dim exch As ExchangeService = New ExchangeService(ExchangeVersion.Exchange2010_SP2)

    exch.Url = New Uri("https://mail.OURSERVER.com/EWS/Exchange.asmx")
    exch.UseDefaultCredentials = False
    exch.Credentials = New System.Net.NetworkCredential("IncomingStoreInspections", "PASSWORD", "DOMAIN")

    Dim iv As ItemView = New ItemView(100)
    iv.Traversal = ItemTraversal.Shallow

    Dim InboxItems As FindItemsResults(Of Item) = Nothing
    InboxItems = exch.FindItems(WellKnownFolderName.Inbox, iv)

错误是由最后一行产生的。

到目前为止，我已经比较了工作用户和新创建的用户的域帐户和邮箱属性，但还没有提出任何有用的东西。提前感谢！

Answer 1

解决了我自己的问题:

看起来我创建的用户名与大多数相比有点长。当我使用截短的“Windows 2000之前”的登录名“IncomingStoreInpect”(前19个字符)时，我可以很好地使用EWS。

在任何地方都没有看到过这个记录。希望有一天能帮助别人。。。