問：服務器應該支持 jmail組件的吧，我測試了 http://www.zbnauto.com/ajax/jtest.asp 目前打不開 ,jmail組件有測試代碼嗎
問：提示信息 ：
504 Gateway Time-outnginx/127.0.0.1 Lion
答：您好，
測試您提供的地址：http://www.zbnauto.com/ajax/jtest.asp，是可以打開的，并未反饋504的錯誤，請您清除瀏覽器緩存，再試試訪問。
附圖：,非常感謝您長期對我司的支持!
問：我看到了，但是我別的地方能用的郵件發送程序，這里用不了， 你有完整的代碼嗎？
我的代碼如下 :
call Jmail("@qq.com","來自zbn的動態!","是一個測試文件","GB2312","text/html")
Function Jmail(mailto,mailTopic,mailBody,mailCharset,mailContentType)Dim ConstFromNameCn,ConstFromNameEn,ConstFrom,ConstMailDomain,ConstMailServerUserName,ConstMailServerPassword ConstFromNameCn = "ZBNAUTO" ConstFromNameEn = "ZBNAUTO"ConstFrom = "zbn010@zbnauto.com" ConstMailDomain = "smtp.sina.net" ConstMailServerUserName = "zbn010@zbnauto.com" ConstMailServerPassword = "yulihua1a2B3#"
On Error Resume Next Dim myJmail Set myJmail = Server.CreateObject("JMail.Message") myJmail.Logging = TruemyJmail.ISOEncodeHeaders = FalsemyJmail.ContentTransferEncoding = "base64"myJmail.AddHeader "Priority","3"myJmail.AddHeader "MSMail-Priority","Normal"myJmail.AddHeader "Mailer","Microsoft Outlook Express 6.00.2800.1437"myJmail.AddHeader "MimeOLE","Produced By Microsoft MimeOLE V6.00.2800.1441"myJmail.Charset = mailCharset myJmail.ContentType = mailContentType If UCase(mailCharset) = "GB2312" Then myJmail.FromName = ConstFromNameCn Else myJmail.FromName = ConstFromNameEn End If myJmail.From = ConstFrom myJmail.Subject = mailTopic myJmail.Body = mailBody myJmail.AddRecipient mailTo myJmail.MailDomain = ConstMailDomain myJmail.MailServerUserName = ConstMailServerUserName myJmail.MailServerPassword = ConstMailServerPassword myJmail.Send ConstMailDomain myJmail.Close Set myJmail=nothing
If Err Then Jmail=Err.Description Err.ClearEnd If
On Error Goto 0 End Function
問：是發送的時候，提示 504 Gateway Time-outnginx/127.0.0.1 Lion ，jtest.asp是能正常訪問.
答：您好，您可以參考http://m.shinetop.cn/faq/list.asp?unid=167和http://m.shinetop.cn/faq/list.asp?unid=168 關于jmail發送郵件代碼，請查看,非常感謝您長期對我司的支持!
問：http://www.zbnauto.com/ajax/jtest4.asp 用你們的方法，測試失敗（是商業版郵箱）
問：可以了，謝謝兄弟，你們的代碼是錯誤的！！
答：您好，若有問題可以及時反饋工單 ，
非常感謝您長期對我司的支持,謝謝！
