贴心猫(imcat) v5.4 --- 极轻、极简通用PHP网站系统！
jmail.8000ffff, 不可能使用GMail的smtp服务
-------------------------------------------------
http://topic.csdn.net/t/20051229/10/4487960.html
http://hi.baidu.com/%B9%C5%C1%E9%BE%AB%B9%D6ai%BB%A8%B6%F9/blog/item/be77af54d3f86d56d009067e.html
http://www.alixixi.com/program/a/2008070720825.shtml
-------------------------------------------------
在服务器上如果使用smtp.sohu.com可以用jmail发送邮件，可用smtp.gmail.com时候却出现
jmail.Message 错误 ''8000ffff ''
The message was undeliverable. All servers failed to receive the message
/test/test_jmail.asp，行 64
错误信息。
用户名，密码都没问题。是smtp.gmail.com不支持jmail组件吗
不清楚，不过gmail的smtp端口不是默认的25，SMTP是465 你改一下jmail发送的端口试试。另：POP3端口是995
gmail的端口與其它不同，然後它需要ssl支持，不知jmail支持ssl否
-------------------------------------------------
注：当然，除了jmail组件的安装和注册正确外，你还必须设置好你的SMTP服务器，我刚开始时用Gmail的SMTP也不行，后来用另外一个站点上可以正常使用的搜狗企业邮局邮箱的配置就可以了。
搜狗/Gmail的SMTP配置：
要显示的发送邮箱:可任意设
服务器地址:smtp.mail.sogou.com/smtp.gmail.com（gmail的这个我没有成功发送过邮件）
SMTP登录用户名:你在搜狗或者Gmail的登录帐号。
SMTP登录密码:你在搜狗或者Gmail的登录密码。
后来看到：请问我用Gmail邮箱可以使用Jmail发信吗 提到：
一、GMail存在smtp。其地址为：smtp.gmail.com
二、GMail的smtp要求SSL的安全链接
三、GMail的smtp端口号不是25是465
Jmail的发信端口默认是25，不太清楚它能否支持自定义发信端口，如果不支持，那么它就不能支持GMail了。
另外Jmail不支持SSL安全链接，这也使它根本不可能使用GMail的smtp服务。
而我用的是jmail的免费版本，所以是不可能用Gmail的SMTP服务了，但帖子中的“看来用Gmail作为发件地址是不行了”这句回复有错，仍然可以用Gmail作为发件地址，只需把“要显示的发送邮箱”设置为Gmail的地址即可，但我测试过有些问题。
第一项“要显示的发送邮箱”虽然可以任意设，但最好让要显示的邮箱地址与SMTP的登录地址一样，这样子才可以立即收到邮件（用Gmail邮箱测试），否则会延缓几分钟或者直接就收不到邮件。本想如果这里可以任意设的话，那么我只需要修改这一个地方，以下三样都不修改即可，就可以实现用任何地址发信了。但测试了四封邮件，只收到一封而且延缓了几分钟，另外三封都没有收到（也不在spam中），发送的页面也响应了很久才提示发送成功。但一旦改为与SMTP登录用户名一样的地址，不但服务器发送的页面响应速度快，很快就提示发送成功，而且Gmail里也马上收到邮件。
http://www.pro-soho.com/Blog/article.asp?id=295
礙於JMail本身對SSL之限制，若有Gmail發送信件需求朋友，可以透過CDO.Message實現
<%
dim myMail
Set myMail=CreateObject("CDO.Message")
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465
''Authentication method, ssl or not, Username and password for the SMTP Server
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = true
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "你的Gmail帳號"
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "你的Gmail密碼"
''-------------------------------------
myMail.Configuration.Fields.Update
myMail.From = "<xxxxxxx@gmail.com>"
myMail.To = "<xxxxxx@yahoo.com.tw>"
myMail.Subject =""
myMail.TextBody = ""
myMail.Send
set myMail=nothing
%>
-------------------------------------------------------------------------------------------------------------------
CDO 郵件元件使用方法
Microsoft從Windows Server 2000 及 Windows XP開始內建郵件元件已改為CDO
在之前的系統內建郵件元件則是 CDONTS，各位要注意，以下是CDO的用法
屬性 說明
Subject 郵件的主旨
From 寄件人的電子郵件信箱
To 收件人的電子郵件，可用分號；或逗號，斷開成多位收件人
CC 副本收件人的電子郵件，可用分號；或逗號，斷開成多位收件人
BCC 密送副本收件人的電子郵件，可用分號；或逗號，斷開成多位收件人
TextBody 郵件的本文-純文字模式
HTMLBody 郵件的本文-HTML模式
方法 說明
Send 送出郵件
AddAttachment "c:\mydocuments\test.txt" 附件
CreateMHTMLBody "http://www.w3schools.com/asp/" 將一個網頁用HTML格式送出
CreateMHTMLBody "file://c:/mydocuments/test.htm" 將本機硬碟中的一個網頁用HTML格式送出
範例：
送出一封純文字信件:
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="someone@somedomain.com"
myMail.TextBody="This is a message."
myMail.Send
set myMail=nothing
%>
送出一封純文字信件並給副本收件人及密送副本收件人
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="someone@somedomain.com"
myMail.Bcc="someoneelse@somedomain.com"
myMail.Cc="someoneelse2@somedomain.com"
myMail.TextBody="This is a message."
myMail.Send
set myMail=nothing
%>
送出一封HTML信件
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="someone@somedomain.com"
myMail.HTMLBody = "<h1>This is a message.</h1>"
myMail.Send
set myMail=nothing
%>
將一個網頁用HTML格式送出
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="someone@somedomain.com"
myMail.CreateMHTMLBody "http://www.w3schools.com/asp/"
myMail.Send
set myMail=nothing
%>
將本機硬碟中的一個網頁用HTML格式送出
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="someone@somedomain.com"
myMail.CreateMHTMLBody "file://c:/mydocuments/test.htm"
myMail.Send
set myMail=nothing
%>
送出一封純文字信件並含附件
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="someone@somedomain.com"
myMail.TextBody="This is a message."
myMail.AddAttachment "c:\mydocuments\test.txt"
myMail.Send
set myMail=nothing
%>
Sending a text e-mail using a remote server:
用遠端SMTP主機送出一封純文字信件
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="someone@somedomain.com"
myMail.TextBody="This is a message."
myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") =2
''遠端SMTP主機名稱或IP位址
myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver" )="smtp.server.com"
''遠端SMTP主機埠號 Server port
myMail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverp ort") =25
myMail.Configuration.Fields.Update
myMail.Send
set myMail=nothing
%>