Невозможно установить RTFBody Свойство Outlook.TaskItem

Question

Я пытаюсь установить свойство RTFBody для TaskItem (используя Office PIA). Ниже приведен фрагмент того, что я пытаюсь сделать, и это исключение. Кто-нибудь раньше пытался установить RTFBody и если да, то как у вас дела?

Dim oApp As Outlook.Application = New Outlook.Application
Dim t As Outlook.TaskItem = DirectCast(oApp.CreateItem(Outlook.OlItemType.olTaskItem), Outlook.TaskItem)
t.Status = Outlook.OlTaskStatus.olTaskNotStarted
t.Importance = Outlook.OlImportance.olImportanceNormal
t.Subject = "test subject"
t.RTFBody = System.Text.Encoding.ASCII.GetBytes("{\rtf1\ansi\ansicpg1252\deff0\nouicompat\deflang1033{\fonttbl{\f0\fswiss\fcharset0 Arial;}}{\*\generator Riched20 15.0.4599}{\*\mmathPr\mwrapIndent1440 }\viewkind4\uc1 \pard\f0\fs22 Test Body: First Line\parSecond Line of Text\par}")

Я могу получить свойство RTFBody при отладке, но не могу установить его.

Answer 1

Вместо настройки RTFBody, просто установив Body свойство байтового массива RTF (в кодировке ANSI) дает желаемый эффект, ср. также этот ответ.