仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 381|回复: 7
打印 上一主题 下一主题

[学习教程] ASP教程之Asp-Email组件的实践使用

[复制链接]
蒙在股里 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:31:52 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
大家可以自己去看一看.可以说看得想呕吐.以前有次下了个动网来看.里面连基本内置函数的保护措施(函数没防御性)都没有.难怪经常补这个补那个了.可能现在.NET版会好点吧subsendMail(a_intID,a_strEmail)
constc_strMailServer="smtp.163.net"
dimobjConn,objRs,strSql
dimstrContent,strBody,strSubject,objEmail


strBody="<html><head>"
strBody=strBody+"<metaHTTP-EQUIV=Content-Typecontent=text/html;charset=gb2312>"
strBody=strBody+"</head><bodybgColor=#d2b48c>"
strBody=strBody+"<ahref=http://www.china-168.net/center/default.asp>"+"<imgsrc=http://www.china-168.net/center/images/banner.gifborder=0>"+"</a>"
strBody=strBody+"<h3style=FONT-SIZE:15px>"+"请您确认"+"</h>"+vbcrlf
strBody=strBody+"<pstyle=FONT-SIZE:13px>"+"您好<ahref=mailto:"&a_strEmail&">"&a_strEmail&"</a>"+"</td>"+vbcrlf
strBody=strBody+"<pstyle=FONT-SIZE:13px>"+"接待您定阅万里信息网邮件列表"+"</td>"

strBody=strBody+"<pstyle=FONT-SIZE:13px>"+"为了避免呈现定阅毛病,请您点击以下链接举行确认。感谢!"+"</td>"
strBody=strBody+"<pstyle=FONT-SIZE:13px>"+"<ahref=""http://www.china-168.net/EmailList/affirm.asp?Mode=MailList&content="&a_strEmail&""">"+"请点击这里,举行定阅确认"+"</a>"
strBody=strBody+"<pstyle=FONT-SIZE:13px><ahref=http://www.china-168.nettarget=_blank>"+vbcrlf
strBody=strBody+"<imgsrc=http://www.china-168.net/images/logo.gif"
strBody=strBody+"alt=更多信息尽在万里信息网></a><br>"
strBody=strBody+"<pstyle=FONT-SIZE:13px>"+"接待再次到临万里信息网!"+"</td>"
strBody=strBody+"</body></html>"


发送email
onerrorresumenext
setobjEmail=server.CreateObject("Persits.MailSender")
objEmail.Host=c_strMailServer
objEmail.From="jiabaoxu@163.net"
objEmail.FromName="china-168.net"
objEmail.AddAddressa_strEmail
objEmail.Subject="定阅确认"
objEmail.IsHTML=true
objEmail.CharSet="gb2312"
objEmail.Body=strBody
objEmail.Send

审查毛病
ifErr.number=0then假如乐成
Response.Write("<palign=centerclass=cn>为确保用户不被骚扰,我们将收回确认信,请会见信中的URL以确认挂号</td>")
else假如失利则显现堕落缘故原由
Response.Write("<palign=centerclass=cn>邮件发送堕落,毛病缘故原由:<br>")
Response.Write("<fontcolor=red>"&Err.Description&"</font></td>")
endif

清场
setobjEmail=nothing
endsub

利用该历程:
<%
.....

RTSEmailGuestMailID,""&email&""
.....

%>缺点:安全性不是太差了,还行,只要你充分利用系统自带的工具;唯一缺点就是执行效率慢,如何进行网站优化以后,效果会比较好。
若天明 该用户已被删除
沙发
发表于 2015-1-19 16:11:30 | 只看该作者
他的语法和设计思路和VB完全相同,导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是,相当多的ASP教程混合了Javascript,VBscript等等脚本语言,搞的初学者。
冷月葬花魂 该用户已被删除
板凳
发表于 2015-1-26 16:09:04 | 只看该作者
我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页,这其中就用到了ASP,我想它的作用是可想而知的。
再现理想 该用户已被删除
地板
发表于 2015-2-4 18:57:17 | 只看该作者
兴趣爱好,那么你无须学编程,申请一个域名和空间,在网上下载一些免费开源的CMS系统,你不用改代码,只须熟悉它们的后台操作,像office一样简单方便,很快就能建一个站点,很多站长都是这样做的
admin 该用户已被删除
5#
发表于 2015-2-10 05:22:46 | 只看该作者
没有坚实的理论做基础,那么我们连踏入社会第一步的资本都没有,特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP,从平时的学习过程中。
小魔女 该用户已被删除
6#
发表于 2015-2-28 21:31:53 | 只看该作者
哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的?
飘灵儿 该用户已被删除
7#
发表于 2015-3-17 06:09:18 | 只看该作者
ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。  因为ASP脚本语言非常简单,因此其代码也简单易懂,结合HTML代码,可快速地完成网站的应用程序。
分手快乐 该用户已被删除
8#
发表于 2015-3-23 22:47:54 | 只看该作者
另外因为asp需要使用组件,所以了解一点组件的知识(ADODB也是组件)
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-23 23:45

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表