学生信息管理系统设计与实现_第1页
学生信息管理系统设计与实现_第2页
学生信息管理系统设计与实现_第3页
学生信息管理系统设计与实现_第4页
学生信息管理系统设计与实现_第5页
已阅读5页,还剩37页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、学生信息管理系统设计与实现 董燕林摘 要学生信息管理系统是一个学校不可缺少的部分,学生信息对于学校管理者来说是至关重要。但一直以来人们使用传统人工的方式管理学生档案,这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间长了,将产生大量的文件和资料,这对于查找、更新和维护都带来了不少的困难。面对如此众多的学生信息,其工作量可想而知,而且人工管理存在大量的不可控制因素,对学生信息的管理并不规范。因其复杂性而难以单纯依靠人工进行管理,这样的管理既不规范效率也太低。因此,我们设计出针对学校管理者的学生信息管理系统。本系统采用是Visual Basic 6.0和Microsoft SQL Serv

2、er 2005开发学生信息管理系统。该系统用Visual Basic 6.0设计出前台窗体,包括数据的添加、数据的修改、数据的查询、打印、用户管理、帮助说明等几个模块。利用学校现有的利用学校现有的软硬件环境,及先进的管理系统开发方案,设计出单机版的学生信息管理系统,从而达到充分利用学校的现有资源,实现了学生信息的添加、修改、查询、打印的功能。从数据库的设计和操作过程等方面遇到一些关键问题:登录功能的实现,添加功能的实现,修改功能的实现以及各种查询功能的实现等,通过讨论,不断修改和完善,最终实现了这些功能,从而形成了一个完整的、功能较为齐全的、安全性和工作效率较高的学生信息管理系统。本系统针对高

3、校学生信息的特点以及管理中的弊端而设计,实现了学生信息管理的电子化、减轻了管理人员的工作负担,能够规范、高效地管理大量的学生信息,并避免人为操作错误和不规范行为。同时还提供给学生管理自身某些信息的功能,打破了传统意义上人工管理信息的框架,使得信息管理更为方便和有效。【关键字】:VB/SQL Server;数据库;管理系统目 录摘 要1目 录21绪论31.1课题背景31.2课题研究目标31.3课题研究的理论基础41.4小结62系统设计72.1需求分析72.2可行性分析72.3系统功能模块设计92.4数据库设计122.5小结163系统实现173.1系统的登录界面173.2系统主界面183.3数据录

4、入界面193.4数据更新界面193.5数据删除界面213.6数据查询界面213.7打印界面223.8帮助说明界面233.9数据库的连接方法233.10数据库的备份与还原方法243.11小结244结束语255致谢266参考文献27附 录281绪论1.1课题背景职业学校学生信息的管理是学生管理的主要工作,由于学校的工作时间比较集中,工作中流程复杂,信息量大,信息的准确性要求高,信息的更新要求快,要求迅速查询学生的信息,现在还没有现成的合适的学校信息管理系统,随着学校的规模不断扩大,学生数量的增加,有关学生的各种信息量的成倍增长。面临庞大的信息量,需要有相应的学生管理系统来提高学生管理工作的效率。通

5、过这样的系统,可以做到信息的规范管理、科学统计和快速的查询。因而减少管理反面的工作量。由于传统的学生信息管理方法、由于分散管理,易发生数据丢失,劳动强度高,速度慢。使用计算机可以高速、快捷地完成以上工作。学生信息信息管理系统以计算机为工具,通过对教务管理所需的信息管理,把管理人员从繁琐的数据计算处理中解脱出来,从而全面提高教学质量。1.2课题研究目标提高学生管理效率,节约管理成本,增加学生管理的安全性,满足学生管理人员的需要,为学校将来的整体信息化建设提供了必要的支持。在对现有系统和现状认真调查分析的基础上,明确了学生信息管理工作本身存在的问题和建立管理信息系统的初步要求,进一步研究确定新系统

6、的目标:(1)按照管理信息系统的原理和方法,采用成熟的信息技术和手段,支持学生管理的全过程,提高管理工作的效率。 (2)针对现代计算机广泛应用的情况以及数据的封闭性,学生信息管理系统基于Windows XP、Windows 2003、Windows NT等系统研制、设计和开发。(3)考虑经费等的原因,系统使用一台PC机和现有软件以节省资金、降低成本。1.3课题研究的理论基础1.3.1前台开发工具Visual Basic 6.0Visual Basic(以后简称为VB) 语言用其设计应用程序时有两个基本特点:可视化设计和事件驱动编程。可视化设计:表现在vb在设计应用于程序界面有“所见即所得”的处

7、理功能。事件驱动编程:在设计程序时,把对象添加到窗体中,在用户与程序之间进行交互时,用户基本上是通过鼠标、键盘与应用程序进行交互的,对象就对鼠标和键盘操作所引发的事件做出反应,来执行一段应用程序。面向对象的设计方法 (OOP, Objected Programming) 从应用领域内的问题着手,以直观自然的方式描述客观世界的实体。Visual Basic 作为一种面向对象的编程方法,把程序和数据封装起来作为一个对象,并为每个对象赋予相应的属性。在设计对象时,不必编写建立和描述每个对象的程序代码,而是用工具画在界面上,由 Visual Basic 自动生成对象的程序代码并封装起来。Visual

8、Basic 应用程序基本的构建块是用户所创建的对象,每一个对象都具有一些特性和行为(属性、事件和方法)。开发人员可以最有效利用所创建的每一个对象。使用应用程序具有可通用性可说扩展性和强有力的功能。Visual Basic 应用由一系列对象组成,包括有函数、菜单、函数、结构和数据窗口、用户对象、用户事件等等,对象中又包含若干控件如命令按钮、单行编辑器等这些对象和控件都可在许多应用中重复使用。1.3.2 后台数据库Microsoft SQL Server 2005Microsoft SQL Server是一种基于客户机/服务器的关系型数据库管理系统,它是使用TransactSQL语言在服务器和客户

9、机之间传送请求。SQL Server 2005是一个全面的数据库平台,使用集成的商业智能工具提供了企业级的数据管理,在数据库性能,数据库可靠性、收缩性、易用性、与Internet集成等方面都有了改进。SQL Server 2005数据库引擎是企业数据管理解决方案的核心,为关系型数据和结构化数据提供了更安全可靠的存储功能,可以构建和管理用于业务的高可用和高性能的数据应用程序。Microsoft SQL Server 2005具有的特点:SQL Server是一项成熟的客户机/服务器的系统。SQL Server所使用的数据库查询语言称为Transact-SQL。SQL Server的兼容性良好。S

10、QL Server采用二级安全验证、登录验证机数据库用户账号和角色的许可验证,提高了安全性。提供数据库仓库服务。1.3.3 ADO技术连接数据库ADO是应用层的编程接口,可以访问任何类型的数据源,只要数据是以表格形式提供的,就能对其访问,包括关系型、非关系型、结构的、非结构的数据源。ADO是基于OLE DB之上的访问数据库最新技术,通过内部的属性和方法,提供统一的数据访问接口,使用简便,功能强大,可以应用于任何支持ODBC的数据库。ADO是把对数据库的操作封装在几个类中,只要生成这些类的对象,就可以用SQL语言对数据库进行诸如创建、插入、删除等操作。ADO模型顶层有三个对象:Connectio

11、n、Command、Record set.Connenction对象可以指定数据源,建立与数据源的连接.用Command对象对数据源执行指定的命令,可以接收SQL语句、表的名称和存储过程的名称,执行SQL查询、更新数据、插入记录等。Record set对象.它是从SQL Server返回的一组记录,但Record set对象还提供了客户机应用程序中读取、更新和操纵数据的机制。Record set 对象可以用三种方法打开:(1)使用现有打开的Connection对象;(2)使用现有打开的Command对象;(3)直接传递连接字符串。但要从SQL Server中读取记录,首先要指定Active C

12、onnection和Source属性。Aceive connection属性可以使连接字符串或者打开的Connection对象。Source 属性指定记录集读取数据时运行的命令,可以是存储过程、SQL查询、表名或Command对象名。1.3.4数据库备份和恢复数据库备份采用数据信息和数据分离备份的方式,数据信息是在系统完成时由各位开发者共同完成,是一系列的数据库中的对象创建语句,通过一定的SQL查询语句将其写入到一个隐蔽的二进制文件中,然后再数据库恢复时通过数据信息文件来进行数据库的动态构建,再将数据库文件中数据写入到数据库中。1.4小结学生信息管理是学校的重要工作之一,对于一所学校来说,学校

13、的信息量的不断增加,这个管理造成了一定的困难,通过计算机进行管理是现在最科学和最有效地方法,一方面可以提高工作效率和工作质量。从分析课题背景到确定课题研究目标,通过现有的管理模式分析,由于学校的信息量的大量增加。人工的管理已经跟不上速度,考虑到经济问题,就用微软的Visual Basic和Microsoft SQL Server 2005设计出单机版的学生信息管理系统。2系统设计2.1需求分析在信息高速发展的当今时代,任何学校、企业都离不开信息化的建设,信息化水平已经成为一个评价高校综合实力的一项重要指标。在系统开发总体任务的基础上完成的,设计数据库系统时应该充分了解用户的各方面的需求,包括目

14、前及将来可能拓展的需求态势。因而数据库结构势要充分满足各种信息的输入和输出。数据库在一个信息管理系统中占有非常重要的地位,数据库的设计直接对应用系统的效率及实现的效果产生影响。合理的数据库库结构设计可以提高数据存储的效率,保证数据的完整和一致。用户的需求具体体现在各种信息的提供、保存、更新和查询,这要数据库结构能够充分满足各种信息的输入和输出。收集基本数据、数据结构和数据处理的流程,针对信息管理系统的需求,通过对管理者工作过程的内容和数据流程的分析设计出学生信息管理系统。得出具体系统功能图如图2-1所示。2.2可行性分析学生信息,作为一个学校,就有一定的工作量存在,而学生信息,它的工作量可能是

15、其它信息工作量的几倍,班级的增加、班级的查找、班级的修改;学生档案;课程管理;成绩管理等,每个信息的数据都在不断地变化着,如果采用人工的方式进行操作,那么,一天的工作量,足以让人觉得比较繁琐。针对这样的情况,采用让数据的查询变得简单化,数据变的更让每个人都在任何时刻都可以了解到。本系统所采用的语言是Visual Basic,用SQL Server 数据库完成。通过本系统,把学生的基本信息,班级信息,系部信息等信息各个环节进行有效地计划、组织和控制。本系统中使用到得数据表主要有班级表、成绩表、课程表、学生基本信息表、系部表、选课表、用户表这七个表,组成了学生信息的数据库。数据库与VB的连接:本系

16、统的数据连接采用的是ADO控件,ADO Data控件使用ADO快速创建一个到数据库的连接,它的两个属性是Connection String和Recordsource。Connection String设置控件的连接字符串,用来建立与数据库的连接。学生信息管理系统系统管理成绩管理添加成绩信息修改成绩信息查询成绩信息删除成绩信息专业管理添加专业信息修改专业信息查询专业信息删除专业信息班级管理添加班级信息修改班级信息查询班级信息删除班级信息添加课程信息修改课程信息查询课程信息删除课程信息课程管理学生管理添加学生信息修改学生信息查询学生信息删除学生信息用户管理密码管理退出系统图2-1系统功能图经过调查

17、、研究、分析、计算,在学生信息管理中的应用已经条件成熟,将从以下几个方面总结系统开发的可行性,具体情况如下: (1)技术可行性 以Windows XP、Windows 2003、Windows NTXP为操作系统,采用VB为脚本语言,运用SQL的数据库技术,设计与开发学生信息管理系统。新系统的运行硬件环境PC机,当用户使用系统时,通过正确的口令进入系统,进行数据库的维护操作和运用。 (2)经济可行性 一方面,系统中友好的人机界面和更强劲的功能支持,会使管理的工作进一步提高,从而节省人力、物力,进而提高经济效益;另一方面系统开发成本低,现有PC机即可提供该系统开发工作需要的所有硬件设备环境。 (

18、3)操作可行性 操作上是对Windows XP、Windows 2003、Windows NT等操作系统的引用,该系统的使用,主要凭借使用Windows XP、Windows 2003、Windows NT等操作技术即可完成数据录入、修改、删除等功能,方便简单。使用前只要对用户进行简单的说明或阅读帮助文件即可使用该系统。2.3系统功能模块设计学生信息管理系统是针对学校对学生复杂的信息进行管理的实际需求,为提高办事效率和确保资料准确性而设计开发的应用软件。通过系统各模块功能的实现,改进学校管理相关信息的模式,实现学校办事效率的整体提高。系统可广泛应用于各类型学校。在系统的设计过程中,对以下方面的

19、因素进行了充分的考虑:在系统设计中充分考虑到发挥组织能动性,以简单完善的界面推动学生信息管理系统的应用和实践; 尽量保证系统设计思想与学校实际管理需求的一致性;突出能在结构设计上的先进性和可用性。力求能用熟悉的工具进行知识管理活动,降低使用和维护成本等。2.3.1 系统的登录界面系统的登录界面采用的是ADO控件连接到数据库的用户表上验证登录信息。登录界面设计了2个标签,2个文本框3个命令按钮,1个Adodc控件。“注册”打开注册界面。“登录”命令按钮通过ADO控件连接数据库判断用户提交的登录信息与保存在数据库中用户表里数据进行比较,如果相同则登录进入学生信息管理系统主界面,否则提示错误则不能登

20、录进入学生信息管理系统。“取消”命令按钮通过后台代码判断退出该登录界面。注册界面设计了3个标签,3个文本框,2个命令按钮,“注册”命令按钮通过连接数据库判断是否用户名已经存在,如果存在则不能注册该用户名,否则就可以注册该用户名,通过代码判断两次输入的密码如果不相同则不能注册否则就添加该用户信息到用户表中。“取消”命令按钮通过后台代码判断退出该注册界面。2.3.2 系统的主界面系统的主界面采用的是MDI窗体,通过菜单编辑器编辑菜单,通过菜单与程序的结合,完成主界面下的子窗体的功能。本模块是本系统的应用界面,在本界面上集成了本系统的所有功能,共有6个功能菜单和31个子菜单(功能模块),从而实现了本

21、系统从添加管理、修改管理、查询管理、用户管理、帮助管理等系统的具体功能,同时,在系统管理模块中可以完成对本系统的安全性管理。2.3.3用户管理模块用户管理包括密码修改,用户删除,退出系统,密码修改是通过用户名验证的,如果用户名和学生数据库里的用户表的数据一致,则可以修改新密码。窗体设计了4个标签,4个文本框,2个命令按钮。“修改”命令按钮通过后台代码判断用户名条件是否符合,如果条件符合用户表里的数据,则可以修改该密码,不符合条件则不能修改密码。“取消”命令按钮通过后台代码的判断退出该密码修改界面。删除用户界面设计了1个标签,1个文本框,2个命令按钮。“删除”命令按钮通过后台代码判断用户名条件是

22、否符合,如果用户名符合用户表里的用户名,则删除该用户名的用户信息,否则,不能删除该用户名用户信息。“取消”命令按钮通过后台代码判断退出该数据删除界面。退出用户是通过语句“End”执行退出整个学生信息管理系统。2.3.4数据添加模块数据添加模块,以学生表位例,设计了9个标签,9个文本框,2个命令按钮,“添加”命令按钮通过后台代码判断通文本框的数据类型,如果数据类型符合学生数据库里的学生表的数据类型就能添加,否则不能添加并提示错误。“取消”命令按钮通过后台代码判断退出该数据添加界面。2.3.5数据修改模块数据修改模块包括数据更新和数据删除,数据更新,以班级表为例,窗体设计了4个标签,4个文本框,2

23、个命令按钮。“更新”命令按钮通过后台代码判断班级编号条件是否符合,如果条件符合班级表里的数据,则可以更新学生数据库里学生表里的其它数据,不符合条件则不能更新数据。“取消”命令按钮通过后台代码的判断退出该数据更新界面。数据删除,以成绩表为例,窗体设计了1个标签,1个文本框,2个命令按钮。“删除”命令按钮通过后台代码判断学号条件是否符合,如果学号符合成绩表里的学号,则删除该学号的学生的成绩信息,否则,不能删除该学号的学生的成绩信息。“取消”命令按钮通过后台代码判断退出该数据删除界面。2.3.6数据打印模块数据打印模块,数据打印时通过添加部件“Microsoft Common Dialog Cont

24、rol 6.0”实现打印功能。在窗体中添加一个CommonDialog控件,2个命令按钮,通过“打印”命令按钮的后台代码判断完成数据打印。通过“取消”命令按钮的后台代码判断退出该打印界面。2.3.7帮助说明模块帮助说明模块,帮助说明是通过添加部件中的可插入对象的Microsoft Word文档,在文档里输入帮助说明内容完成。添加了一个命令按钮,通过后台代码的控制实现退出帮助说明模块。2.4数据库设计由于考虑到本系统是应用在单机系统上,另外根据学校规模,我只建立了一个数据库,在词数据库基础上建立起如下几个基本表。表间关系如图2-2所示:图2-2表间关系2.4.1实体联系图(1)、数据模型设计。首

25、先做出学生信息管理系统的E-R图,分析这个数据库的实体,通过分析、归纳、整理,可以得到具体的实现有:学生、课程、班级、系部组成了这个系统的三个实体。(2)、再分析三个实体之间的联系。首先,这三个实体不是一个统一体,学生信息与班级没有内在联系,学生与班级这两个实体是一对多联系;实体“学生”与实体“班级”的E-R图如图2-3所示。1学生班级班级设置n图2-3学生与班级的实体图课程与学生这两个实体是多对多联系;一位学生要学习多门课程,一门课程有多位学生共同学习。实体“学生”与实体“课程”的E-R图如图2-4所示。学生课程选课成绩nm图2-4学生与课程的E-R图班级与系部是一对多的关系,一个班级只能有

26、一个系部,一个系部可以有多个班级,得到班级与系部的E-R图。如图2-5所示。1n班级系部属于图2-5班级与系部的E-R图经过分析,得到最后的E-R图,如图2-6所示,有了E-R图,就可以设计数据库。学生系部选课课程班级设置属于图2-6 E-R图2.4.2数据库的物理设计根据以上E-R图,可以得到以下七个关系模式:班级(班级编号,系部编号,教室,辅导员)成绩(学号,课程编号,成绩,学期)课程(课程编号,课程名,类别,学时)系部(系部编号,系部办公室,联系电话)选课(班级编号,课程编号,学期)学生(学号,姓名,出生日期,性别,籍贯,联系地址,联系电话,班级班级,备注)用户(用户名,密码)2.4.3

27、各表的结构设计学生表如表2-1所示:表2-1 学生表字段名称数据类型及长度是否空值是否主键学号Nchar(10)否是姓名Char(10)否否出生日期Datetime是否性别Nchar(1)否否籍贯Nchar(10)是否联系地址Nchar(50)是否联系电话Nchar(15)是否班级编号Nchar(6)否否备注Nvarchar(100)是否系部表如表2-2所示:表2-2系部表字段名称数据类型及长度是否空值是否主键系部编号Nchar(2)否是系部办公室Nchar(50)否否联系电话Nchar(15)是否课程表如表2-3所示:表2-3课程表字段名称数据类型及长度是否空值是否主键课程编号Nchar(1

28、0)否是课程名Nchar(20)是否类别Nchar(2)否否学时Nchar(3)是否班级表如表2-4所示:表2-4 班级表字段名称数据类型及长度是否空值是否主键班级编号Nchar(6)否是系部编号Nchar(2)否否教室Nchar(5)否否辅导员Nchar(10)否否成绩表如表2-5所示:表2-5成绩表字段名称数据类型及长度是否空值是否主键学号Nchar(8)否是课程编号Nchar(10)否否成绩Nchar(3)是否学期Nchar(1)否否选课表如表2-6所示:表2-6选课表字段名称数据类型及长度是否空值是否主键班级编号Nchar(6)否否课程编号Nchar(10)否否学期Nchar(1)否否

29、用户表如表2-7所示:表2-7用户表字段名称数据类型及长度用户空值是否主键用户名Nchar(10)否否密码Nchar(10)否否2.5小结通过需求分析和可行性分析用Microsoft SQL Server 2005设计出学生信息管理系统的数据库。系统的功能模块设计。数据库里的表、视图、存储过程的建立。简单的阐述了ADO连接数据库与VB技术。介绍了数据库的备份与还原为数据库在其它的计算机上的使用提供了方便。3系统实现3.1系统的登录界面登录界面如图3-1所示。登录界面控件属性设置如表3-1所示。图3-1登录界面图表3-1登录界面控件属性控件属性设置值Frame1Caption欢迎登录Label1

30、Caption请输入用户名:Label2Caption请输入密码:Command1Caption登录Command2Caption取消Command3Caption注册登录代码:Private Sub Command1_Click()Adodc1.CommandType = adCmdTextAdodc1.RecordSource = select * from 用户 & where 用户名= & Text1.Text & Adodc1.RefreshIf Adodc1.Recordset.RecordCount = 0 Then MsgBox 用户不存在Text1.Text = Text2.

31、Text = Text1.SetFocusElse If Trim(Adodc1.Recordset.Fields(1).Value) = Trim(Text2.Text) Then Unload Me 学生信息管理系统.Show Else MsgBox 密码不正确Text2.Text = Text2.SetFocus End IfEnd IfEnd SubPrivate Sub Command2_Click()EndEnd SubPrivate Sub Command3_Click()注册.ShowEnd Sub3.2系统主界面主界面如图3-2所示。图3-2系统主界面图3.3数据录入界面以学

32、生的数据录入为例介绍,界面图如图3-3所示。班级添加数据控件属性如表3-2所示。图3-3学生数据录入表3-2班级添加数据控件属性控件属性设置值Label1Caption学号Label2Caption姓名Label3Caption出生日期Label4Caption性别Label5Caption籍贯Label6Caption联系地址Label7Caption联系电话Label8Caption班级编号Label9Caption备注Command1Caption添加Command2Caption退出3.4数据更新界面以班级的数据更新为例,界面如图3-4所示。班级数据更新界面的数据控件属性如表3-3所示

33、。图3-4班级数据更新班级数据更新代码:Private Sub Command1_Click()If Text1.Text = ThenMsgBox 班级编号不能为空, vbOKOnly + vbExclamation, 空值Text1.Text = ElseIf Text2.Text = ThenMsgBox 系部编号不能为空, vbOKOnly + vbExclamation, 空值Text2.Text = ElseIf Text3.Text = ThenMsgBox 教室不能为空, vbOKOnly + vbExclamation, 空值Text3.Text = ElseIf Text4

34、.Text = ThenMsgBox 辅导员不能为空, vbOKOnly + vbExclamation, 空值Text4.Text = Elseljsqlconn.Execute xbj & Trim(Text1.Text) & , & Trim(Text2.Text) & , & Trim(Text3.Text) & , & Trim(Text4.Text) & MsgBox 修改数据成功!, vbOKOnly + vbExclamation, 修改Text1.Text = Text2.Text = Text3.Text = Text4.Text = conn.CloseEnd IfEnd

35、 IfEnd IfEnd IfEnd SubPrivate Sub Command2_Click()Unload Me学生信息管理系统.ShowEnd Sub表3-3班级更新数据控件属性控件属性设置值Label1Caption班级编号Label2Caption系部编号Label3Caption教室Label4Caption辅导员Command1Caption更新Command2Caption退出3.5数据删除界面以成绩的数据删除为例,界面如图3-5所示。图3-5成绩数据删除3.6数据查询界面以系部的数据查询为例,界面如图3-6所示。图3-6系部数据查询系部数据查询代码:Private Sub

36、Command4_Click()Unload Me学生信息管理系统.ShowEnd SubPrivate Sub Command5_Click()Adodc1.RecordSource = select * from 系部Adodc1.RefreshDataGrid1.RefreshEnd SubPrivate Sub Command6_Click()Adodc1.CommandType = adCmdTextAdodc1.RecordSource = select * from 系部 where 系部编号 like % & Trim(Text1.Text) & %Adodc1.Refresh

37、Adodc1.RefreshDataGrid1.RefreshEnd Sub3.7打印界面以成绩信息为例,界面如图3-7所示。控件属性设置如表3-4所示。图3-7成绩信息打印界面表3-4 打印成绩信息的控件属性名称属性设置值Command1Caption显示全部Command2Caption打印Command3Caption退出DataGrid1DatasourceAdodc1成绩信息打印代码:Private Sub Command1_Click()Adodc1.RecordSource = select * from 成绩视图Adodc1.RefreshDataGrid1.RefreshEn

38、d SubPrivate Sub Command2_Click()CommonDialog1.Flags = cdlPDReturnDC + cdlPDNoPageNumsIf DataGrid1.SelLength = 0 Then CommonDialog1.Flags = CommonDialog1.Flags + cdlpdallpage Else CommonDialog1.Flags = CommonDialog1.Flags + cdlpdselction End If CommonDialog1.ShowPrinterEnd SubPrivate Sub Command3_Cl

39、ick()Unload Me学生信息管理系统.ShowEnd Sub3.8帮助说明界面界面如图3-8所示。图3-8帮助说明界面3.9数据库的连接方法该数据库与前台窗体的连接采用的是ADO技术。在vb的窗体里,执行菜单“工程”|“引用”命令,在对话框中选中“Microsoft ActiveX Data Object 2.8 Library”选项,然后单击“确定”按钮。添加一个ADODC,改变ADODC的属性(以学生表为例)。使用的连接字符串为“Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Init

40、ial Catalog=学生”记录源的命令类型“1-adCmdText”,命令文本为“select * from 学生”。3.10数据库的备份与还原方法该数据库采用的是sql server 2005为基础开发,数据库的备份可以使用多种设备(磁盘设备、网络共享文件、磁带设备),磁盘设备是最常用的,其随技术的发展容量越来越大,价格越来越低,成为备份的首选设备。备份的方法分为完整备份、差异备份和事务日志,以全备份为例,介绍备份的过程。右击数据库学生,在弹出的快捷菜单中选择“任务”菜单单击“备份”菜单项,选择数据库、备份类型、备份组建和备份集过期时间,单击“时间”按钮,备份数据库到指定的目录。还原时将

41、备份好的数据还原到服务器,可以是本机(原数据库已经已经被删除)或其他服务器,具体方法如下:右击“数据库”节点,在弹出的快捷菜单中单击“还原”命令,选择还原的目标和还原的源,单击“确定”按钮即可还原数据库。3.11小结本章介绍学生信息管理系统系统的实现,介绍了登录界面的设计及代码。也介绍了添加数据模块、更新数据模块、删除数据模块、查询数据模块等,并以实例介绍这些界面的设计及代码。通过实例的说明介绍了数据库的连接,并介绍了数据库的备份与还原。通过这些模块的实现从而实现学生信息管理系统。4结束语学生信息管理系统由VB和SQL Server 2005开发出来的,用VB设计出前台窗体,用SQL Serv

42、er 2005设计出后台数据库,前台窗体通过ADO控件连接后台数据库。该学生信息管理系统包括六个功能模块。利用学校现有的利用学校现有的软硬件环境,及先进的管理系统开发方案,设计出单机版的学生信息管理系统,从而达到充分利用学校的现有资源,实现了学生信息的添加、修改、查询、打印的功能。在本系统的开发过程中,由于本组人员是初次开发软件,在知识、经验等方面都存在着不足,另外,在开发的过程中,时间也比较仓促。因此,该系统存在一些缺陷和不足。因为对学生管理的调查过程不够熟悉,在需求分析时未能做到完全满足用户的需求。现在网络化在学生管理系统中的应用不是很多,但是未来的发展方向,在本次开发过程由于经济条件的限

43、制,未能实现网络功能,因此在以后的系统更新过程中可能会造成一些不必要的数据损失。所以应及时做好系统的备份。本系统结合VB和SQL Server 2005设计,并用于学生信息管理系统中,其思路、实现方法对一般管理系统具有通用性。形势在不断地发展,特别是计算机的发展,真可谓是日新月异,因此,本管理系统的设计也需要进行不断地改进和提高。尽管这个管理系统存在着很多不足,但其功能较为全面、便于日后程序更新、数据库管理容易、界面友好、操作方便、效率高、安全性好等优点是本管理系统所必需的。相信这个学生管理系统是一套学校在日常管理中必不可少的管理软件,通过开发这个系统,我掌握了开发管理系统的流程,了解的基本知

44、识巩固了我对Visual Basic 6.0和Microsoft SQL Server 2005的学习,但在这次毕业设计中的最大收获并不是掌握这几个开发工具的应用,而是学会了设计系统的思维方法,以及组员之间相互帮助的精神。5致谢在论文即将完成之际,回顾紧张但又充实的学习和开发过程,本组人员在此向所有关心我们及帮助我们的老师和同学们致以最真诚的感谢。在本次毕业设计中,我们从指导老师身上学到了很多东西。他认真负责的工作态度,严谨的治学精神和深厚的理论水平都使我收益匪浅。他无论在理论上还是在实践中,都给与我很大的帮助,使我得到很大的提高,这对于我以后的工作和学习都有一种巨大的帮助,在此感谢他耐心的辅

45、导。在撰写论文阶段,老师几次审阅我们的论文,提出了许多宝贵意见,没有他的指导,我们就不能较好的完成课题设计的任务。另外,我们还要感谢在这几年来对我们有所教导的老师,他们孜孜不倦的教诲不但让我们学到了很多知识,让我们掌握了学习的方法,更教会了我们做人处事的道理,在此表示感谢。同时,在系统开发过程中还有同组的同学也给了我们不少帮助,这里一并表示感谢。6参考文献1 SQL Server 2005实例教程北京:中国电力出版社2 王真富、林逢春、熊传光等.Visual Basic程序设计教程.北京:地址出版社3 陈丽春.基于VB/SQL SERVER的管理系统的实现.温州:温州师范学院报(自然科学报),

46、2004,第27卷第2期4 李中凯、魏修亭、唐文静.用ADO控件实现VB与SQL SERVER 2000的连接.山东:电脑开发与应用,2004,第17卷第5期5 仝春灵.基于VB/SQL SERVER的科技档案管理系统设计.山东:山东交通学院学报,2003,第11卷第4期6 方秀男、汤风香、吕同富.VB+SQL快速参数查询及报表实现.黑龙江:佳木斯大学学报(自然科学版),2005,第23卷第3期7 赵伦、周淑英、王笑月.用VB开发电子阅览室登录计费系统.河北:中国环境管理干部学院学报,2005,第15卷第3期8 李志云.在VB+SQL Sever 2000系统中利用ADO进行各种查询的实现.电

47、脑编程技巧与维护,20069 张业明、魏修亭、李中凯、刘勇.基于VB与SQL Server 的企业MRP系统开发.计算机工程与设计,2007,第28卷第6期10 龚自霞、成江晨.基于VB&SQL Server的科教研管理系统的设计与实现.电脑知识与技术,2006附 录随附代码:类模块代码:Public conn As New ADODB.ConnectionPublic rs As New ADODB.RecordsetPublic fwq As StringPrivate Declare Function GetComputerName Lib kernel32.dll Alias GetC

48、omputerNameA (ByVal lpBuffer As String, ByRef nSize As Long) As LongPublic Sub ljsql() 连接数据库的全局过程Set conn = New ADODB.ConnectionDim strname As String * 255 获取本机电脑服务器名称GetComputerName strname, 255fwq = Left(strname, InStr(strname, Chr(0) - 1)conn.ConnectionTimeout = 25conn.Provider = sqloledb.1conn.P

49、roperties(data source).Value = fwq 服务器名conn.Properties(initial catalog).Value = 学生 库名conn.Properties(integrated security).Value = sspi Windows XP、Windows 2003、Windows NTNT身份验证conn.Properties(user id).Value = saconn.Properties(password).Value = conn.OpenSet rs = New ADODB.RecordsetEnd Sub登录代码:Private

50、 Sub Command1_Click()Adodc1.CommandType = adCmdTextAdodc1.RecordSource = select * from 用户 & where 用户名= & Text1.Text & Adodc1.RefreshIf Adodc1.Recordset.RecordCount = 0 Then MsgBox 用户不存在Text1.Text = Text2.Text = Text1.SetFocusElse If Trim(Adodc1.Recordset.Fields(1).Value) = Trim(Text2.Text) Then Unlo

51、ad Me 学生信息管理系统.Show Else MsgBox 密码不正确Text2.Text = Text2.SetFocus End IfEnd IfEnd SubPrivate Sub Command2_Click()EndEnd SubPrivate Sub Command3_Click()注册.ShowEnd Sub注册代码:Private Sub Command1_Click()Adodc1.CommandType = adCmdTextAdodc1.RecordSource = select * from 用户 & where 用户名= & Text1.Text & Adodc1

52、.RefreshljsqlIf Text1.Text = Or Text2.Text = ThenMsgBox 用户名或密码不能为空!ElseIf Text3.Text Text2.Text ThenMsgBox 密码不一致!Text3.Text = ElseIf Adodc1.Recordset.RecordCount 0 ThenMsgBox 用户名已存在,请重新输入用户名Text1.Text = Elseconn.Execute tyh & Trim(Text1.Text) & , & Trim(Text2.Text) & MsgBox 注册成功!, vbOKOnly + vbExcla

53、mation, 注册Text1.Text = Text2.Text = Text3.Text = conn.CloseEnd IfEnd SubPrivate Sub Command2_Click()Unload Me登录.ShowEnd Sub学生信息管理系统主界面代码:Private Sub bj_Click()tbj.ShowEnd SubPrivate Sub bj1_Click()xbj.ShowEnd SubPrivate Sub bj2_Click()scbj.ShowEnd SubPrivate Sub bj3_Click()cbj.ShowEnd SubPrivate Sub bzsm_Click()sm.ShowEnd SubPrivate Sub cj_Click()tcj.ShowEnd SubPrivate Sub cj1_Click()xcj.ShowEnd SubPrivate Sub cj2_Click()sccj.ShowEnd SubPrivate Sub cj3_Click()ccj.ShowEnd SubPrivat

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论