Отправлено черновик проекта с другого компьютера

Question

У меня есть учетная запись электронной почты на сервере Exchange и эта ситуация. Я начинаю с моего . Внешний вид компьютера (подключенный к этой электронной почте) запускает этот код. Электронная почта будет создана и сохранена в проектах. Работает отлично.

Чем я занимаюсь записной книжкой (подключенной к той же учетной записи) и пытаюсь отправить ее из черновиков. Получить ошибочный адрес электронной почты, но он выглядит как правильный адрес "test@test.com". Если я удалю это и набрав еще один раз тот же адрес с моей клавиатуры "test@test.com", он работает. Я получил Windows 7, «Outlook 2013 с отключенным режимом кэширования Exchange».

_OutlookApplication = New Microsoft.Office.Interop.Outlook.Application 
Dim mailItem = CType(_OutlookApplication.CreateItem(OlItemType.olMailItem), MailItem) 

mailItem.Recipients.Add("test@test.com") 
mailItem.Body ="Text" 
mailItem.Subject = "Subject" 
mailItem.Save() 

Зачем мне перепечатывать адрес? и как я могу это исправить?

Answer 1

_OutlookApplication = New Microsoft.Office.Interop.Outlook.Application 
Dim mailItem = CType(_OutlookApplication.CreateItem(OlItemType.olMailItem), MailItem) 
Dim _TestRec As Recipient 

_TestRec=mailItem.Recipients.Add("test@test.com") 
_TestRec.AddressEntry.Address = "test@test.com" 

mailItem.Body ="Text" 
mailItem.Subject = "Subject" 
mailItem.Save() 

Проблема в - mailItem.to установка только отображаемого имени. Если бы только создать Получателя и установить Получателя.AddressEntry.Address mailItem.Recipients.Add ("test@test.com")