成人AV在线无码|婷婷五月激情色,|伊人加勒比二三四区|国产一区激情都市|亚洲AV无码电影|日av韩av无码|天堂在线亚洲Av|无码一区二区影院|成人无码毛片AV|超碰在线看中文字幕

godaddy空間使用CDO發(fā)送中文郵件例子

我先啰嗦幾句...國內(nèi)備案實(shí)在太麻煩,不得以,翻墻出去!而godaddy支持支付寶交易,對我們來說購買超級方便!而口碑也不錯(cuò)!所以選擇了godaddy!真正購買之后,的確不錯(cuò),空間速度跟國內(nèi)無異,只是

我先啰嗦幾句...

國內(nèi)備案實(shí)在太麻煩,不得以,翻墻出去!

而godaddy支持支付寶交易,對我們來說購買超級方便!

而口碑也不錯(cuò)!所以選擇了godaddy!

真正購買之后,的確不錯(cuò),空間速度跟國內(nèi)無異,只是ftp慢點(diǎn)!

買域名也送空間送郵箱,買空間則送大郵箱!實(shí)在太爽了!

不過gd的空間不支持我們常用的email組件,如Jmail或者ASPmail,只支持CDO以及CDONTS

dear,從來沒搞過,擺渡之后,得到CDO發(fā)信代碼!

能發(fā)信了,但是悲劇的事情是,中文竟然無法識(shí)別!

信不過擺渡,于是股溝。股溝終于有答案,并且成功發(fā)送中文郵件

稍加修改,代碼如下.....

emailbady="資料:
"
emailbady=emailbady "姓名 - "&Request.Form("name")&"
"
emailbady=emailbady "住址 - "&Request.Form("Address")&"
"
emailbady=emailbady "出生年月 - "&Request.Form("Birth")&"
"
emailbady=emailbady "電話 - "&Request.Form("phone")&"
"
emailbady=emailbady "電子郵件 - "&replace(Request.Form("email"),"@","#")&"
"
'emailbady=emailbady "電子郵件 - "&Request.Form("email")&"
"這里要注意,如果郵件主題帶有@將發(fā)不出去!要替換掉
emailbady=emailbady "其他問題或意見 - "&Request.Form("question")&"
"
emailbady=emailbady "提交時(shí)間 - "&Request.Form("Time")&"
"
on Error Resume Next
Set objMail = Server.CreateObject("CDO.Message")
Set objConfig = Server.CreateObject ("CDO.Configuration")
objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") ="relay-hosting.secureserver.net"
objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/languagecode") = "0x0804"
objConfig.Fields.Update()
Set objMail.Configuration = objConfig
objMail.Subject = "資料"
objMail.From = "account@youdomin.com" '這個(gè)發(fā)件人好重要,用126或163等的都不可以,你可以隨便用xxx@godaddy.com或在godaddy處注冊的域名都可以。
objMail.To = "account@youdomin.com"
objMail.BodyPart.ContentTransferEncoding = "7bit"
'如果使用多國語言時(shí),才要設(shè)定 Charset,這里超級重要,一定要聲明編碼類型,否則就是亂碼,這里就是亂碼的原因!
objMail.BodyPart.Charset = "utf-8"

objMail.HTMLBody = emailbady
'objMail.AddAttachment(http://xxxxxx/xxxx.xxx) '或者其他任何正確的url,包括http,ftp,file等等。這個(gè)是成功后跳轉(zhuǎn)網(wǎng)址
objMail.Send
Response.Write "郵件發(fā)送成功!
"&emailbady
if Err <> 0 then
response.write ""&Err.Description&""
response.end
end if




有網(wǎng)站用到在線發(fā)郵件,由于狗爹的空間不允許用第

標(biāo)簽: