仓酷云

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

[学习教程] ASP编程:发生一个暗码,并纪录到数据库,然后发...

[复制链接]
谁可相欹 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:22:33 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

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

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

x
使用filesystemobject,可以对服务器上的文件进行操作,浏览、复制、移动、删除等。有ado的支持,asp对数据库的操作非常得心应手。你甚至可以像使用本地数据库那样,管理远程主机上的数据库,对表格、记录进行各种操作。数据|数据库ThisarticleGeneratesapasswordrandom,RequiresadatabaseandMailsthePassword.

<%@language="vbscript"%>

******************************
<%
codebyManikantan
WebDeveloper
3rdAgenda
Nungambakkam,ChennaiIndia
%>

<%

setmail=server.CreateObject("cdonts.newmail")
mail.subject="ThankYouforRegistering"
mail.to=mailidmail.from="Webmaster@thesite"
mail.body="ThisistheInitialPasswordtooursite...."&vbcrlf
&href=mailto:mailid="user@ursite.com>mailid="user@ursite.com"
address="address"


otherdatalikephonenumberasperthememberdatabaseinthesite
allthesevaluesareobtainedfromtherequestmethodfroma.htmwhichsubmitstothisfile
Mainlyemployedinregistration
AssumesYouhavecdonts.dllinstalledinthewebserver.

setconn=server.CreateObject("adodb.connection")
conn.Open"dsn","uid","pwd"
setrec=conn.Execute("selectcount(*)frommembertable")
id=cint(rec.fields(0))+1
r=rnd*50
Response.Writer&"<br>"
fori=0to20
ifcint(r)>0andcint(r)<26thenstr=str+chr(97+cint(r))
r=rnd*100
next

Response.Writestr
pwd=left(str,2)
pwd=pwd&id
pwd=pwd&right(str,2)
pwd=pwd&second(time)

AnUpdateQuerycanbePassedfromherefortheusername,passwordandotherdetailsorcanbetriggered
fromanotherpagewhentheuserrespondstothemail...Somethinglikesendingaurlasamailandon
clickoftheurlinthemail..callanotherpagewhichupdates..sowecanbesurethatonlyconfirmed
usersareupdated

%>
<br>
<%
setmail=server.CreateObject("cdonts.newmail")
mail.subject="ThankYouforRegistering"
mail.to=mailid
mail.from="Webmaster@thesite"
mail.body="ThisistheInitialPasswordtooursite...."&vbcrlf&"ChangeitifYouWant"&vbcrlf&
pwd&vbcrlf&"ThankYouforUsingtheSite"
mail.send
%>


TheNewPasswordhasbeenMailed.
******************************

Regards
VedachalamManikantan

</p>asp对于服务器的要求较高,一般的服务器如果访问量一大就垮了,不得不重启。
爱飞 该用户已被删除
沙发
发表于 2015-1-20 09:43:37 | 只看该作者
以上是语言本身的弱点,在功能方面ASP同样存在问题,第一是功能太弱,一些底层操作只能通过组件来完成,在这点上是远远比不上PHP/JSP,其次就是缺乏完善的纠错/调试功能,这点上ASP/PHP/JSP差不多。
小女巫 该用户已被删除
板凳
发表于 2015-1-29 06:33:48 | 只看该作者
Response:从字面上讲是“响应”,因此这个是服务端向客户端发送东西的,例如Response.Write
若相依 该用户已被删除
地板
发表于 2015-1-30 07:56:06 | 只看该作者
它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。
愤怒的大鸟 该用户已被删除
5#
发表于 2015-2-6 09:00:20 | 只看该作者
它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。
变相怪杰 该用户已被删除
6#
发表于 2015-3-4 13:33:20 | 只看该作者
Server:这个表示的服务器,操作服务器的一些东西使用这个,如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件
不帅 该用户已被删除
7#
发表于 2015-3-11 19:42:35 | 只看该作者
交流是必要的,不管是生活还是学习我们都要试着去交流,通过交流我们可以学到很多我们自己本身所没有的知识,可以分享别人的经验甚至经历。
若天明 该用户已被删除
8#
发表于 2015-3-19 10:24:10 | 只看该作者
运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。
只想知道 该用户已被删除
9#
发表于 2015-3-27 19:09:37 | 只看该作者
如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-5-15 04:45

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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