信息办公自动化毕业论文LG GROUP system office room 【LGA16H-LGYY-LGUA8Q8-LGA162】郑州牧业工程高等专科学校毕业设计题目：学生信息管理系统的开发与应用作者：学号：系：信息工程系08级专业：信息管理办公自动化指导者：(姓名) (专业技术职务)评阅者：(姓名) (专业技术职务)2011 年 5 月毕业设计中文摘要毕业设计外文摘要目录1 系统概述…………………………………………………………………………………研发背景……………………………………………………………………………课题研发的目的与意义………………………………………………………………可行性分析……………………………………………………………………………系统简介………………………………………………………………………………1.4.1系统介绍…………………………………………………………………………1.4.2模块简介…………………………………………………………………………1.4.3数据库设计………………………………………………………………………2 登录界面…………………………………………………………………………………用户登录………………………………………………………………………………3．学生信息管理……………………………………………………………………………… 3．1 学生基本信息浏览……………………………………………………………… 3．2 学生基本信息查询…………………………………………………………………3．3 学生基本信息编辑…………………………………………………………………4．课程信息管理……………………………………………………………………………… 4．1 课程信息查询………………………………………………………………………4．2 课程信息编辑………………………………………………………………………5．成绩管理…………………………………………………………………………………… 5．1 成绩浏览……………………………………………………………………………5．2 成绩查询……………………………………………………………………………5．3 成绩编辑……………………………………………………………………………6．添加信息管理……………………………………………………………………………… 6．1 成绩添加………………………………………………………………………6．2 课程添加……………………………………………………………………结论致谢参考文献第一章引言1．1 系统研发的背景随着神会经济的快速发展，人们生活水平的不断提高。

计算机已广泛应用于社会生活的各个领域，进而成为了我们工作、学习和生活的得力助手，取代了繁琐复杂的手工劳作，使人们步入了信息化时代。

一套完整的学生信息管理系统可以为学校管理部门及学生带来极大的方便。

因此，开发一套完善的学生信息管理系统显得尤为重要。

1．2 系统研发的目的与意义我国教育事业蓬勃发展，升学率普遍升高。

各类大专院校规模不断扩大，对于学生管理工作的高效性和规范性提出了更高的要求。

但一直以来人们使用传统的人工方式管理文件档案。

这种管理方式存在许多缺点，如：效率低，保密性差。

学生数量不断上升，这必然增加学生能够档案管理者的工作量和劳动强度，同时将产生大量的文件和数据，这给学生信息的查找、更新和维护都带来了不少困难。

这样的管理机制已经不能适应时代发展的要求。

随着科学技术的不断提高，以计算机为物质基础的信息管理代替了传统的手工管理。

使用计算机对学生信息进行管理，有着手工管理无法比拟的优点，如：检索迅速、查找方便、可靠性高、存储量大、保密性好、使用率高、成本低等。

这些优点极大地提高了学生档案管理的效率，是学校向科学化、正规化管理发展的必要条件。

1．3系统研发的可行性分析（1）技术可行性运用所学专业知识结合实际应用，通过老师指导，以及相关文献的参考。

以WindowsXP为操作系统，采用为脚本语言，运用ACCESS的数据库技术，设计与开发学生信息管理系统，因此技术上是可行的。

（2）硬件可行性配备齐全的电脑机房，参考文献丰富的图书馆和现代化的电子阅览室。

且本系统对计算机的配置要求不高，一般菊科运行该系统，所以其配置均可满足系统运行。

（3）经济可行性系统操作的便捷性和其强大的功能支持，能进一步的提高管理人员的工作效率，使人力、物力等资源得以合理的分配和使用，从而提高经济效益。

1．4 系统介绍该系统主要有一为脚本语言的操作系统和运用ACCESS建立的学生数据库两方面。

操作系统包括学生信息管理、班级管理、课程管理、成绩管理奖罚管理等。

学生可以登录、查询，教师和管理员可以进行登录、查询、编辑。

ACCESS学生数据库包括学生信息、班级表、课程表、成绩表和用户表。

1．5 模块简介1.5.1 登录模块1、教师或管理员登录2、学生登录1.5.2 管理模块1、老师或管理员对学生信息、班级信息、课程信息、成绩信息的浏览、查询、和编辑。

2、学生对学生信息、班级信息、课程信息、成绩信息的浏览、查询、和编辑。

1.5.3 系统结构图成绩表:第二章系统各个模块的设计使用说明2．1用户登录模块说明在首页点击按钮进入相应的学生登录界面和教师登录界面。

在登录界面中输入用户名和密码，若正确则进入系统.。

若用户名或密码不正确则重新输入。

如图所示：所用代码如下：Session("ID") =Dim conn As New()If = "普通用户" ThenDim cmd As New OleDbCommand("select * from 用户表 where 姓名='" & & "' and 密码='" & & "'", conn)Dim dr As OleDbDataReaderdr =If Then("学生信息浏览.aspx")()Else : = True= ""= ""()End IfElseIf = "管理员" ThenDim cmd As New OleDbCommand("select * from 管理员表 where 姓名='" & & "' and 密码='" & & "'", conn)Dim dr As OleDbDataReaderdr =If Then("管理员界面.aspx")()Else : = True= ""= ""()End IfEnd If2．2学生信息查询模块说明此模块用来实现添加学生信息的功能。

所用代码如下：Dim conn As NewDim da As New OleDbDataAdapter("select*from 学生信息表", conn)Dim ds As New DataSet()(ds, "学生信息表")= ("学生信息表").DefaultView()=Call aa()Sub aa()Dim conn As NewDim da As New OleDbDataAdapter("select*from 学生信息表", conn)Dim ds As New DataSet()(ds, "学生信息表")= ("学生信息表").DefaultView()2．3学生信息添加模块说明此模块用来实现编辑学生信息的功能。

代码如下：If Not ThenCall aa()End IfEnd SubSub aa()Dim conn As NewDim comm As New OleDbCommand("select*from 学生信息表", conn)Dim da As New OleDbDataAdapter(comm)Dim ds As New DataSet()(ds, "学生信息表")= ("学生信息表").DefaultView()Dim conn As NewDim x1, x2, x3, x4, x5, x6 As TextBoxDim updatecomm As Stringupdatecomm = "update 学生信息表 set 学号='" & & "',姓名='" & & "',性别='" & & "',班级编号='" & & "',政治面貌='" & & "',籍贯Dim comm As New OleDbCommand(updatecomm, conn)()()()= -1Call aa()Dim conn As NewDim deletecomm As Stringdeletecomm = "delete from 学生信息表Dim comm As New OleDbCommand(deletecomm, conn)()()()= -1Call aa()2．4课程编辑界面If Not ThenCall aaa()End IfEnd SubSub aaa()Dim conn As New()Dim cmd As New OleDbCommand("select * from 课程表", conn)Dim adp As New OleDbDataAdapter(cmd)Dim ds As New DataSet(ds, "课程表")= ("课程表").DefaultView()Dim conn As New()Dim ke, shi, hao As TextBoxDim cmd As New OleDbCommand("update 课程表 set 课程='" & & "',授课教师='" & & "',课程号()()= -1Call aaa()Dim conn As New()Dim cmd As New()= -1Call aaa()2．5成绩浏览查询界面Dim conn As NewDim da As New OleDbDataAdapter("select*from 成绩表", conn)Dim ds As New DataSet()(ds, "成绩表")= ("成绩表").DefaultView()Dim conn As NewDim da As New OleDbDataAdapter("select*from 成绩表", conn)Dim ds As New DataSet()(ds, "成绩表")= ("成绩表").DefaultView()2．6成绩编辑界面If Not ThenCall aa()End IfEnd SubSub aa()Dim conn As NewDim comm As New OleDbCommand("select* from 成绩表", conn)Dim da As New OleDbDataAdapter(comm)Dim ds As New DataSet()(ds, "成绩表")= ("成绩表").DefaultView()Dim conn As NewDim strsql As Stringstrsql = "delete from 成绩表 where ID=" & (CIntDim cmd As New OleDbCommand(strsql, conn)()()= -1Call aa()Dim conn As NewDim x1, x2, x3, x4, x5, x6 As TextBoxDim strsql As Stringstrsql = "update 学生信息表 set 学号='" & & "',姓名='" & & "',性别='" & & "',班级编号='" & & "',政治面貌='" & & "',籍贯Dim cmd As New OleDbCommand(strsql, conn)()()()= -1Call aa()2．7成绩添加界面2．8课程添加界面第三章结论在本系统的开发过程中，在知识、经验方面都存在着不足。