При попытке подключиться к моему серверу обмена в Microsoft Online появляется следующая ошибка. Я не мог понять, как получить доступ к базовому XML, и мне было интересно, вызвана ли эта ошибка, потому что exchange просто обслуживает стандартную форму входа в OWA, а не XML-ответ, который ожидает API EWS. Как я могу это проверить?
Это ошибка, выдаваемая в последней строке моего кода:
«>» - неожиданный знак. Ожидаемый токен - «» или «». Строка 7, позиция 62.
Это мой код:
Dim ews As New ExchangeService
ews.Credentials = New WebCredentials("mytestmailbox@mydomain.com", "mypassword")
ews.Url = New Uri("https://mysubdomain.microsoftonline.com")
'send a test message
Dim message As New EmailMessage(ews)
message.Subject = "Hello World!"
message.Body = "This is a test message"
message.ToRecipients.Add("some@email.com")
message.SendAndSaveCopy()