大家还可以参考:使用C# 创建邮件发送组件(SMTP)
4、IIS SMTP自带的基本的发信组件CDONTS
你不必专门下载,微软已经提供了这个组件,只要安装了2000,NT的SMTP就会有的。
优点:组件由操作系统自带
缺点:功能比较差,可扩展性不强
Mymail = CreateObject("CDONTS.NewMail")
Mymail.From = *** '信件发送者信箱
Mymail.To = *** ‘信件接收者信箱
Mymail.CC = *** '抄送
Mymail.BCC = *** ‘密件发送
Mymail.Subject = *** ‘信件主题
Mymail.Body = *** ‘信件正文
'设置优先级,0-不重要,1-一般,2-重要。
Mymail.Importance = 2
Mymail.Send()
Mymail = Nothing
5、使用JMail组件
Jmail具有以下特点:
(1)可以发送附件;
(2)详细日志能力,便于你查看问题所在;
(3)设置邮件发送的优先级;
(4)支持多种格式的邮件发送,比如说以HTML或者TXT的方式发送邮件。这是个免费的组件。
(5)密件发送/(CC)抄送/紧急信件发送能力;
(6)最关键的就是——免费的组件,不必发钱,所以非常值得使用。
网站:http://www.dimac.Net/,目前版本是4.3
JMail组件的常用属性:
Body 邮件正文
Logging 调用Log记录,供Debug用
Priority 邮件的优先程度,从1到5
Sender 发件人
ServerAddress SMTP服务器的IP地址或名称
Subject 邮件标题
JMail组件的常用方法:
AddAttachment 指定附件文件
AddRecipient 加入一个收件人
AddRecipientBCC 隐藏的副本抄送,只有发件人和BCC收件人知道。
AddRecipientCC 副本抄送
Execute 送出邮件
了解必要的属性及方法后,余下的部分接收使用者输入的Email,当成参数传给AddRecipient方法,然后根据需要填上其余属性,最后以Execute方法寄出。例如:
以下是引用片段:
Dim JMail
JMail = Server.CreateObject("JMail.SMTPMail")
JMail.Logging = True
JMail.ServerAddress = "202.96.144.48"
JMail.Sender = "lihonggen0@163.com"
JMail.Subject = "subject."
JMail.Body = "body."
JMail.AddRecipient("bbbb@163.com")
JMail.AddAttachment("c:\go.gif")
JMail.Priority = 3
JMail.Execute()
JMail = Nothing |
总结:选择何种方案,视程序的用途和需求而定,本文例出的几种方案,供大家参考。例如用友软件U8,调用outlook组件,一样整合到自己的软件中。我编写的管理系统,自己写组件(SMTP),功能同样强大,不过Coding的时间就长了!

