英文服务器用CDONTS发送中文邮件的解决方案

Ivan 发表于 2008-2-6 14:23:00

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.BodyFormat = 1
objMail.MailFormat = 0
objMail.SetLocaleIDs(936)
objMail.Subject = "宜阳酷网"
objMail.From = "[email protected]"
objMail.To = "[email protected]"
objMail.cc = ""
objMail.Body = "宜阳酷网"
objMail.Send
Set objMail = Nothing
%>