1、一. 学生信息管理系统的目标和意义1.1开发学生管理系统的意义现在相当一部分学校的学生管理工作仍沿用手工方式。随着学校规模的扩大、学生人数的增加，效率低下、容易出错的手工方式越来越不适应实际管理工作的需要，利用计算机技术和数据库技术设计开发学生管理系统、实现学生管理工作的自动化成为学生管理部门的迫切需要。 学生管理系统是一个教育单位不可缺少的部分,它的内容对于学校的教学管理者来说都至关重要,所以学生学生管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式管理文件，这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的文件和数据,这对于查找
2、、更新和维护都带来了不少的困难。 用学生管理系统维护的成本小，保密程度高，查找速度快，数据准确不易出错。而且学生管理系统所用的存储的地方小，只要电脑等设备。可以联网，学生可以很方便的查询。1.2工作描述：我参与了学生管理系统数据库的设计，学生管理系统的登录界面设计，登陆界面的数据库的设计及代码编写，“学生管理系统”中的“添加”按钮的功能的实现。数据库设计了“学生信息表”，“课程表”，“课程管理表”，“登录表1”，“登录表2”。“登录”功能分为“学生”和“管理员”，管理员是超级用户。1.3项目开发的目标 随着学校的规模不断扩大，学生数量急剧增加，有关学生的各种信息量也成倍增长。面对庞大的信息量，
3、就需要有学生信息管理系统来提高学生管理工作的效率。通过这样的系统，可以做到信息的规范管理、科学统计和快速的查询，从而减少管理方面的工作量。通过本系统软件，能帮助教研人员利用计算机，快速方便的对学生管理进行管理、输入、输出、查找的所需操作，使散乱的人事档案能够具体化，直观化、合理化。1.4项目提出的意义在高校的学生管理中, 学生的管理是一个非常重要的方面。在上个世纪90年代中期以前，各个高校的管理基本上都是靠手工进行，随着各个高校的规模增大，有关管理工作所涉及的数据量越来越大，有的学校不得不靠增加人力、物力来进行管理。但手工管理具有效率底、易出错、检索信息慢、对学校的管理提出了新的要求。因此开发
4、出学生管理信息系统投入使用并发挥作用，使有关人员从繁重的工作中解脱出来，从而提高了学校教务处的管理效率。二目前国内外相关工作情况2.1国内外研究现状 学生成绩管理是各大学的主要日常管理工作之一，涉及到校、系、师、生的诸多方面，随着教学体制的不断改革，尤其是学分制、选课制的展开和深入，学生成绩日常管理工作及保存管理日趋繁重、复杂。迫切需要研制开发一款功能强大，操作简单，具有人性化的学生成绩管理系统。 在国外高校，与国内不同，他们一般具有较大规模的稳定的技术队伍来提供服务与技术支持。而国内高校信息化建设相对起步较晚。在数字校园理论逐步应用的过程中，各高校一方面不断投资购建各种硬件、系统软件和网络，
5、另一方面也不断开发实施了各类教学、科研、办公管理等应用系统，形成了一定规模的信息化建设体系。但是，由于整体信息化程度相对落后，经费短缺，理论体系不健全等原因，国内高校教务管理系统在机构设置、服务范围、服务质量及人员要求上与国外高校相比都有一定的差距。纵观目前国内研究现状，在安全性和信息更新化方面存在有一定的不足，各现有系统资料单独建立，共享性差；在以管理者为主体的方式中，信息取舍依赖管理者对于信息的认知与喜好，较不容易掌握用户真正的需求，也因此无法完全满足用户的需求。因此，教务管理软件应充分依托校园网，实现教务信息的集中管理、分散操作、信息共享，使传统的教务管理朝数字化、无纸化、智能化、综合化
6、的方向发展，并为进一步实现完善的计算机教务管理系统和全校信息系统打下良好的基础。2.2开发所用到的技术 现在市场上有很多管理系统的开发工具，如：Visual basic、delphi、ASP等等，数据库开发工具又有很多种，如：Access，SQL Sever，Oracle等等。这些都是很出色的管理信息系统及数据库的开发工具。VFP6.0和其他数据库管理系统相比，可以发现它在库性能、系统资源利用和设计环境等各方面采用了许多新技术，并对系统做了全方位的优化，它作为Microsoft Visual Studio 的一个开发组件，充分结合了当前计算机的最新技术和早期FoxPro的优点，成为一种强有力的
7、数据库开发工具。VFP 6.0提供对象和事件的处理模式，利用面向对象编程的威力使用户能够最快速的建立和修改应用程序。VFP 6.0有着以下几项特点：在数据库方面，第一，VFP完善了关系型数据库的概念，严格区分了数据库与数据表的概念；第二，复合索引技术的广泛应用，改变了传统的单一入口的索引文件结构，使得一个索引文件中可以包含多个索引；第三，SQL命令的引入使得能以更少的代码和更快的速度从一张或多张表中检索数据。在数据操作方面，具有简单、灵活、多样的数据交换手段。在程序设计方面，具有不用编写或编写少量程序代码，就能够快速地创建出功能强大的可视化应用程序。同时用VFP开发的应用程序的可靠性高，调试过
8、程简单。更为重要的是VFP是最为适用与开发中小型的数据库管理系统，而学生管理系统就是一个非常典型的中小型数据库管理系统。三系统的总体设计3.1数据库的设计建立三个表：学生基本信息表，课程信息表，选课管理表。学生基本信息表（学号，性别，姓名，学院，班级，年级，电话，家庭住址）课程信息表（课号，课名，任课教师，课时，上课地点，课程性质）选课管理表（学号，性别，姓名，课号，课名，修课性质）3.2 需求分析3.2.1流程图 口令不正确 口令正确3.2.2 流程图说明登陆界面：用户名，密码，可分为管理员和学生登录主窗体：一行菜单（学生信息管理，课程管理，成绩查询，退出）学生信息管理： 添加，修改，删除，
9、还可以按照姓名，学号，院系，班级，年级查询课程信息：添加，修改，删除，按照课号，课名，课时查询。选课管理： 添加，修改，删除。四. 学生信息管理系统的详细规划4.1登陆界面说明：点击进入将弹出密码窗体，点击退出程序将结束。4.2用户名和密码窗体4.2.1 界面登录分为管理员和学生。管理员可以对“学生信息管理系统”进行改变，如：添加，修改，删除，查询等。以学生身份进入只能对该系统进行查询。4.2.2 程序说明 新建数据库“登录1”记录管理员的用户名和密码，数据库“登录2”记录学生的用户名和密码。当选择管理员身份进入时，先把用户名和密码与原有的用户名密码作比较。Do While rc1.EOF =
10、 False cout = cout + 1 If Text1.Text = rc1.Fields（0） Then If Text2.Text = rc1.Fields（1） Then MDIForm1.Show Unload Me Exit Sub Else If ab = cout Then If MsgBox（密码错误或为空，请重试！, vbYesNo, 错误提示） = vbYes Then Text2.Text = Text2.SetFocus End End If End If 用户名错误或为空，请重试！ Text1.Text = rc1.MoveNext Loop如用户名和密码都正
11、确，则弹出主窗体。如果用户名不存在将弹出一个提示“用户名错误或为空，请重试！”。如果密码出错将弹出一个提示信息“密码错误或为空，请重试！4.3 主窗体菜单栏上有四个菜单：学生信息管理，课程管理，成绩查询，退出。4.4学生信息管理4.4.1 界面如果是管理员，可以进行添加，修改，删除。如果是学生，只能进行按学号，姓名，院系，班级，年级查询，而相应的信息显示在相应的文本框内。4.4.2“添加”功能的实现 单击“添加”按钮将弹出下图的窗体当单击点确定时， 将在原有的“学生信息管理”表内检索一遍，如果存在相同的学号，则弹出一个提示信息“该用户已经存在！代码：Do While Form1.Adodc1.
12、Recordset.EOF = False If Text1.Text = Form1.Adodc1.Recordset.Fields（0） Then MsgBox 该用户已经存在！ GoTo ccEnd If Form1.Adodc1.Recordset.MoveNextLoop连接数据库Dim conn As ADODB.ConnectionDim rc As ADODB.RecordsetSet conn = New ADODB.Connectionconn.ConnectionString = Provider=SQLOLEDB.1;Integrated Security=SSPI;P
13、ersist Security Info=False;Initial Catalog=学生管理系统;Data Source=.If conn.State = 0 Then conn.OpenEnd IfSet rc = New ADODB.RecordsetSet rc.ActiveConnection = conn用insert into 语句添加信息conn.Execute insert into 学生信息 values（ + t1.Text + , + t2.Text + + t3.Text + + t11.Text + + t5.Text + + t6.Text + + t7.Text + + t9.Text + + t8.Text + + t10.Text + + t4.Text + ）MsgBox 添加成功, vbOKOnly, 提示信息rc.Open select * from 学生信息Adodc1.Recordset = rcAdodc1.Visible = FalseAdodc1.Refreshconn.Close如果添加失败 MsgBox
