PDA

【求助】我的發信元件是JMAIL，發信出去都不是BIG5???




ballwarm
2002-08-08, 10:21 PM
我的發信元件是JMAIL

網站是用ASP寫的

然後我自動回給別人的信收到都是西歐的文字

我怎麼改成預設寄給別人是BIG5的繁體中文

謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝謝



ranger
2002-08-08, 10:44 PM
Jmail.Charset = "big5"
ballwarm
2002-08-08, 11:02 PM
最初由 ranger 發表
Jmail.Charset = "big5"

case "jmail"
on error resume next
Set objNewMail = Server.CreateObject("Jmail.smtpmail")
objNewMail.ServerAddress = strMailServer
objNewMail.AddRecipient strRecipients
objNewMail.Sender = strSender
objNewMail.Subject = strSubject
objNewMail.body = strMessage
objNewMail.priority = 3
objNewMail.execute
If Err <> 0 Then
Err_Msg = Err_Msg & "<li>Your request was not sent due to the following error: " & Err.Description & "</li>"
End if

If Err <> 0 Then
Err_Msg = Err_Msg & "<li>Your request was not sent due to the following error: " & Err.Description & "</li>"
End if

我的原始碼是抓網路很常看到的那一版

請問大大是加在這一段嗎???

謝謝

ps：我加了…沒用…sorry~我對asp不太懂
ranger
2002-08-09, 12:20 AM
以下是某位網友寫的範例....您試試看
===============================================
<%
Set Jmail = Server.CreateObject("Jmail.Message")
Jmail.Logging = True '啟動錯誤紀錄
Jmail.Silent = True
'Jmail.Charset = "big5" '若使用繁體中文，要將字元集設為 big5
Jmail.ContentType = "text/html" '若郵件主旨會出現亂碼, 請將 ISOEncodeHeaders 設為 False
Jmail.ISOEncodeHeaders = False
Jmail.From = "[email protected]" '設定寄件人 EMail

Jmail.FromName = "test" '設定寄件人名稱,可省略

'設定收件人EMail及名稱(收件人名稱參數可以省略)
Jmail.AddRecipient "[email protected]", "WebMaster"

Jmail.Subject = "測試Jmail物件寄信功能" '設定主旨

'設定郵件內容
jmail.Body = "<html><body><font color=""red"">測試文字</font><br></body></html>"

If Not Jmail.Send("xxx.xxxx.xxx.xxx") Then '利用 JMail 的 Send 方法寄信,引號內為 SMTP Server 的 IP 或 Domain Name
Response.Write oJmail.Log '將錯誤訊息顯示出來
Else
Response.Write "郵件已經寄出..."
End If
set JMial = nothing
%>
ballwarm
2002-08-09, 07:29 AM
感謝ranger 大大

我的問題解決了

我把JMAIL關掉再重開就又好了

謝謝你，我又學了一點點^^