CDOSYS и Unicode в поле from

У меня есть код ниже, и я пытаюсь установить поле from, чтобы разрешить Unicode. В настоящее время в моем почтовом клиенте я получаю «??».

Строка темы и любой контент показывают Unicode правильно. И, глядя на MSDN, свойство должно быть"urn:schemas:httpmail:from".

Кто-нибудь решил эту проблему?

Dim AC_EMAIL : AC_EMAIL = "[email protected]"
Dim AC_EMAIL_FROM : AC_EMAIL_FROM = "测试 <[email protected]>"
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

Ответы на вопрос(1)

Ваш ответ на вопрос