Outlook 如何在邮件中输出UTF-8格式和换行符

我正在尝试在windows上使用任务计划程序在特定时间发送邮件

我在身体里的输出不是我所期望的，也没有给出一条新的线

有没有办法控制输出的格式

Const MSG_收件人_列表=”foor@bar.com"
Const MSG_SUBJECT=”力"
Const MSG_BODY=”これをやろう“+vbNewLine+”我々は一緒に大きなものを達成する"
Dim olkApp、olkSes、olkMsg
设置olkApp=CreateObject（“Outlook.Application”）
设置olkSes=olkApp.GetNamespace（“MAPI”）
olkSes.Logon olkApp.DefaultProfileName
设置olkMsg=olkApp.CreateItem（0）
与olkMsg
.To=邮件收件人列表
.Subject=MSG\u Subject
.HTMLBody=MSG\u BODY
.发送
以
奥尔克斯，下线
设置olkMsg=Nothing
设置olkSes=Nothing
设置olkApp=Nothing

是否为

CP65001

代码页的有效值？通常为

CODEPAGE=“65001”“

。您可以使用

Response.CodePage

控制页面中生成的任何动态字符串的输出。如果您使用

HTMLBody

，则需要将任何换行符转换为HTML可读值

.HTMLBody=Replace（MSG_BODY，vbNewLine，“
”）

如@K.Davies所建议。您还应该使用来执行此操作，而不是要求将其安装在web服务器上。此链接的可能副本将有助于您：