今天用CDO.Message发送邮件成功，说说自己的心得

yuzhiguo

今天特意研究了一下godaddy空间的在线发送邮件组件，试了几个代码，最后这个CDO.Message组件代码可用；

我的godaddy空间是150G的那种，windows系统，IIS7的。

<%
sendUrl="http://schemas.microsoft.com/cdo/configuration/sendusing"
smtpUrl="http://schemas.microsoft.com/cdo/configuration/smtpserver"
' Set the mail server configuration
Set objConfig=CreateObject("CDO.Configuration")
objConfig.Fields.Item(sendUrl)=2 ' cdoSendUsingPort
objConfig.Fields.Item(smtpUrl)="relay-hosting.secureserver.net"
objConfig.Fields.Update
' Create and send the mail
Set objMail=CreateObject("CDO.Message")
' Use the config object created above
Set objMail.Configuration=objConfig
objMail.From="123@123.com"
objMail.To="321@321.com"
objMail.BodyPart.Charset = "utf-8"
objMail.Subject="邮件标题"
objMail.TextBody="邮件内容"
objMail.Send
Set objMail = Nothing
%>

1，发现很有意思的地方，就是objMail.From="123@123.com"发件人可以随意填写，都能发送成功，根本不需要什么godaddy的企业邮局，这一点让我很惊讶。

2，objMail.BodyPart.Charset = "utf-8"
增加了编码定义功能，发送邮件不再乱码

3，邮件到达的速度时快时慢，有时候可以达到秒速，有时候可能要好几分钟

写累了，看到的朋友顶一下，你们的支持是我发帖的动力！

[ 本帖最后由 yuzhiguo 于 2009-8-3 06:23 PM 编辑 ]

cqboy2003

内容高深，不太了解。

add.c

1，发现很有意思的地方，就是objMail.From=&quot;123@123.com&quot;发件人可以随意填写，都能发送成功，

收件人显示的也是这个123@123.com么？

yuzhiguo

老大，确实如此，我都测试了好几次，每次都能成功，这一点很吓人！

add.c

你用abc@gmail.com给我个看看，
我mail是(河蟹掉 )

[ 本帖最后由 add.c 于 2010-6-1 05:21 PM 编辑 ]

yuzhiguo

含有gmail。com的不能发送

用下面的发送成功了
objMail.From="vip@idcspy.com"
objMail.To="addc@live.cn"

skycity

很好很强大，可以干坏事

ffcalon

发到qq邮箱能收到吗？

goodrt

兄弟。。你救了我的命了。。

qjmartin

可以说下具体怎么操作的吗？CDO.Message需要下载吗？