3

我正在尝试设置 TaskItem 的 RTFBody 属性(使用 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 属性,但无法设置它。

4

1 回答 1

0

而不是设置RTFBody,只需将Body属性设置为(ANSI 编码的)RTF 字节数组即可获得所需的效果,参见。也是这个答案

于 2018-07-10T15:55:47.997 回答