当前位置: 首页 > 图文教程 > 网络编程 > ASP > 用ASP开发一个在线考试程序(三)

ASP
货币大写转换函数的更新
断开的数据库连接的一个例子
本函数计算两个时间的差
一个防止外部数据提交的脚本
一个取图片尺寸的类,支持jpg,gif,png
我在桌面上删帖子
IIS5.0中EXECUTE的巧用
一个简单的SQL语句执行器
ip限制函数
对一篇很长的文章做到完美的分页输出
ADO连接数据库字符串大全(VP,Excel,文本,Sybase,.NET等)
不用询问关闭一个独立的窗口代码
如何正确显示数据库中的图片
精彩OUTLOOK 2000组件放送
基于WEB系统的多语言支持--ASP国际化多语言详细方案
将你的网站设置为客户的信任站点--WSH方案
优化Web数据库页面
浅谈 ASP 程序的编程与优化
认识和优化 connection 对象
多个域名绑定一个空间互不影响

用ASP开发一个在线考试程序(三)


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 120 ::
收藏到网摘: n/a

  Sendregister.asp
  这一页从register.asp 中取得表单域的内容,将它们插入数据库中。要注意用户名必须是唯一的。所以,首先查询要
验证输入的用户名是否已经存在。如果是的话,用户被重新引回register.asp 页,并被要求选择另一个用户名。如果用户
名是新的,输入的内容就被传递给数据库。
sql_findmember = "select count(*) from loginuser where username = '" & username &"'"
Set RS_findmember = Application("Conn").Execute(sql_findmember)
If RS_findmember(0) < > 0 Then
Session("message") = "THE ENTRY HAD BEEN INSERTED EARLIER .. Please try another log in name"
response.redirect "register.asp"
End If
If RS_findmember(0) = 0 Then
sql_insert = "insert into loginuser (username,useremail,password) _
values('" & username & "','" & useremail & "', '" & pwd &"') "
Set RS_insert = Application("Conn").Execute(sql_insert)
Session("message") = "THE ENTRY HAS BEEN INSERTED .. Thank You"
response.redirect "index.asp"
End If
  这样,如果RS_findmember(0) 返回的值是0,就表示用户名在数据库中不存在,名字就被输入了。会员就可以使用站
点的其它部分了。反之,如果RS_findmember(0) 返回的值大于0,用户就被引导回注册主页,并被要求填写一个新的用户
名。
  还要注意,在向数据库中插入数据之前有一些事情需要警惕。替换函数用来确保当访问者键入了"'",就需要用''代
替。
username = replace(request.form("txt_name"),"'","''")