2014-12-11 1 views
2

우리는 현재 UTF-8 만 사용하도록 메일 배달 시스템을 변경하고 있습니다.CDO.Message 인코딩 문제

이되고, 내 Gmail 계정에 표시되는 이메일이 아닌 아스키 문자 (히브리어) 대상 & 몸이 좋아 렌더링하지만, 보낸 사람 이름이 포함 된 경우, 보낸 사람 이름에 문제가 발생한 것 같습니다 - ??????.

myMail.BodyPart.Charset = "UTF-8" 

그래서 내가 생각

는 등의 일부 코드가 있어야한다 :

myMail.SenderName.Charset = "UTF-8" 

하지만 사용할 수있는 권리 코드를 찾을 수 없습니다 코드의 라인이 있습니다

이것이 트릭을 할 것이라고 가정합니다.

+1

, 의문 [문서] 읽기 (http://msdn.microsoft.com/en-us/library/ms526453%28v=exchg.10%29.aspx). 당신이 원하는 것이 거기에 없다면 아마 지원되지 않을 것입니다. –

답변

0

이 나를 위해 작동합니다 http://www.powerasp.net/content/new/sending_email_cdosys.asp

Dim ObjSendMail 
Set ObjSendMail = CreateObject("CDO.Message") 

ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "myserver" 
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = False 
ObjSendMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 

ObjSendMail.Configuration.Fields.Update 

ObjSendMail.To = to_email 
ObjSendMail.Subject = subject 
ObjSendMail.From = from_email 

'ObjSendMail.TextBody = mensaje 'tipo texto 
ObjSendMail.HTMLBody = mensaje 'tipo html 

ObjSendMail.TextBodyPart.Charset = "utf-8" 'support symbols á ñ ¡ 

ObjSendMail.Send 

Set ObjSendMail = Nothing 
0

이 나를 위해 일했다.

Set iMsg = CreateObject("CDO.Message") 

With iMsg 
    .BodyPart.Charset = "utf-8" 
End With