使用Exchange 2013创建纯文本邮件

时间:2019-01-31 12:52:48

标签: outlook-redemption

每当我创建一条变为HTML格式的消息时,我都试图发送纯文本消息。

我正在将PowerShell v5和CDO 1.2.1与Redemption v5.19一起使用,并连接到Exchange 2013。

我正在创建一个IPM.Note,并将bodyformat设置为1(纯文本),但是,一旦我向body添加任何文本,bodyformat值就会更改为2(HTML)。将bodyformat设置为2后,我将无法再将该值更改。

$rs = New-Object -ComObject "Redemption.RDOSession"
$rsOutbox = $rs.GetDefaultFolder(4)
$msg = $rsOutbox.items.add("IPM.Note")
$msg.BodyFormat = 1
$msg.body = "Test"

1 个答案:

答案 0 :(得分:0)

您可以尝试将RTFBody设置为明确指定纯文本正文的字符串:

set Session = CreateObject("Redemption.RDOSession")
Session.MAPIOBJECT = Application.Session.MAPIOBJECT
set folder = Session.GetDefaultFolder(4)
set Msg = folder.Items.Add
Msg.To = "user@example.com.com"
Msg.Subject = "testing body format"
Msg.RTFBody = "{\rtf1\ansi\ansicpg1252\fromtext \fbidis \deff0{\fonttbl " & _
"{\f0\fswiss Arial;}" & _
"{\f1\fmodern Courier New;}" & _
"{\f2\fnil\fcharset2 Symbol;}" & _
"{\f3\fmodern\fcharset0 Courier New;}}" & _
"{\colortbl\red0\green0\blue0;\red0\green0\blue255;}" & _
"\uc1\pard\plain\deftab360 \f0\fs20 Test \par" & _
"}"
Msg.BodyFormat = 1
Msg.Save