华南农业大学综合测评系统

【中文题名】 学生综合测评系统【英文题名】 Student comprehensive evaluation system 【作者】 陈永东第一作者：陈永东 男 华南农业大学; 蔡捷飞；陈敏锋【导师】 曹咏；【所在单位】华南农业大学; 【中文关键词】 管理信息系统; 综合测评; 网络; 【英文关键词】 management information system; comprehensive evaluation; network; 【中文摘要】 学生综合测评系统是一个利用计算机网络，实现学生综合测评信息的提交，审核和公布的MIS。该系统减少管理上的工作量，增加测评的透明度，使得学生可以通过网络提交测评的相关信息，管理员可以轻松快捷的查找每一位学生或每一个学院在学生综合测评系统的情况，更可以快速统计学生综合测评的结果。系统使用ASP.NET技术编写，数据库使用SQL SERVER 2000。【英文摘要】 Student comprehensive evaluation system is a management information system that enables users to submit audit and announce information of comprehensive evaluation via computer network. The system reduces workload and improves transparency of the valuating process. With the system, students are able to submit related information while administrators can search and read appraisal situation of any student from any faculty easily and quickly. Further more, it even shows up result of statistics of the student comprehensive evaluation in a short time. The system is developed with the technology of ASP.NET and the database of it is SQL SERVER 2000.目录1 前言31.1华南农业大学综合测评情况现状及前景31.2 综合测评MIS应用的研究及本文研究内容32 基于ASP.NET的综合测评MIS32.1 系统简介32.2 系统开发意义42.3 系统功能分析43 系统开发的基本原理53.1 综合测评MIS体系结构53.1.2 综合测评MIS网络结构63.2 数据接口73.2.1外部接口73.2.2内部接口74 系统的硬件环境75 系统设计85.1 面向对象、可视化编程85.2 软件界面设计85.3 数据处理流程155.4 数据库设计175.5 数据操作的实现226 结论及发展方向266.1 结论266.2 发展方向261 前言MIS（Management Information Systems）意为管理信息系统。20世纪70年代初随着数据库技术、网络技术的发展，计算机在信息管理上的应用日益广泛。管理信息系统成为信息管理的一个有力工具。ASP.NET（Activities Server Page dot NET）意为动态服务器页.NET开发平台。是由Microsoft（微软）公司倡议的一种动态网页技术。ASP.NET提供了迄今为止最先进的Web开发平台。它是一个已编译的，基于.NET的开发环境。利用ASP.NET开发MIS系统充分利用.NET平台网络性能好的特点，是新一代B/S结构MIS系统的最为流行的开发方法。通过利用ASP,NET开发综合测评系统可有效减少综合测评工作量，提高准确性，并可提供较好的性能。1.1华南农业大学综合测评情况现状及前景我校的学生综合测评管理还处于手工阶段。缺少一套实用可靠的设备和管理系统软件。手工管理出现综合测评时需要占用大量课室资源，占用大量同学的许多学习时间，并在统计过程中容易出错等等弊端。随着无纸化办公的一步步完善，利用计算机管理系统管理我校的学生综合测评势在必行。 1.2 综合测评MIS应用的研究及本文研究内容本文的研究方向是利用ASP.NET技术开发MIS,并使用ADO.NET技术连接SQL Server数据库,实现华南农业大学综合测评系统。2 基于ASP.NET的综合测评MIS2.1 系统简介大学学生综合测评是高等院校管理的核心之一，是高等院校为了实现对优秀学生进行相应的管理。为实现对高等院校的高效管理，本系统要求建立一个以华南农业大学学生综合测评为核心，以该系统中数据流为基础的管理信息系统，总体目标是实现各种信息的系统化、规范化和自动化，实现高等院校管理信息查询、统计、汇总和分析决策的计算机系统管理。2.2 系统开发意义学生综合测评系统所需设备安排与设备管理模式将发生一次改革。大大减少管理上的工作量，也使学生综合测评工作的情况更加明朗。管理员可以轻松快捷的查找每一位学生或每一个学院在学生综合测评系统的情况，更可以快速统计学生综合测评的结果。所以，开发这样一个基于ASP.NET的综合测评MIS，具有广阔的应用前景。2.3 系统功能分析2.3.1本软件主要提供以下基本功能：浏览功能、查询功能、添加功能、删除功能、审核功能。2.3.2本软件由以下大学生综合测评管理系统、查询系统、技术维护系统、权限、备份和恢复等几大功能组成。学生管理系统： 查询系统：用户可以根据自己的需要，在自己的的权限内，根据特定的查询条件很方便的查询该系统内学生相关管理数据。技术维护信息：使用于技术部，记录学生信息,本模块根据具体情况进行编码,记录学生的全面信息, 便于学生处对学生信息的管理和学院的联系.权限：设置权限登陆，只有合法权限人才可以登陆使用该系统，防止非法用户偷窃本系统数据、破坏本系统数据。还可以根据具体情况进行帐户的新增,修改和删除,审核：二次测评小组跟学院以及学院、思教科都有审核权，其中学院、思教科权限最高。主页历年综合素质测评本年度综合素质测评同学互评班委复查个人自评教务员复查教务员查看窗口学生查看窗口基础分各项加分各项加分条件最后统计基础分复查各项加分复查各项加分条件复查最后统计复查基础分复评各项加分复评各项加分条件复评最后统计复评对前40%同学的复查对所有同学的复查加分资料的复查最后名单的确定提交人综合素质测评资料所有学生综合测评资料获奖学生综合测评资料加分资料列表图13 系统开发的基本原理3.1 综合测评MIS体系结构“基于ASP.NET的综合测评MIS系统”是以华南农业大学综合测评流程为基础的，所以首先要了解综合测评的数据处理流程以及综合测评MIS系统的网络结构。3.1.1数据处理流程通过对软件需求说明对软件需求的分析，可以知道华南农业大学学生综合测评系统基本工作，即是执行学生自评、互评的动作和记录的信息；各学院的审核和修改的信息。故华南农业大学学生综合测评系统的最佳方案设置为以下处理流程：制定评分细则则思教科学院学院审核审核结果绩点统计结果统计审核并修改二次测评小组自评学生学生/自评结果二次测评结果 一次测评结果评分细则一次测评初步自评结果图23.1.2 综合测评MIS网络结构综合测评MIS采用当前最流行的B/S架构设计，使用三层式总体架构。数据库ASP.NET综合测评MISADO.NET数据库工程图33.2 数据接口3.2.1外部接口所谓的系统外部接口即人机交互的用户界面，考虑到简易性、实用性、美观性、友好性，考虑操作系统图形界面对人机交互界面的影响等，用户界面实现在INTERNET的浏览器窗口上。3.2.2内部接口系统各模块通过处理数据进行通信。要求运行于Windows2000及更高版本具有WIN32 API的操作系统之上。4 系统的硬件环境PC机800x600以上彩色显示器128M以上内存4G以上硬盘软盘启动器5 系统设计5.1 面向对象、可视化编程“基于ASP.NET的综合测评MIS系统”采用Microsoft公司推出的VisualStudio.NET 2003为开发工具。以VB为编程语言提供了一个面向对象、可视化编程的快速应用程序开发环境，使用VisualStudio.NET 2003可以用最少的程序代码撰写各类Web应用程序。所以本系统的开发选用了C+ Builder 6.0作为开发工具。5.2 软件界面设计用户界面是系统与用户之间的接口，也是控制和选择信息输入输出的主要途径。在软件界面的设计上，应尽量坚持友好、简便、实用、易于操作的原则。5.2.1学生登陆进入综合测评系统，登陆的用户分为四大类,分别是学生，思教科，学院教务员，以及二次测评小组。 选择“学生”类别，进入如下界面。图45.2.2思教科 成功登陆后，进入以下界面（见下图） 图 留言的查看和编写 在主页里点击“更新留言”，即可看到学生发给教务员的留言（如下图）。图6点击“编写留言”，进入编写界面如下 图 审核 点击“思教科审核”，进入如下界面（见下图） 图8在这里，思教科的老师可通过各种不同的方法查看学生的综合测评情况返回查询的内容后，在表格的每一行第一列中都会出现“查看”的字样，点击“查看”便可看到对应行的学生的二评意见（如下图）。 图95.2.3 学院 教务员成功登陆后，进入学院的主页（见下图）。 图 总分统计 点击“总分统计”，进入“总操行分统计“（如下图）。 图11在该界面，教务员可以对整个学院的学生分别进行成绩统计，总操行分排序，绩点排序，英语分数排序，总分排序。 审核图12 在这里，教务员可通过各种不同的方法查看学生的综合测评情况并进行评奖.返回查询的内容后，在表格的每一行第一列中都会出现“查看”的字样，点击“查看”便可看到对应行的学生的二评意见（如下图）在下拉框中选择相应的奖项，点击“评奖”，就可以对该学生进行评奖了。图135.2.4二评小组按登陆键，进入下面界面： 图 点击要查看的学生的学号前的“查看”按键 则可以查看该学生的详细的资料，点击资料下的下拉菜单，选择你的审核结果。提交时按“审核”键图点击“二次测评”进入以下界面该界面只显示本班的学生学号，选择学号后按“确定”键进入互评内容。图 进入对所选择学生的“二次测评”界面 图 点击“统计互评总分”按键进入以下界面，可以查看互评总分的统计结果。页面下方的留言部分： 图18图19编写完毕后按“提交”键提交，如有问题按“返回”键返回对该留言栏目中的留言点击“删除留言”可以删除过期信息图205.3 数据处理流程5.3.1学生自评模块处理流程图 图215.3.2学生互评模块流程图 图225.3.3学生留言管理模块流程图图235.3.4互评统计模块流程图图245.3.5思教科审核模块图255.4 数据库设计5.4.1数据的逻辑描述静态数据suser用户表,存放各种用户信息,主键为userid，包括用户ID、密码、权限、单位。（suser_ID (用户ID)、suser_pwd (密码)、suser_qx (权限)、suser_dw (单位)） 表1Xz_mc，细则主体表，包括评分细点，评分细则 表动态输人数据数据库设计Student表，主键sno ，存放学生各种信息，包括学号、学院、班级、姓名、性别、年龄 、自评统计、互评统计、二评统计、二评意见、总操行分、绩点、总分、英语分数、获奖情况、用户登录密码等。（sno (学号)、sdepart(学院)、sclass(班级)、sname(姓名)、ssex(性别)、sage(年龄) 、zptj(自评统计)、hptj(互评统计)、eptj(二评统计)、epyj(二评意见)、zcxf(总操行分)、jd(绩点)、zhf(总分)、yyfs(英语分数)、hj(获奖情况)、pwd(用户登录密码)） 表3Zpb，自评表，主键为zp_sno储存自评时产生的各种分数，自评意见，以及总分。包括学号，政治态度，思想修养、学习态度、法纪观念、集体主义观念、社会实践、体育锻炼以及各自对应的自评意见（zp_sno(学号)、zp_zztd (政治态度)，zp_zztdyj(政治态度)、zp_sxxy(思想修养)、zp_sxxyyj(思想修养意见) 、 zp_xxtd(学习态度)、zp_xxtdyj (学习态度意见)、 zp_fjgn(法纪观念)、zp_fjgnyj(法纪观念意见)、zp_jtzy(集体主义观念)、 zp_jtzyyj (集体主义观念意见)、 zp_shsj(社会实践)、zp_shsjyj(社会实践意见)、zp_tydl(体育锻炼) 、zp_tydlyj(体育锻炼意见)） 表4Hpb ，互评表，主键为（pf_sno ，bp_sno）即评分人学号及被评人学号，存放互评时产生的各种分数，以及意见。包括评分人学号，被评人学号、政治态度，思想修养、学习态度、法纪观念、集体主义观念、社会实践、体育锻炼以及各自对应的互评意见 表动态输出数据Student表中数据如zptj,hptj,eptj,均由其他表动态计算获得5.4.2逻辑结构设计二次测评E-R图 图26互评图27自评图28思教科审核图29学院教务员审核图30测评E-R图图315.5 数据操作的实现5.5.1 student_login.aspx学生登录时初始化DataGrid自定义函数代码Sub MyDataGrid_SelectedIndexChanged(Sender As Object, E As DataGridCommandEventArgs) Dim conn As SqlConnectionconn = New SqlConnection(ConfigurationSettings.AppSettings(SQLCONNECTIONSTRING).ToString() Dim MyCommand As SqlCommand 删除用户选择的内容,把字段message_ID传递过来 Dim DeleteCmd As String = DELETE from message_feedback where message_ID like message_ID MyCommand = New SqlCommand(DeleteCmd, conn) MyCommand.Parameters.Add(New SqlParameter(message_ID, SqlDbType.NVarChar, 11) MyCommand.Parameters(message_ID).Value = MyDataGrid.DataKeys(E.Item.ItemIndex) MyCommand.Connection.Open() Try MyCommand.ExecuteNonQuery() msg.text = 已删除记录 & DeleteCmd msg.Visible = True Catch Exc As SQLException msg.text = 错误：未能删除记录 msg.Visible = True End Try MyCommand.Connection.Close() conn.close() BindGrid()End Sub5.5.2 ziping.aspx页中实现学生自评信息更新的自定义函数。 更新自评表zpb里与登陆用户相关的自评信息 Sub dlstAuthors_UpdateCommand(ByVal s As Object, ByVal e As DataListCommandEventArgs) Dim conPubs As SqlConnection Dim strUpdate As String Dim cmdUpdate As SqlCommand Dim strAuthorID As String Dim xzfs As TextBox Dim xzid As TextBox Dim xzyj As TextBox strAuthorID = dlstAuthors.DataKeys(e.Item.ItemIndex) xzfs = e.Item.FindControl(xzfs) xzyj = e.Item.FindControl(xzyj) xzid = e.Item.FindControl(xzid) conPubs = New SqlConnection(ConfigurationSettings.AppSettings(SQLCONNECTIONSTRING).ToString() strUpdate = Update zpb Set zp_ & xzid.Text.ToString().Trim & =xzfs,zp_ & xzid.Text.ToString().Trim() & yj=xzyj,zp_IPadress =zp_IPadress,zp_time=zp_time Where zp_sno like & Session(usrID) & cmdUpdate = New SqlCommand(strUpdate, conPubs) cmdUpdate.Parameters.Add(authorID, strAuthorID) cmdUpdate.Parameters.Add(xzyj, xzyj.Text) cmdUpdate.Parameters.Add(xzfs, xzfs.Text) cmdUpdate.Parameters.Add(New SqlParameter(zp_IPadress, SqlDbType.Char) cmdUpdate.Parameters(zp_IPadress).Value = Request.UserHostAddress cmdUpdate.Parameters.Add(New SqlParameter(zp_time, SqlDbType.DateTime) cmdUpdate.Parameters(zp_time).Value = Now() conPubs.Open() cmdUpdate.ExecuteNonQuery() conPubs.Close() dlstAuthors.EditItemIndex = -1 调用binddatalist以显示细则,调用binddatagrid以显示用户自评的结果信息 BindDataList() binddatagrid() End Sub5.5.3 huping.aspx中实现互评数据插入的自定义函数实现插入到数据库中 Sub dlstAuthors_UpdateCommand(ByVal s As Object, ByVal e As DataListCommandEventArgs) Dim conPubs As SqlConnection Dim strUpdate As String Dim cmdUpdate As SqlCommand Dim strAuthorID As String Dim xzfs As TextBox Dim xzid As TextBox Dim xzyj As TextBox strAuthorID = dlstAuthors.DataKeys(e.Item.ItemIndex) xzfs = e.Item.FindControl(xzfs) xzyj = e.Item.FindControl(xzyj) xzid = e.Item.FindControl(xzid) conPubs = New SqlConnection(ConfigurationSettings.AppSettings(SQLCONNECTIONSTRING).ToString() 插入到hpb中,实现互评功能 strUpdate = Update hpb Set hp_ & xzid.Text.ToString().Trim() & =xzfs,hp_ & xzid.Text.ToString().Trim() & yj=xzyj,pf_IPadress =pf_IPadress,hp_time =hp_time Where pf_sno like & Session(usrID) & and bp_sno like & Session(bp_sno) & cmdUpdate = New SqlCommand(strUpdate, conPubs) cmdUpdate.Parameters.Add(authorID, strAuthorID) cmdUpdate.Parameters.Add(xzyj, xzyj.Text) cmdUpdate.Parameters.Add(xzfs, xzfs.Text) cmdUpdate.Parameters.Add(New SqlParameter(pf_IPadress, SqlDbType.Char) cmdUpdate.Parameters(pf_IPadress).Value = Request.UserHostAddress cmdUpdate.Parameters.Add(New SqlParameter(hp_time, SqlDbType.DateTime) cmdUpdate.Parameters(hp_time).Value = Now() conPubs.Open() cmdUpdate.ExecuteNonQuery() conPubs.Close() dlstAuthors.EditItemIndex = -1 BindDataList() binddatagrid() zp_binddatagrid() End Sub Sub BindDataList() 显示测评规则,从数据表xz_nr(细则内容)中查找细则并把标题和字段显示在用户界面上. Dim conPubs As SqlConnection Dim cmdSelect As SqlCommand Dim dtrAuthors As SqlDataReader conPubs = New SqlConnection(ConfigurationSettings.AppSettings(SQLCONNECTIONSTRING).ToString() cmdSelect = New SqlCommand(Select xzID, xzmc, xznr From xz_nr , conPubs) conPubs.Open() dtrAuthors = cmdSelect.ExecuteReader() 在ID为dlstAuthors的datagrid中显示查找出的细则信息. dlstAuthors.DataSource = dtrAuthors dlstAuthors.DataBind() dtrAuthors.Close() conPubs.Close() End Sub Sub BindDataList() 显示测评规则,从数据表xz_nr(细则内容)中查找细则并把标题和字段显示在用户界面上. Dim conPubs A