关 键 词：

asp sql 网上 英语考试 设计 论文 源代码

资源描述：

ASP+SQL网上英语考试设计(论文+源代码),asp,sql,网上,英语考试,设计,论文,源代码

内容简介：

1摘摘 要要本论文主要阐述了基于 Web 技术的英语网络考试系统的设计与实现。在介绍动态网页程序开发和数据访问技术基础上，提出了网络英语考试系统的组成与结构，阐述了系统的设计方案、实现方法以及所采用的开发工具和相关技术，还重点剖析了前台考试部分的程序设计。本考试系统采用 B/S 模式开发，不需安装客户端，被授权用户通过浏览器即可登录系统，从而开始正常的考试。本系统是基于微软公司的 Windows 2000 操作系统、Internet 信息管理器与SQL Server 数据库平台构建而成。微软公司产品优异的性能为本系统提供了高效稳定的运行环境，使本系统无论在运行速度、易用性还是在数据吞吐能力方面都表现卓越。本系统采用了以下技术方案保证考试正常稳定的进行。全面的容错处理使考试作业流程得到有序的控制，对用户的误操作能够进行有效的屏蔽；在考试过程中，禁止考生刷新浏览器，防止考生误操作导致答案丢失；对鼠标右键操作进行限制，保证考试系统用户界面的完整性；另外，系统还提供了考试时间倒计时功能，使考生随时了解考试剩余时间。在考试结束前一分钟和最后 10秒种，系统会提醒考生注意保存答案，防止答案丢失。考试到时后，如果考生还未提交试卷，系统将自动交卷，保证考试严肃、公正的进行。关键字：网络考试系统 英语考试 Web ASP2AbstractThe present paper mainly elaborated based on the Web technology English network test system design and the realization. In the introduction dynamic homepage procedure development and in the data accessing technology base, proposed the network English test system composition and the structure, elaborated the system design proposal, the realization method as well as use development kit and correlation technology, but also analyzed the partial links programming with emphasis.Have an examination system adopt B/S mode development, need to install the customer end originally, authorized users to log in to the system through the browser, thus begin the normal examination. This system was structured with SQL Server database platform by a Windows 2000 operating system based on Microsoft, Internet information management device. The performance that the products of Microsoft are excellent has offered the high-efficient and steady running environment for this system; make this system no matter at the speed, apt to behave with the sex or in handling capacity of the data remarkably of operation. This system adopt a great deal of technological scheme is it have an examination normal going on steady to guarantee. Overall fault-tolerant treatment makes having an examination and gets orderly control in procedure of the homework, can carry on the effective shielding to users mistake operation; In the course of examination, forbid examinees to break the browser, prevent the examinee from operating and 3causing the answer to lose by mistake; Is it is it limit to go on to operate by right key to mouse, is it have an examination systematic user integrality of interface to guarantee; In addition system offer test time count-down function, make examinee is it have an examination surplus time to understand at any time. In examination one minute and last one second kind before finishing, system will remind examinee pay attention to answer of keeping, prevent the answer from being lost. Examination then, if examinee submit paper yet, system hand in an examination paper automatically, guarantee it is serious to have an examination, just going on.Key Words: Network Exam System, English Exam, Web, and Asp4目录目录1 引 言12 绪论22.1 网络考试系统与 B/S 结构 22.2 数据库 22.3 数据库访问技术 32.4 开发平台与开发工具 42.4.1 系统软件42.4.2 工具软件42.4.3 系统硬件43 系统功能分析与设计53.1 系统构架分析 53.2 系统模块与流程说明 63.2.1 前台部分63.2.2 后台部分83.3 数据的安全与保密 83.4 试题设计 93.5 数据库设计 104 系统实施与测试134.1 前台考试部分 1354.1.1 考试子系统134.1.2 成绩查询子系统274.2 后台管理部分 315 结束语53参考文献 5411 引引 言言时光飞逝，一转眼两年的大学生活就要结束了。作为对大学生活学习的总结，毕业论文就成了最后的一门必修课。提笔之时感慨万千，回顾这几天的大学生活，感情溢于言表。希望在这最后的大学时光里，能给母校交上一份满意的答卷。现阶段，学校与社会上的各种考试大都采用传统的考试方式，在此方式下，组织一次考试至少要经过五个步骤，即人工出卷、考生考试、人工阅卷、成绩评估和试卷分析。显然，随着考试类型的不断增加及考试要求的不断提高，教师的工作量将会越来越大，其工作也将变成一件十分烦琐和非常容易出错的事情。可以说传统的考试方式已经不能适应现代考试的需要。随着计算机应用及网络技术的迅猛发展，人们迫切要求利用这些技术来进行在线考试，以减轻教师的工作负担以及提高工作效率、提高了考试的质量。从而使考试更趋于公证！客观！更加激发学生的学习兴趣。为了适应新形势的发展和本次毕业设计的需要，特推出了这套网络考试系统，但由于考试多样性及时间与技术的原因，只选取了其中的英语考试来进行课题的实施。希望其能在英语考试中发挥高效、便捷的作用。把教师从繁重的工作中解脱出来，并希望能为进行网络考试的发展进行有益的探索及尝试。本论文大致分为以下几个章节：第一部分，绪论，主要为本论文的开展做理论上铺垫；第二部分，系统分析与设计，主要简述了系统的开发思路和构架过程；第三部分，系统实施与测试，详细说明了系统的实现过程；第四部分，附录，提供相关的技术资料。122 绪论绪论在网络技术逐渐渗入社会生活各个层面的今天，传统的考试方式也面临着变革，而网络考试则是一个很重要的方向。基于 Web 技术的网络考试系统可以借助于遍布全球的因特网进行，因此考试既可以在本地进行，也可以在异地进行，大大拓展了考试的灵活性。试卷可以根据题库中的内容即时生成，可避免考试前的压题；而且可以采用大量标准化试题，从而使用计算机判卷，大大提高阅卷效率；还可以直接把成绩送到数据库中，进行统计、排序等操作。所以现在较好的考试方法为网络考试，试题内容放在服务器上，考生通过姓名、准考证号码和口令进行登录，考试答案也存放在服务器中，这样考试的公平性、答案的安全性可以得到有效的保证。因此，采用网络考试方式将是以后考试发展的趋势。2.1 网络考试系统与网络考试系统与 B/S 结构结构B/S 结构，即 Browser/Server（浏览器/服务器）结构，是随着 Internet 技术的兴起，对C/S 结构的一种变化或者改进的结构。在这种结构下，用户界面完全通过 WWW 浏览器实现，一部分事务逻辑在前端实现，但是主要事务逻辑在服务器端实现，形成所谓 3-tier 结构。B/S 结构，主要是利用了不断成熟的 WWW 浏览器技术，结合浏览器的多种 Script 语言（VBScript、JavaScript）和 ActiveX 技术，用通用浏览器就实现了原来需要复杂专用软件才能实现的强大功能，并节约了开发成本，是一种全新的软件系统构造技术。随着 Windows 98/Windows 2000 将浏览器技术植入操作系统内部，这种结构更成为当今应用软件的首选体系结构。显然 B/S 结构应用程序相对于传统的 C/S 结构应用程序将是巨大的进步。2.2 数据库数据库数据库技术在计算机软件领域研究中一直是非常重要的主题。产生于 60 年代的数据库技术得到了迅速发展，并已形成较为完整的理论体系和一大批实用系统。并且，近年来，随着 World Wide Web(WWW)的猛增及 Internet 技术的迅速发展，使得数据库技术成为时下最热门技术之一。作为一款基于 WEB 的英语网络考试系统来说，数据库当然是不可缺少的一部分。选择3什么样的数据，对系统最终的实现起着至关重要的作用。现在比较流行的大中型关系型数据库有 IBM DB2、Oracle、SQL Server、Sybase、Informix 等，常用的小型数据库有 Access、Paradox、FoxPro 等，现在个人用户比较常用的主要是基于中小型数据库 MS SQL Server 和 Access 的。Access 是一个数据库管理系统，它之所以被集成到 Office 中而不是 Visual Studio 中，是因为它与其它的数据库管理系统（如 Visual FoxPro）相比更加简单易学，一个普通的计算机用户即可掌握并使用它。而且最重要的一点是，Access 的功能足够强大，足以应付一般的数据管理及处理需要。SQL Server 是一种高效的关系数据库系统，它与 Windows NT/2000 及 Windows 9x 等操作系统紧密集成。这种安排使 SQL Server 能充分利用操作系统所提供的特性。对于今天复杂的浏览器/服务器系统来说，SQL Server 是一个很好的选择。正是基于此，本系统的开发，采用了 SQL Server 作为后台数据库关于 SQL Server 的简单操作请参见附录部分。2.3 数据库访问技术数据库访问技术因为一个系统不可能没有数据呀，所以就必须采用一个高效的方法通过网络来访问、操作数据库。在传统的 HTML 页面中，访问数据库一般是通过公用网关接口（CGI）来实现，这种方式不仅开发困难，而且在出现大量并发请求时会显著地降低服务器的运行效率，而采用 ASP 实现数据库访问可以说能较好地解决这个问题。ASP，Active Server Pages。是微软创立的服务器端脚本运行环境，可以支持多种脚本语言，向页面嵌入动态元素。ASP 技术优点为与 HTML 文件完全结合。面向对象，可用 ACTIVEX 控件扩充。无须编译和连接过程。当客户机向服务器请求一个 asp 文件时，ASP 机制负责对其进行解释和执行，并把结果以符合 HTTP 协议的开工返回给浏览器。由于服务脚本在服务器上运行，无须浏览器的干预，所以无论是 IE 或 NETSCAPE 都能浏览*.asp 文件。另外，ASP 的源程序不会被传到浏览器端，因而可以避免源程序被他人剽窃，提高了程序的安全性。ASP技术的强大功能使其能够充分利用互联网所提供的广泛互联，来建造和维护与平台无关的应用系统。42.4 开发平台与开发工具开发平台与开发工具2.4.1 系统软件系统软件客户端软件：操作系统：Windows98/ME/2000/Xp 及以上版本浏览器：Internet Explorer(IE)6 及以上版本服务器端软件：操作系统：Windows NT/2000 Server/XP 及以上版本浏览器：Internet Explorer(IE)6 及以上版本IIS：Internet Information Server (IIS)5.0 及其以上版本。数据库： SQL Server 20002.4.2 工具软件工具软件开发设计：Macromedia DreamWeaver MX。图形处理：Adobe Photoshop 6。辅助软件：Macromedia Flash MX 等。2.4.3 系统硬件系统硬件客户端：处理器 PIII 800 以上 ，内存 128M 以上，硬盘 1G 以上。服务器：处理器 P4 2.0 以上 ，内存 256M 以上，硬盘 10G 以上。53 系统功能分析与设计系统功能分析与设计3.1 系统构架分析系统构架分析网络考试系统的实现技术有多种，可以采用传统的客户机/服务器型的 MIS 型架构(如下图)，即试题内容放在远程的服务器上，在考试机上安装考试应用程序和数据库客户机配置，因此每次考试时要对机器进行安装、配置，考务工作比较烦琐，而且考试程序放在客户机上，安全性也受到一定影响。Web 技术超越了传统的“客户机/服务器”两层结构（如 3-1 图） ，采用了三层体系结构：用户界面层/事务层/数据库层，因此 Web 结构有着更好的安全性，在用户机上不需要安装任何应用程序，应用程序可以安装在事务层所在的计算机上，试题存放在数据库服务器上，当然，事务层和数据库可以是同一台机器（如果条件允许，还是应该把这两层分开在不同的计算机上） ，因此本论文最终决定采用 Web 技术实现，如图 3-1 所示：图 3-1 架构分析图图 3-2 逻辑结构图系统结构分析考试系统的用户分为教师和学生两种，工作流程分为题库与组卷、考试及批阅和统计分析三个阶段；支持系统的数据库分为：标准化题库、试卷库、答卷库、统计信息库和学科知6识结构库。系统的功能模块分别为：试题编制、试题管理、试卷生成、身份确认、考试与提交、试卷批阅、统计分析、成绩归档、成绩发布等。本考试系统的结构如图 3-3 所示：图 3-3 考试系统的结构图3.2 系统模块与流程说明系统模块与流程说明3.2.1 前台部分前台部分这一部分主要包括考试子系统与成绩查询子系统两个模块，主要是针对的对象是考生。考试子系统由于采用 Web 技术实现，所以从理论上讲，考试可以在任何时候、任何地方进行，但是为了使考场易于组织和管理，所以本系统对考试时间作了严格的限制，因此在进入网站时首先判断当前时间是否为考试规定的时间，由于判断的时间是服务器端的时间，所以跟考试机器的时间无关，即使考生修改所在机器的时间，也无济于事。如果时间符合要求，则显示登录页面，考生在这个页面输入自己的信息，如姓名、身份证号码、密码等等，单击“提交”后进入信息处理程序（在服务器端执行） ，如信息不正确（包括有些考生试图绕过登录页面，直接进入试卷页面的情况，此时由于没有登录信息，系统也会认为是非法考生） ，系统给出提示信息，并重新定位到登录页面；如信息正确，则显示试卷页面，试卷页面上的试题内容根据考生输入的试卷代号从数据库中取出符合条件的记录动态地生成。同时在页面上动态地显示考试所剩时间，当考试时间到或考生点击“交卷”按钮时，则系统把考生答案传送至服务器的数据库中保存起来，并把数据库中标记考生是否参加过考试的标记置为已考。考试子7系统是网络考试系统的核心部分，它的工作流程如图 3-4 所示：图 3-4 考试子系统流程图成绩查询子系统为了能让考生及时、方便地了解自己的考试成绩，查询子系统也采用 Web 方式实现。考生在登陆查询子系统之后，在页面输入自己的合法信息，系统测试无误后，服务器就能把成绩信息传送到考生的机器上。工作流程如图 3-5 所示：图 3-5 成绩查询子系统流程图83.2.2 后台部分后台部分这总分主要包括以下四个模块，主要是从管理员的角度出发来对考试的进程的控制、考试试题的生成等方面进行管理。 用户信息管理子系统本模块主要分为两个部分。一是系统用户管理，二是考生信息的管理。这其中就包括对用户及考生信息的增加、修改与删除。系统用户的权限控制，考生的考试状态控制等操作。考试控制子系统这一部分主要是完成对考试状态的控制及考试成绩的回收工作。试卷管理子系统本模块所要完成的工作主要是考试试题的录入与修改以及考试试卷的生成与修改工作。成绩管理子系统本模块主要是针对于管理人员，比如教师，对考试成绩进行调整，及统计而设计的。而成绩查询子系统只能完成单一考生的成绩查询工作。3.3 数据的安全与保密数据的安全与保密由于此系统的特殊性，数据的安全与保密显得尤为重要。保密性是指用户在网上的所有信息应有一定的保密度，不同类型的用户之间的内容是互相保密的。安全性是指用户参加一次活动是一个安全的过程，对于所有用户的动作，服务器都加以跟踪。为了确保其安全与保密性，一要确保考生不能联网作弊；二要在试卷上实时加以监控；三要在时间上加以严格的控制等。主要通过下列两种途径予以实现：1.凡进入在线考试的用户，都要通过用户身份验证才能进入。而且，不同用户具有不同的操作权限，支持按权限进行操作，确保数据的公共性与私有性。不允许用户执行非法的操作，防止用户无意或有意的破坏。2.禁止用户查看所有试卷的源文件及拷贝功能，方法有二：系统中禁止使用鼠标右键等功能；系统考试主界面禁用 IE 系统菜单及工具栏。93.4 试题设计试题设计本系统网络英语考试系统，考试的题型比较固定。主要分为主观试题与客户试题两个部分，下面分别说明之：客观试题部分：结合传统的英语考试模式不难看出：对于客观性试题，基本上只包括选择题这一题类。而在选择题中主要的就是单项选择题，其主要分布于听力、完形填空、阅读理解等题型。单项选择题往往在四个答案 A、B、C、D 中选择唯一正确的答案。举例如下：.Vocabulary and Structure(40 points)Directions:There are 40 incomplete sentences in this section. For each sentence there are four choices marked A, B, C and D. Choose one answer that best completes the sentence and blacken the corresponding letter on the Answer Sheet.12. China is famous _ the Great Wall.A. about B. for C. as D. of主观试题：对于主观性试题可以归结为填空题。填空题就是填写所缺少的字母或者单词、句子，以及编写短文等等。英汉互译、作文就是这样试题的代表。举例如下：. Writing (20 points)Directions:For this part, you are allowed 20 minutes to write a composition of about 80 words according to the following topic.金钱是一切吗？(Is Money Everything?)特别说明：关于听力题的实现。从传统的英语考试中可以发现：对于听力试题的重视程度在与日俱增。因此在本系统的编写中，也给予很大的关注。基于计算机在多媒体处理技术上的优势，也使这部分成为本系统中的一个亮点。听力部分的所有材料都采用 MP3 格式进行处理，接合操作系统的媒体播放机，进行时10时在线收听。之所以采用 MP3 格式处理，主要是考虑到了英语听力试题在视听效果的高保真方面的要求。这也正是传统的英语考试所无法匹敌的。3.5 数据库设计数据库设计网络考试系统离不开数据库系统的支持。由于数据库独立于程序而存在，具有较好的安全性，不论是试题、答案，还是考生信息都需要存放在数据库中。本系统的数据库采用Microsoft 公司的大型数据库系统 SQL Server 2000。 。主数据库名为 English Exam，现将主要表结构描述如下：表 3-1 考题（kt）表编号列名数据类型空标记/主键说明1ktbhchar(10)N/Y考题编号2ktlxchar(10)N/N考题题型3ktnrvarchar(5000)N/N考题内容4ktdavarchar(1000)N/N考题答案5ktfschar(10)N/N考题分数6ktztint(1)N/N考题状态7ktfzvarchar(1000)Y/N考题辅助注：考题状态0，在用1，停用表 3-2 考卷（kj）表编号列名数据类型空标记/主键说明1kjbhchar(10)N/Y考卷编号2kjmcvarchar(100)N/N考卷名称3ktbhchar(10)N/N考题编号4ktztbit(1)N/N考卷状态表 3-3 组织考试（zzkx）表编号列名数据类型空标记/主键说明1ksbhchar(10)N/Y考试编号2ksmcvarchar(100)N/N考试名称2kjbhchar(10)N/Y考卷编号3ksxjdatetime(8)N/N考试时间4ksyschar(10)N/N考试用时5ksztbit(1)N/N考试状态6ksxzvarchar(255)Y/N考试须知7ksbjchar(10)N/N考试班级118bzvarchar(255)Y/N备注表 3-4 考生（students）表编号列名数据类型空标记/主键说明1zkzhchar(10)N/Y准考证号2ksxmchar(20)N/N考生姓名3kxmmchar(20)N/N密码4szbjchar(10)N/N所在班级5ksztchar(1)N/N考生状态注：考生状态0，未考试1，已考试2，正在考试表 3-5 考题题型（ktlx）表编号列名数据类型空标记/主键说明1txbhchar(10)N/Y题型编号2txmcchar(20)N/N题型名称3txdlchar(2)N/N题型大类3bzvarchar (255)Y/N题型注释注：题型大类 0，听力1，非听力2，大文本3，非大文本表 3-6 班级（bj）表编号列名数据类型空标记/主键说明1bjbhchar(10)N/Y班级编号2bjmcchar(10)N/N班级名称3bzvarchar (255)Y/N备注表 3-7 成绩（kxcj）表编号列名数据类型空标记/主键说明1zkzhchar(10)N/Y准考证号2kjbhchar(10)N/N考卷编号3kscjchar(10)N/N考生成绩表 3-8 管理员（gly）表编号列名数据类型空标记/主键说明1yhbhchar(10)N/Y用户编号2yhmcchar(20)N/N用户名称3yhmmchar(20)N/N用户密码4yhztbit(1)N/N用户状态5yhglbit(1)N/N用户管理6ksglbit(1)N/N考生管理7sjglbit(1)N/N试卷管理8cjglbit(1)N/N成绩管理129xtglbit(1)N/N系统管理表 3-9 详细成绩（xxcj）表编号列名数据类型空标记说明1zkzhchar(10)N/Y准考证号2ktlxchar(10)N/N考题类型3kscjchar(10)N/N考生成绩表 3-10 考生答案（ksda）表编号列名数据类型空标记说明1zkzhchar(10)N/Y准考证号2kjbhchar(10)N/N考卷编号3ktbhchar(6)N/N考题编号4ktlxchar(10)N/N考题类型5ktnrvarchar(5000)N/N考题内容6ksdavarchar(1000)N/N考生答案表 3-11 系统信息（xtxx）表编号列名数据类型空标记/主键说明1xxmcvarchar(100)N/N系统名称2xtbbvarchar(100)N/N系统版本3xtzzvarchar(100)N/N系统作者4bqxxvarchar(100)N/N版权信息5xtztchar(1)N/N系统状态表 3-12 模拟考卷（mnsj）表编号列名数据类型空标记/主键说明1ktbhchar(10)N/N考题编号2ktlxchar(10)N/N考题题型3ktdlchar(1)N/N考题大类4ktnrvarchar(5000)N/N考题内容5ktdavarchar(1000)N/N考题答案6ktfschar(10)N/N考题分数7ktfzvarchar(1000)N/N考题辅助134 系统实施与测试系统实施与测试从本部分开始就系统各模块的实现过程及系统测试方式进行阐述。网站存储结构图如图 4-1 所示:图 4-1 网站存储结构图4.1 前台考试部分前台考试部分系统的前台部分主要由考试子系统与成绩查询子系统两个部分组成。4.1.1 考试子系统考试子系统考试子系统用于完成正常的英语考试过程，下面按正常流程详述实现的过程：系统加载默认页,如图 4-2 所示:这部分是程序的入口点，无论是考试还是查询成绩都是从这一入口开始。系统首先映入眼帘的就是系统公告及操作选项。其中系统公告用于考试的一些时时消息通知等。选择下面的不同按钮即可登入不同子系统。下面附部分关键源码供参考：%Dim strSql,objRs,strGg,blnZtstrSql=select xtgg,xtzt from xtxx 读取系统公告及系统状态信息Set objRs=Server.CreateObject(ADODB.RecordSet)14objRs.Open strSql,strConn,1,1If objRs.EOF And objRs.BOF ThenResponse.Write 系统数据无法读取，系统加载失败!ElsestrGg=objRs(xtgg)blnZt=objRs(xtzt)End IfobjRs.CloseSet objRs=NothingIf blnZtTrue Then 验证系统状态strGg=系统处于维护状态无法进行正常考试！开启时间另行通知！End If%图 4-2 默认页身份验证接上一页，无论选择的是进入考试还是查询成绩，系统都将导入此模块。这一块主要是完成系统的身份验证工作。输入正确的准考证号及密码，即可以登入系统,如图 4-3 所示：如果输入错误，系统将给出相应的提示信息。如果您不输入用户名或者密码，系统也将给出相应提示。下面附一部分关键源码：/空数据验证脚本15function user_test()if(document.frmSubmit.zkzh.value=)alert(准考证号不能为空);return false;if(document.frmSubmit.ksmm.value=)alert(考生密码不能为空);return false;return true;0 ThenIf strAction=1 ThenstrTitle=考绩成绩查询系统-考生登录strControl=99ElseIf strAction=2 ThenstrTitle=网络英语考试系统-考生登录strControl=88ElseIf strAction=88 Then16intFlag=1strUser=Request(zkzh)strPwd=Request(ksmm)If Len(strUser)=0 Or Len(strUser)=0 ThenResponse.Write alert(系统参数不足,请重新输入!);history.go(-1)End IfstrSql=select * from students where zkzh= & strUser & and ksmm= & strPwd & Set objRs=Server.CreateObject(ADODB.RecordSet)objRs.Open strSql,strConn,1,1If objRs.EOF And objRs.BOF ThenintFlag=0End IfobjRs.CloseSet objRs=NothingIf intFlag1 ThenResponse.Write alert(用户信息验证失败,可能由以下原因造成:n1.无法查找到您所输入的考生信息!n2.考生密码错误！);history.go(-1)ElseSession(zkzh)=strUserResponse.Redirect select_sj.aspEnd IfElseIf strAction=99 ThenblnFlag=TruestrUser=Request(zkzh)strPwd=Request(ksmm)If Len(strUser)=0 Or Len(strUser)=0 ThenResponse.Write alert(系统参数不足,请重新输入!);history.go(-1)17End IfstrSql=select * from students where zkzh= & strUser & and ksmm= & strPwd & and kszt=1Set objRs=Server.CreateObject(ADODB.RecordSet)objRs.Open strSql,strConn,1,1If objRs.EOF And objRs.BOF ThenblnFlag=FalseEnd IfobjRs.CloseSet objRs=NothingIf blnFlag=False ThenResponse.Write alert(用户信息验证失败,可能由以下原因造成:n1.无法查找到您所输入的考生信息.n2.此考生尚未进行考试.n3.此考生进在进行考试.);history.go(-1)ElseSession(zkzh)=strUserResponse.Redirect cjcx.asp?action=1End IfElseResponse.Write alert(传递系统参数非法,系统自动返回!);history.go(-1)End IfElseResponse.Write 系统参数读取失败!Response.EndEnd If%18图 4-3 身份验证试卷选择如果选择了进入考试子模块后，会根据用户状态您选择所能参加的考试。首先与列表中选择一个要参加的考试项目，然后点击选择按钮进行下一步操作，如图 4-4 所示：这里要说明的一点是，系统将在这个部分中检测用户是否已经参加了考试以及考试的状态。下面附一部分关键源码：%读取考试系统，显示在屏幕上。strSql=select * from v_stu_kj where zkzh= & Session(zkzh) & and stuzt1Set objRs=Server.CreateObject(ADODB.RecordSet)objRs.Open strSql,strConn,1,1intCount=0Do While Not objRs.EOFResponse.Write & objRs(ksmc) & intCount=intCount+1objRs.MoveNextLoopIf intCount=0 ThenResponse.Write 目前您没有需要参加的考试！19End If%图 4-4 试卷选择考试须知接着上面的一步，当选择了某一考试项目之后，如果此考试没有参加，那么系统将加载此考试项目的考试须知。当阅读之后，点击开始考试按钮，进行考试，如图 4-5 所示：下面附一部分源码如下：%根据您选择的考试项目，开始提取考试须知strSql=select * from v_stu_kj where zkzh= & Session(zkzh) & and ksbh= & strNoSet objRs=Server.CreateObject(ADODB.RecordSet)objRs.Open strSql,strConn,1,1strXz=objRs(ksxz)strXz=Replace(strXz,chr(13)strXz=Replace(strXz, )Response.Write & strXz & objRs.Close%20图 4-5 考试须知考试主页面当做完以上所有页面，系统将加载考试的主页面。主页面主要由四个部分组成， 如图 4-6 所示：下面分别做介绍。附部分源码：顶部这一部分主要显示考生的相关信息，另外是记录考试时间，进行时间的控制。%读取考生信息Dim strKh,objRs,strSql,strUid,strClassstrKh=Session(zkzh)If Len(strKh)=0 ThenResponse.Write 考生信息丢失,考试无法进行!Response.EndElsestrSql=select * from v_ks_bj where zkzh= & strKhSet objRs=Server.CreateObject(ADODB.RecordSet)objRs.Open strSql,strConn,1,1If objRs.EOF And objRs.BOF ThenResponse.Write 考生信息丢失,考试无法进行!21ElsestrUid=objRs(ksxm)strClass=objRs(bjmc)End IfobjRs.CloseSet objRs=NothingEnd If /系统时间控制函数Dim timerID,timerRunning,time1,now_time,ss_time,remanent_time,shjian shjian= /设置时间timeRunning = falsess_time=0Function AutoSubmit()remanent_time=shjianStartAuto()End FunctionFunction StartAuto()If ss_time=0 Thenss_time=59remanent_time=remanent_time-1now_time =TimeSerial(0,remanent_time,0)Elsess_time=ss_time-1End Iftime1=FormatDateTime(now_time,4)If ss_time#00:10:30# ThentimerID = setTimeout(StartAuto(),1000)window.status=欢迎使用网络英语考试系统，考试正在进行中！ElseIf CDate(time1)#00:10:00# Thenclock.style.color = #ff0000timerID = setTimeout(StartAuto(),1000)ElseIf cdate(time1)#00:00:00# thenwindow.status=考试还剩最后几分钟，请您抓紧时间！timerID = setTimeout(StartAuto(),1000) Else alert(考试时间到，考试结束！)window.status=结束时间！ window.Parent.frames(leftFrame).frmSend.submit()End IfEnd Function左侧这一部分显示您选择试卷的题型列表，当您选择了相关的链接之后，将加载相关类型蝗试题。%读取数据库生成题类列表 Set objRs=Server.CreateObject(ADODB.RecordSet)strSql=select txbh,txmc from ktlx where txbh in (select distinct ktlx from & Session(kjcc) & )objRs.Open strSql,strConn,1,123Do While Not objRs.EOFResponse.Write Response.Write Response.Write & objRs(txmc) & Response.Write Response.Write objRs.MoveNextLoopobjRs.CloseSet objRs=Nothing %底部这部分主要用来显示系统的相关版权信息及一些实时消息右侧这是系统的主体的部分，试题查看及答案的录入都在这部分完成。另外答题的内容也通过上面的保存按钮来实现。%加载考题，保存答案If intAction=1 Then 首次提取数据strSql=select * from kssda where zkzh= & strKh & and kjcc= & strNo & and ktlx= & strLxSet objRs=Server.CreateObject(ADODB.RecordSet)objRs.Open strSql,strConn,1,1If objRs.EOF And objRs.BOF ThenobjRs.ClosestrSql=select * from & strNo & where ktlx= & strLx & objRs.Open strSql,strConn,1,124Do While Not objRs.EOFResponse.Write & objRs(ktnr) & Response.Write 请输入您认为正确的答案：objRs.MoveNextLoopobjRs.CloseElseobjRs.ClosestrSql=select * from v_ks_se_da where kjcc= & Session(kjcc) & and ktlx= & Session(ktlx) & and zkzh= & Session(zkzh) & objRs.Open strSql,strConn,1,1Do While Not objRs.EOFResponse.Write & objRs(ktnr) & Response.Write 请输入您认为正确的答案：objRs.MoveNextLoopobjRs.CloseEnd IfstrSql=select * from kssda where zkzh= & strKh & and kjcc= & strNo & and ktlx= & strLxobjRs.Open strSql,strConn,1,1If objRs.EOF And objRs.BOF ThenobjRs.ClosestrSql=insert into kssda select & Session(zkzh) & as zkzh, & strNo & as 25kjcc,ktbh, & strLx & , as ksda from & strNo & where ktlx= & strLxobjRs.Open strSql,strConn,1,3End IfResponse.Write Response.Write Set objRs=NothingElseIf intAction=2 Then 保存数据保存strSql=select ktbh from & Session(kjcc) & where ktlx= & Session(ktlx)Set objRs=Server.CreateObject(ADODB.RecordSet)objRs.Open strSql,strConn,1,1strSql=Do While Not objRs.EOFstrSql=strSql & update kssda set ktda= & Request(an & Trim(objRs(ktbh) & where zkzh= & Session(zkzh) & and ktlx= & Session(ktlx) & and kjcc= & Session(kjcc) & ;objRs.MoveNextLoopobjRs.CloseobjRs.Open strSql,strConn,1,3重新检索数据strSql=select * from v_ks_se_da where kjcc= & Session(kjcc) & and ktlx= & Session(ktlx) & and zkzh= & Session(zkzh) & objRs.Open strSql,strConn,1,1Do While Not objRs.EOFResponse.Write & objRs(ktnr) & Response.Write 请输入您认为正确的答案：objRs.MoveNextLoopobjRs.CloseResponse.Write alert(保存成功！)End IfSet objRs=Nothing%图 4-6 考试主界面完成考试在确定已经完成所有试题之后，提交即完成考试，如图 4-7 所示：这里需要指出的是，在系统时间用尽的时候，系统将自动锁定系统完成这一工作。附部分源码：%完成考试，清除用户变量Response.Write 正在处理中，请稍候!考生信息区及时间记数区题类列表版权信息等考试主体部分27Dim strSql,objRsstrSql=update stud_ks set stuzt=1 where zkzh= & Session(zkzh) & and ksbh= & Session(ksbh)Set objRs=Server.CreateObject(ADODB.RecordSet)objRs.Open strSql,strConn,1,1strSql=insert into kscj(zkzh,ksbh,kscj,cjzt) values( & Session(zkzh) & , & Session(ksbh) & ,0,0)objRs.Open strSql,strConn,1,1Set objRs=NothingSession.Abandon()Response.Write alert(考试结束!再见!); window.opener=false;window.close();%图 4-7 完成考试4.1.2 成绩查询子系统成绩查询子系统这一部分完成考生成绩的前台查询工作。用户验证与考试子系统相同，这一部分还是需要进行考生信息的验证工作，如图 4-8 所示：28图 4-8 用户验证选择考试项目这一部分与考试子系统类似，需要考生选择要查看的考试成绩的选项。当选择一项之后，按查询键开始查询数据。在这里面对于考生是否考试进行验证，如图 4-9 所示：附部分源码如下：%考试信息读入与验证Dim intCintC=0Do While Not objRs.EOFResponse.Write & objRs(ksmc) & intC=intC+1objRs.MoveNextLoopobjRs.CloseSet objRs=NothingIf intC=0 ThenResponse.Write 未发现任何考试供你选择!End If29%图 4-9 考试项目%成绩输出,如图 4-10 所示:strSql=select * from v_ks_xx_cj where zkzh= & strZkzh & and ksbh= & Request(ksbh)Set objRs=Server.CreateObject(ADODB.RecordSet)objRs.Open strSql,strConnDo While Not objRs.EOF Response.Write Response.Write & objRs(txmc) & Response.Write & objRs(lxcj) & 分 Response.Write objRs.MoveNextLoopobjRs.CloseSet objRs=Nothing%30图 4-10 成绩输出/控制是否显示详细成绩，如图 4-11 所示：function display()if(document.all.item(chkXX).checked=true)document.all.item(xx).style.display=block;elsedocument.all.item(xx).style.display=none;图 4-11 详细成绩输出314.2 后台管理部分后台管理部分这一部分就后台管理部分做相关说明后台管理是这个系统工作量比较大的一个部分，其中包括大量的操作技巧，可以做为系统的一个亮点来看待。用户登录同前台子系统类似，这里不再说明主界面如下图这是完整的后台管理系统界面，从中不难看到。后台系统主要分成两个部分：左列表级右主体。左侧用于用户选择所要进行的操作，右侧是系统的主体部分，所有操作都在这里面进行响应及处理。系统功能如图 4-12 所示，下面详细介绍。图 4-12 模块组成附菜单处理脚本function aa(Dir)tt.doScroll(Dir);Timer=setTimeout(aa(+Dir+),100)/这里 100 为滚动速度function StopScroll()if(Timer!=null)clearTimeout(Timer)function initIt()divColl=document.all.tags(DIV);for(i=0; idivColl.length; i+) whichEl=divColl(i);if(whichEl.className=child)whichEl.style.display=none;32function expands(el) whichEl1=document.getElementById(el+Child);if (whichEl1.style.display=none)initIt();whichEl1.style.display=block;elsewhichEl1.style.display=none;var tree= 0;function loadThreadFollow()if (tree=0)tree=1function showsubmenu(sid)tryvar whichEl = document.getElementById(submenu + sid);var imgmenu = document.getElementById(imgmenu + sid);if (whichEl.style.display = none)for( i=1;i=6;i+)whichEl = document.getElementById(submenu + i);imgmenu = document.getElementById(imgmenu + i);if(whichEl.style.display = )document.getElementById(submenu + i).style.display=none;imgmenu.background=images/menudown.gif;33document.getElementById(submenu + sid).style.display=;imgmenu.background=images/menudown.gif;elsedocument.getElementById(submenu + sid).style.display=none;imgmenu.background=images/menudown.gif;catch(e)var str=location.href;var hrefNum= str.indexOf(?);showsubmenu(str.substring(hrefNum+1,str.length);图 4-13 系统说明主界面34考生信息管理这一部分主要完成考生信息的录入及维护工作，菜单及相关界面，如图 4-14 所示：图 4-14 考生信息管理考生信息查询与修订这一部分主要是用来显示考生的相关信息列表，并通过操作项进行相关处理，如图 4-15所示。附部分源码：%列出考生相关信息列表strSql=select * from v_ks_bjobjRs.Open strSql,strConn,1,1Do While Not objRs.EOF Response.Write Response.Write & objRs (zkzh) & Response.Write & objRs(ksxm) & Response.Write & objRs(ksmm) & Response.Write & objRs(bjmc) & If objRs(kszt)=True Then Response.Write 启用ElseResponse.Write 禁用End IfIf intAction=3 ThenResponse.Write 修改/删除 ElseResponse.Write 无End IfResponse.Write objRs.MoveNextLoopobjRs.Close%图 4-15 考生的相关信息列表考生信息录入这一部分主要完成考生信息的录入工作，如图 4-16 所示。其中还包括了考生信息的修改与保存模块。%完成数据的增加，修改工作Dim objRs,intAction,strNo,strXm,strMm,strBj,strZtintAction=Request(action)Set objRs=Server.CreateObject(ADODB.RecordSet)If intAction=4 Then 增加保存36strNo=Request(no)strXm=Request(ksxm)strMm=Request(ksmm)strBj=Request(szbj)strZt=Request(kszt)strSql=select * from studentsobjRs.Open strSql,strConn,1,3objRs.AddNewobjRs(zkzh)=strNoobjRs(ksxm)=strXmobjRs(ksmm)=strMmobjRs(szbj)=strBjobjRs(kszt)=strZtobjRs.UpDateobjRs.CloseSet objRs=NothingResponse.Write alert(数据操作成功!); document.location. href =ks_add.asp?action=1Response.EndElseIf intAction=1 Then增加数据strSql=select max(zkzh)+1 as bb from studentsobjRs.Open strSql,strConn,1,1strNo=objRs(bb)objRs.CloseintAction=4ElseIf intAction=2 Then修改数据 strNo=Request(no)37strSql=select * from students where zkzh= & strNoobjRs.Open strSql,strConn,1,1strXm=objRs(ksxm)strMm=objRs(ksmm)strZt=objRs(kszt)strBj=objRs(szbj)objRs.CloseintAction=3ElseIf intAction=3 Then修改保存strNo=Request(no)strXm=Request(ksxm)strMm=Request(ksmm)strBj=Request(szbj)strZt=Request(kszt)strSql=select * from students where zkzh= & strNoobjRs.Open strSql,strConn,1,3objRs(ksxm)=strXmobjRs(ksmm)=strMmobjRs(szbj)=strBjobjRs(kszt)=strZtobjRs.UpdateobjRs.CloseSet objRs=NothingResponse.Write alert(数据操作成功!); document.location. href =ks_list.asp?action=3Response.EndElseResponse.Write 系统操作异常，请重试！38Response.EndEnd If%图 4-16 考生信息的录入管理员信息管理这一部分主要完成对后台用户的管理工作。包括的模块如图 4-17 所示：图 4-17 管理员信息管理用户信息查询与修订，如图 4-18 所示：图 4-18 用户信息查询与修订39用户信息录入，如图 4-19 所示%生成权限列表部分If blnKs=True ThenResponse.Write 考生信息管理ElseResponse.Write 考生信息管理End IfIf blnYh=True ThenResponse.Write 管理员信息管理ElseResponse.Write 管理员信息管理End IfIf blnSj=True ThenResponse.Write 试卷信息管理ElseResponse.Write 试卷信息管理End IfIf blnZz=True ThenResponse.Write 组织考试ElseResponse.Write 组织考试40End IfIf blnCj=True ThenResponse.Write 考生成绩管理ElseResponse.Write 考生成绩管理End IfIf blnXt=True ThenResponse.Write 系统信息设置ElseResponse.Write 系统信息设置End If%图 4-19 用户信息录入试卷信息管理这部分涉及到的内容比较多，主要包括的模块如图 4-20 所示：41图 4-20 试卷信息管理试题录入，如图 4-21 所示：图 4-21 试题录入试题查询与修订如图 4-22 所示：图 4-22 试题查询与修订42试卷生成如图 4-23 所示：图 4-23 试卷生成43试卷查询与修订如图 4-24 所示：图 4-24 试卷查询与修订组织考试本部分负责考试项目的创建与修订工作如图 4-25 所示：图 4-25 组织考试考试创建如图 4-26 所示：%读取考卷信息 strSql=select * from kssj objRs.Open strSql,strConn,1,1 Do While Not objRs.EOF If objRs(kjbh)=strKj Then Response.Write & objRs(kjmc) & ( & objRs(kjcc) & )ElseResponse.Write & objRs(kjmc) & ( & objRs(kjcc) & )End IfobjRs.MoveNext44 Loop objRs.Close %图 4-26 创建考试考试查询与修订%列出考卷信息如图 4-27 所示：strSql=select * from v_zz_ksobjRs.Open strSql,strConn,1,1Do While Not objRs.EOF Response.Write Response.Write & objRs(ksbh) & Response.Write & objRs(ksmc) & Response.Write & objRs(kjmc) & ( & objRs(kjcc) & ) Response.Write & objRs(ksxj) & Response