李承哲
一級
註冊時間: 2004-10-07
文章: 2
來自: 中華民國
|
 發表於: 星期二 四月 11, 2006 2:56 pm 文章標題: 使用 aspemail 元件無法顯示中文 |
 |
|
我剛下載了aspemail 來用,測試結果可以了,但只要內文有中文,就會變成 "??"
不知哪位大大友碰過類似的問題,我的程式碼如下,感謝啦!!
dim Mail,strErr,bSuccess
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.xxx.org.tw"
Mail.From = "steven.xxx@mail.xxx.org.tw" ' From address
Mail.FromName = "steven" ' optional
Mail.AddAddress "st1xxxmo@yahoo.com.tw"
' Mail.Username = "Administrator"
' Mail.Password = "He11o@World!"
' message subject
Mail.Subject = "mail測試"
' message body
Mail.Body="mail測試1"
' Mail.Body="<HTML><BODY BGCOLOR=#FFFFFF>mail測試1mail測試1mail測試1:....</BODY></HTML>"
' Mail.IsHTML = True
strErr = ""
bSuccess = False
On Error Resume Next ' catch errors
Mail.Send ' send message
If Err <> 0 Then ' error occurred
strErr = Err.Description
response.write(strErr)
response.end
else
bSuccess = True
response.write("已寄出!!")
End If
set Mail=nothing |
|
