|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
ActiveServerPage技术为应用开发商提供了基于脚本的直观、快速、高效的应用开发手段,极大地提高了开发的效果。在讨论ASP的安全性问题之前,让我们来看看ASP是怎么工作的。程序|在线Result.asp
这一页的次要目标是显现了局,同时将这些了局拔出数据库以备未来参考。
foreachiteminRequest.Form
sql_check="selectCount(*)from"&subject&"whereanswer="&Request.Form(item)&""
SetRS_check=Application("Conn").Execute(sql_check)
ifRS_check(0)>0then
result=result+1
endif
next
变量result中存储了却果。
百分数是从result中算出来的,以下所示:
percent=round((100*result)/count)
要将这个了局存储在数据库中,实行以下查询:
sql_id="selectidfromloginuserwhereusername="&Session("username")&""
SetRS_id=Application("Conn").Execute(sql_id)
id=RS_id(0)
SQL_insert="insertintodetails(ref_id,subject,score)values("&id&","_
&subject&","&percent&")"
SetRS_insert=Application("Conn").Execute(SQL_insert)
View.asp
寓目模块反省会员是不是之前已经举行过在线测验。假如是的话,将用户引诱到viewrecord.asp。假如没有的话,显现响应的信息。
sql_id="selectidfromloginuserwhereusername="&Session("username")&""
SetRS_id=Application("Conn").Execute(sql_id)
id=RS_id(0)
sql_count="Selectcount(*)fromdetailswhereref_id="&id&""
SetRS_count=Application("Conn").Execute(sql_count)
IfRS_count(0)0Then
response.redirect"viewrecord.asp"
EndIf
IfRS_count(0)=0Then
Session("noview")="NOONLINEEXAMINATIONSHAVEBEENGIVEN"
response.redirect"default.asp"
EndIf
Viewrecord.asp
Viewrecord.asp页使会员可以寓目一些他们的细节信息。查询以下:
sql_details="Select*subject,scorefromdetailswhereref_id="&id&""
SetRS_details=Application("Conn").Execute(sql_details)
了局是用一个复杂的表格格局来显现的。
请注重,我并未将会员能够举行一个主题的测验次数限定为一次。统一个主题测验能够举行恣意次。
</p>ASP在国内异常流行,因为国内大多使用的是盗版的Windows和盗版的SQLServer,而ASP+COM+SQLServer实际上也是一种不错的搭配,其性能也不输于PHP+MYSQL,特别是Windows系统和SQLServer都有图形界面,比APACHE和MYSQL易于维护,因此对于不重视知识产权的国家来说也是一种不错的选择。 |
|