当前位置:首页 > 免费毕业设计
-
【免费毕设】JAVA语言考试系统的设计与实现(论文+源代码+文献综述+外文翻译+开题报告)
- 网站价格: 10 元
- 特殊技术: 动态语言
- 作品类型: 计算机毕业设计论文
- 售后服务: 无
联系方式: 微信：biyebang QQ: 629001810
作品详情
目录：
系统设计
当今世界，社会和经济的发展对信息资源、信息技术和信息产业的依赖程度越来越大，信息化是世界各国发展经济的共同选择。我国也已把加快国家经济信息化提到重要日程。西方国家在普及计算机知识，全方位、多层次地培养各行各业计算机应用人员方面，有许多经验值得我们借鉴，其中一条就是开展全国范围的定期的计算机各类等级考试。为了适应我国必须尽快实现国家经济信息化，提高全社会的计算机应用水平，使我国的计算机应用与国际社会接轨的形势的要求，在我国也已经设立或引进了各类计算机考试。国家教委组织的"全国计算机等级考试"就是一种。等级考试除了理论考以外，很重要的一部分是上机操作，也就是在指定的时间里完成指定的计算机基本操作，按给定要求编写、调试程序。上机考试与传统的考试相比，它最大限度排除了人为因素的作用，保证了考试的客观性；考生在考试之后，一般就能够得到成绩，使考试具有实时性；而且通过计算机改卷，标准一致，具有最佳的可靠性。同时，还可以考查考生的实际动手操作能力。 系统实现 该考试系统用Microsoft Visual Basic.NET进行开发，数据库采用SQL Server 2000。由于系统采用三层结构，即数据库服务器、Web服务器、客户浏览器，为了实现可用子网内的任何一台服务器作为数据库服务器的需求，本系统采用Web服务技术，即把Web服务装在Web服务器中，通过访问Web服务来进行数据库的访问。下面分别对Microsoft Visual Basic.NET、SQL Server 2000和Web服务技术进行介绍。 该考试系统主要有6个模块构成，包括题库管理模块、身份验证模块、各类试题模块、监考管理模块、阅卷模块、缺考统计模块。各模块关系如图1所示。下面分别介绍这6个模块。 题库管理模块实现了试题管理与试卷形成功能。试题的管理主要包括试题编辑、试题修改。在该考试系统中，预计准备20套选择题、填空题、判断题、程序分析题和程序设计题，每套的题目都是事先定好的。每套试卷形成时，随机抽取各类试题的题号，可能两次抽到相同题号试题的概率是比较大的，但每次试题的顺序都是打乱的，以减少出现重复试卷的概率。 考生登录系统时，需要输入准考证号，根据准考证号到相应的数据库表（这里是“考生信息表”）中查找是否有该考生存在。如果有此准考证号，表示存在该考生，显示该考生的姓名；否则提示“没有该考生信息，请确认后重新输入”。当已经确认存在该考生时，还需要判断该考生是否第一次进入系统，如果是第一次，则进行组题，抽取题号；如果不是第一次，则进入另一个页面，要求输入重做密码，直到密码输入正确才能进入考试界面，并且考试的试题内容与顺序都和上次进入时的一样。重做密码是在考生第一次进入系统时获得的。 1） 选择题模块 初次进入选择题界面时，显示第一个题目的内容。可以用“上题”、“下题” 按钮来选择不同的题目，在选择“上题”或“下题”前，先要记录下本题的答案（在客户端执行）。可以用“保存”按钮来上传答案，即把考生的答案写入回收表reclaim中（在服务器端执行）。 2）判断题模块、概念填空题模块、程序填空题模块同上。 3）程序调试题模块 同样可以用“上题”、“下题” 按钮来选择不同的题目。可以用“下载”按钮来建立程序调试题存放的文件夹，并下载题目（是一个压缩文件）；通过“上传”按钮把最终结果上传到指定的目录。 4）程序设计题模块同上
3．2 考试系统的构成模块
3．2．1 题库管理模块
3．2．2身份验证模块
3．2．3各类试题模块
4．1．1 在Access中读二进制字段主要代码如下： Dim PictureCol As Integer = 0 Dim cn As New OleDbConnection(OleConnection) Dim cmd As New OleDbCommand() cmd.CommandText = "SELECT chengxtsda FROM result WHERE id='" & idnumber & "'" Dim dr As OleDbDataReader = cmd.ExecuteReader() dr.Read() Dim b(dr.GetBytes(PictureCol, 0, Nothing, 0, Integer.MaxValue) - 1) As Byte dr.GetBytes(PictureCol, 0, b, 0, b.Length) Dim fs As New System.IO.FileStream(DestFilePath,IO.FileMode.Create, IO.FileAccess.Write) fs.Write(b, 0, b.Length) 4．1．2 在SQL Server中读取二进制信息主要代码如下： Dim myconnection As SqlConnection = New SqlConnection(StrConnection) Dim myCommand As SqlCommand = New SqlCommand() Dim sqlrd As SqlDataReader myCommand.CommandText = "SELECT " & field & " FROM " & table & " WHERE id='" & thnumber & "'" sqlrd = myCommand.ExecuteReader(CommandBehavior.SingleRow) Dim bytedata() As Byte While sqlrd.Read() If Not (sqlrd.IsDBNull(0)) Then bytedata = sqlrd.GetValue(0) readblob = bytedata End If End While
biyebang
QQ：629001810
