email - from 字段中的 CDOSYS 和 Unicode

Question

我有下面的代码，我正在尝试将 from 字段设置为允许 Unicode。目前在我的电子邮件客户端中，我得到“？？”。

主题行和任何内容都正确显示了 Unicode。并且查看 MSDN，属性应该是"urn:schemas:httpmail:from".

有人解决了这个问题吗？

Dim AC_EMAIL : AC_EMAIL = "test@test.com"
Dim AC_EMAIL_FROM : AC_EMAIL_FROM = "测试 <test@test.com>"
Dim strSubject : strSubject = """测试"" testing testing"

set oMessage = WScript.CreateObject("CDO.Message")

With oMessage
    .BodyPart.charset = "utf-8" 'unicode-1-1-utf-8
    .Fields("urn:schemas:httpmail:from") = AC_EMAIL_FROM
    .Fields("urn:schemas:httpmail:to") = AC_EMAIL
    .Fields("urn:schemas:httpmail:subject") = strSubject
    .Fields.Update
    .Send
End With

Set oMessage = Nothing

Answer 1

找到了解决方法。不是最漂亮的，但它有效。基本上我将字符串转换为 Quoted-Printable。

.Fields("urn:schemas:httpmail:from") = "=?utf-8?Q?=E6=8F?= <test@test.com>"