分享
 
 
 

如何使用ASPEMAIL

王朝asp·作者佚名  2006-11-24
窄屏简体版  字體: |||超大  

使用ASPEMAIL之前您必须先在您的ASP脚本中创建一个对象,例如:

<%

Set Mail = Server.CreateObject("Persits.MailSender")

%>

在发送邮件之前,您首先需要确定一个SMTP服务器的地址以及相应的端口号(可以使用默认值)如:

Mail.Host = "smtp.mycompany.com"

Mail.Port = 25 ' 该项可选.端口25是默认值

下一步需要指定邮件发送者的邮件地址,如:

Mail.From = "sales@mycompany.com"

Mail.FromName = "销售部" ' 该项可选

然后指定邮件的接收者或者是CC接收者BCC接收者以及邮件的回复地址等,可以分别使用AddAddress、 AddCC、 AddBcc 以及 AddReplyTo 方法。这些方法接收两个变量,邮件地址和可选的姓名。

注意:在使用这些方法的时候,不要使用=符号,直接将变量用空格与方法隔开即可,如:

Mail.AddAddress "jsmith@company1.com", "张辉"

Mail.AddCC "bjohnson@company2.com" ' 名字是可选的

使用Subject 和 Body 属性分别来指定邮件的标题和邮件的内容。BODY可以使用文本方式或者HTML方式,如果要使用HTML方式则必须将IsHTML 属性设置为True。请看以下例子:

纯文本方式

Mail.Subject = "关于报价"

Mail.Body = "尊敬的张经理:" & chr(13) & chr(10) & "感谢您的来信,以下是您需要的报价"

或者HTML方式

Mail.Subject = "关于报价"

Mail.Body = "<HTML><BODY BGCOLOR=#0000FF>尊敬的张经理:....</BODY></HTML>"

Mail.IsHTML = True

如果是需要发送文件作为邮件的附件,则需要用AddAttachment方法。它支持使用完全的物理路径的方式,如:

Mail.AddAttachment "c:\dir\receipt.doc"

同时需要注意的是该方法也不需要用“=”来做连接。

现在可以将邮件内容发送出去了,发送邮件使用Send方法,如果要忽略可能发生的错误,可以使用On Error Resume Next语句来跳过,并且显示出错误的信息,如:

On Error Resume Next

Mail.Send

If Err <> 0 Then

Response.Write "发现一个错误,错误信息描述为: " & Err.Description

End If

值得注意的是,目前很多SMTP服务器需要验证邮件发送者是否是合法的服务器用户,即平时我们所说的“密码验证功能”,这时候就需要特别指定邮件发送者的用户名和密码,方法如下:

mail.username = "用户名"

mail.password = "密码"

在使用的时候将上面两句话加入MAIL.SEND语句前面,并用您接收邮件的用户名和密码来替换上面的“用户名”和“密码”这样即可通过带有密码验证的SMTP服务器来发送您的邮件了;以下是一段实际运行中的例子,您可以参考使用:

'发送邮件

strHost = "SMTP.SINA.COM.CN" `指定SMTP服务器

Set Mail = Server.CreateObject("Persits.MailSender")

Mail.Host = strHost

Mail.From = "TEST@BESTDNS.NET"

Mail.FromName = "海威公司"

Mail.AddAddress MAILADDRESS@CEDB.COM ‘ 邮件地址

Mail.AddCC "service@cedb.com"

' message subject

Mail.Subject = "用户邮件通知" ‘邮件的标题

mail.username = "USERNAME"‘服务器上有效的用户名

mail.password = "PASSWORD"‘服务器上有效的密码

Mail.Charset = "gb2312"‘邮件的内码,使用这个选项可以避免中文乱码

Mail.IsHTML = True‘指定邮件的格式为HTML方式

Mail.Body = "<HTML><head><meta http-equiv='Content-Type' content='text/html; charset=gb2312'></head><BODY><br> 尊敬的客户您好!<br><br>感谢您对海威的支持! <br><br>=====================================================<br>北京海威计算机技术公司--为您提供完善的internet服务<br>http://www.Cedb.com http://www.Bestdns.net<br>电话:68421606 68469317/18 传真:68421359<br>地址:北京中关村南大街甲33号科贸中心407 邮编:100081<br>====================================================="

Mail.Send

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有