网站导航网学 原创论文 网站设计 最新系统 最新研究 原创论文 获取论文 论文降重 发表论文 论文发表 UI设计定制 论文答辩PPT格式排版 期刊发表 论文专题
返回网学首页
网学原创论文
最新论文 推荐专题 热门论文 论文专题
当前位置: 网学 > 设计下载 > ASP类作品 > 正文

基于ASP远程教育在线考试系统的设计

来源:http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 用户投稿 来源: 网络 发布时间: 13/05/07

网学网ASP类作品编辑为广大网友搜集整理了:基于ASP远程教育在线考试系统的设计绩等信息,祝愿广大网友取得需要的信息,参考学习。

QQ交谈客服咨询,网学网竭诚为您服务,本站永久域名:myeducs.cn

4.2 各文件功能介绍及详解

1.<conn.asp>

该文件实现的是连接数据库和断开连接的功能。

文件中主要是定义了两个过程conn_init()endConnection()。第一个是连接数据库,第二个是实现断开连接。其中conn_init()过程中的连接是通过下面语句实现的:

connstr= "DBQ=" + server.mappath("data.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"

set conn=server.createobject("ADODB.CONNECTION")

conn.open connstr

connstr确定了数据文件的路径和数据库驱动程序。

Conn的含义是定义了一个变量用,来存放数据库连接所创建的对象。

conn.open connstr则真正实现了数据库的连接。

该文件主要被包含在其他文件中实现数据库的连接和断开功能。

2.<default.asp>

该文件的功能是系统登陆的入口,在此可以实现用户注册入口,管理员管理入口以及用户进入考试系统登陆界面的功能。

该文件的功能使这样实现的:表单提交给文件本身。再由HTML上面的ASP程序对提交信息进行处理。

最上面的<%@ Language=VBScript %>表示脚本语言是VBScript

<!--#include file="conn.asp"-->表示包含conn.asp文件。以下的程序进行了选择判断,如果提交的表单中的submit值为“登录”,就继续判断看student表中是否存在与该用户输入的用户名和密码相同的记录,如果存在就转到selectsubject.asp页进行考试科目选择。不存在就返回“对不起,请输入正确的用户名和密码。”如果submit值为“注册”,就转到register.asp页进行用户注册。如果submit的值为“管理”就转到admin文件夹中的login.asp页。重点程序如下:

set rs = server.createobject("adodb.recordset")

rs是一个变量,用来存放一个recordset对象。

sql="select * from student where studentname=''" & Request.Form("studentname") & "'' and studentpassword=''" & Request.Form("studentpassword") & "''"

变量sql代表一个SQL语句,功能是从表student中选出用户名和密码与考生提交的用户名和密码都相同的记录。

rs.open sql,conn,1,1

该语句的功能是执行sql语句并把记录集结果存储在变量rs中。

rs.close作用是关闭纪录。

session("studentname")=request.form("studentname")

该句的意思是把表单提交的变量studentname的值赋给一个session对象studentname。这个对象用来存储用户名,它在该用户对每个页面的访问中有效。

set rs=nothing含义是清空rs变量。

call endConnection()是调用conn.asp中的过程,用来关闭于数据库的连接。

3.<register.asp>

该文件实现了用户注册的功能,用户只要填写想要注册的用户名及密码,文件首先查看用户名是否已经存在,如果存在就提示该用户名已经存在,否则就将用户输入的信息添加到数据库中的student表内。然后用户就可以使用自己注册的用户名和密码登录在线考试系统进行在线考试。

在文件中,表单提交给registerAsp自身进行处理,如果submit值为“注册”首先进行判断看用户名或密码是否为空。如果为空就显示“错误!用户名或密码不能为空!”的信息。如果不为空,进行下一步判断,看student表中是否已经存在用户想要注册的用户名,如果存在,就显示信息“错误!该用学生存在!”,如果不存在就将要注册的用户名和密码写入student表。代码如下:

sql="insert into student(studentname,studentpassword) values(''" & cstr(trim(request("studentname"))) & "'',''" & cstr(trim(request("studentpassword"))) & "'')"

conn.execute sql

最后,用一个Vbscrip语言编写的消息框显示注册成功信息。

4.<selectsubject.asp>

该文件是实现用户登录在线考试系统后进行考试科目选择的功能,选择科目后进入考试界面。

该文件首先是将subject表中所有的纪录都以单选项的方式选出来,如果没有纪录,则显示“对不起,暂时没有任何考试科目。”用户按提交后,表单仍然提交给文件自身。处理程序首先判断用户是否选择了一个考试科目,如果没有选择显示“你没有选择考试科目,请选择考试科目!”如果选择了某个考试科目,先把该科目赋值给一个session变量selectsubjectname,然后从subject表中选出该科的相关信息,并也都设成session变量。Singlenumber表示单选试题数量,multinumber表示多选试题数量,singleper表示单选试题分值,multiper表示多选试题分值,testtime表示考试总时间。接着进入考试界面。

5.<test.asp>

该文件就是考试界面,实现真正的动态随机选题,并对每个考生的考试时间进行监控,到结束时间后自动给出提示。

该文件的总体构架是使用了if else 语句进行了一个选择,刚进入该页面submit1得值肯定不等于“开始考试”,所以先显示出“开始考试”的按钮。按下以后,首先把当前时间以分种为单位存储在session的变量starttime中。然后进入随机抽取试题部分,单选题和多选题的抽取很相似,只不过一个是单选按钮,一个是多选按钮罢了。这里只解释单选题的部分。

strid1=""是定义了一个字符串变量,并先赋值为空。

Randomize是产生随机种子,在使用rnd()函数之前一定要先用Randomize产生随机种子才能实现其产生01之间随机数的功能。

for i=1 to session("singlenumber")直到next是选择singlenumber(代表某科目的单选题数量)个单选题。

下面的代码实现了从数据库中随机不重复的选题:

set rs=server.createobject("adodb.recordset")

sql="select * from question where subjectname=''"&session("selectsubjectname") & "''and type=''单选题'' and haveselect=0 "

rs.open sql,conn,3,2

count=rs.recordcount

temp=fix(count*rnd(10))

rs.move temp

rs("haveselect")=1

rs.update

strid1=strid1 & rs("ID") & ","

其中haveselect标志某题是否已经被选过。

Count变量用来存放所有未被选过的单选题的总数。

temp变量用来存放0Count之间的随机整数值。

rs.move temp是将当前记录移到第temp条纪录。

rs("haveselect")=1是将当前选出的纪录的标志位设为1,然后用rs.update把数据库中的相应标志位改为1

strid1=strid1 & rs("ID") & ","是将所有选出的试题的id号用逗号分割后存储在strid1一个变量中,以方便的把所有选出的试题的id号传到resultAsp文件中,这也是本设计的一个独特的地方。需要说明的是strid1变量的最后是一个逗号,在下一个文件中会详细说明如何进行处理。

set rs=server.createobject("adodb.recordset")

sql="select * from question where haveselect=1 "

rs.open sql,conn,3,2

rs.movefirst

do while  not rs.eof 

rs("haveselect")=0

rs.update

rs.movenext

loop

 

本站发布的计算机毕业设计均是完整无错的全套作品,包含开题报告+程序+论文+源代码+翻译+答辩稿PPT

本文选自计算机毕业设计http://myeducs.cn
论文文章部分只是部分简介,如需了解更多详情请咨询本站客服!QQ交谈QQ3710167

原创论文

设为首页 | 加入收藏 | 论文首页 |原创论文 |
版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
Copyright 2008-2020 myeducs.Cn www.myeducs.Cn All Rights Reserved 湘ICP备09003080号 常年法律顾问:王律师