《学生宿舍信息管理系统》由会员分享，可在线阅读，更多相关《学生宿舍信息管理系统（12页珍藏版）》请在金锄头文库上搜索。
1、学生宿舍信息管理系统第 1 章 系统开发概述1.1 系统开发的需求分析在大学中，人口的比例比其他地方更大，因此管理的作用也更加的突出，而 学生宿舍又是学生更加集中的地方，学生宿舍在大学生的学习、生活中占了很重 要的比例，而且对大学生以后踏入社会也起到一定的作用。因此一个管理系统的 必要性是需要的，一个合适的学生宿舍管理系统，可以方便学生宿舍的管理，提 高宿舍管理工作效率及查询效率，使学校管理学生的效率进一步得到提高，也使 管理更加地轻松、简便。1.2 可行性研究1.2.1 经济可行性本来学生对学生宿舍的管理是需要宿舍管理人员每天对学生的进出、晚归、 贵重物品及离返校进行登记，这工作既繁琐又容易
2、出现错误，因此在学生宿舍开 发这个系统是很必须的，系统本身需要的人力物力都是比较少的，应用学生宿舍 管理系统可以节约很多的人力，不需要门卫人工用记录本一一记录，节约了宿舍 管理人员的很多时间和精力，因此学生宿舍管理系统在经济上是可行的。1.2.1 技术可行性该学生宿舍管理系统运用到的软件有开发工具Visual Basic6.0、数据库SQL Server 2000, Visual Basic6.0和SQL Server 2000可以很好的把宿舍管理系统中的 各个功能很好地设计出来，由于Visual Basic本身是面对对象的编程程序，因此 界面设计也是有很好的保障, SQL Server 20
3、00软件建立数据库比较方便简单, 因此数据库的建立花费的时间也是比较短的，而 Visual Basic6.0 可以很好地与 SQL Server 2000衔接起来，在技术上宿舍管理系统的制作也是可行的。第 2 章 系统分析2.1 系统包含的处理对象系统需要处理的对象有学生基本信息、学生晚归状况、宿舍卫生评分、贵重 物品登记及学生离返校状况几个方面，各个对象所包含的信息有：1学生基本信息包含学生姓名、学生学号、宿舍号、床位、入学时间、年 龄六个方面；2学生晚归状况系统信息包含晚归学生姓名、晚归时间、宿舍号三个方面； 3宿舍卫生评分系统信息包含宿舍号、卫生评分、评分时间、评分员四个 方面；4贵重物
4、品登记系统信息包含学生姓名、宿舍号、物品名称、登记时间四 个方面；5学生离返校系统包含类别、学生姓名、时间、地点四个方面。2.2 系统所需要实现的功能系统主要完成一下几个功能： 1学生基本信息的查询及更新，时时了解学生的生活情况； 2每日学生迟到晚归情况的记录及查询； 3宿舍楼寝室每日卫生状况的评分、查询及更新； 4宿舍楼贵重物品的出入，防止物品的丢失；5 每学期开始及结束时学生返校及离校时间的记录，从而更好地了解学生状况；2.3 系统业务流程图学生信息业务流程图（学生姓名、学生学号、宿舍号、床位、入学时间、年龄等信息）编辑学生信息图 2-1 学生信息业务流程图学生晚归信息业务流程图图 2-2
5、 学生晚归信息业务流程图宿舍卫生信息业务流程图图 2-3 宿舍卫生信息业务流程图贵重物品登记信息业务流程图查询物品登记状况图 2-4 贵重物品登记信息业务流程图学生离返校信息业务流程图理数据理员离返校学生宿舍管宿舍管学生离返校记录表申请离返校表格查询学生离返校情况删除学生离返校情况图 2-5 学生离返校信息业务流程图2.4 系统数据流程图管理员学校学生宿舍信息学生可查询信息宿舍学生信息宿舍状况信息处理宿舍信息图 2-6 学生宿舍信息管理系统数据流程图2.5 数据字典数据项编号数据项名称别名简述类型及宽度取值范围D1-1学生姓名学生姓名无char， 8 位无D1-2学号学号学生代码char， 9
6、 位AZD1-3宿舍号宿舍号无char， 3 位101628D1-4床位床位14char， 3 位14D1-5入学时间入学时间学生入校时 间char， 20 位无D1-6年龄年龄学生年龄char， 3 位无D1-7晚归学生姓 名晚归学生姓 名无char， 8 位无D1-8晚归时间晚归时间无char， 8 位10:30以后D1-9卫生评分卫生评分0100char， 3 位0100D1-10评分时间评分时间无char， 20 位无D1-11评分员评分员无char， 8 位无D1-12物品名称物品名称尽量简短char， 20 位无D1-13登记时间登记时间无char， 20 位无D1-14类别类别离
7、、返两类char， 4 位离、返D1-15时间时间无char， 20 位无D1-16地点地点所要去的地点char， 8 位无第 3 章 系统设计3.1 引言设计阶段主要是将需求分析阶段得到的用户需求抽象为信息结构（概念模型） 的过程,它是整个数据库设计的关键，包括了概念模型设计和新系统流程两个阶 段。3.2 概念模型设计ER 模型L其他系统的 ER 如上所示。3.3 系统功能设计图 3-1 学生宿舍管理系统主要结构功能3.4 数据库设计数据库的物理设计就是为逻辑数据模型选取一个最合适应用要求的物理结构的过程，在这个阶段中要完成两大任务：（1）确定数据库的物理结构，在关系数据库中主要是存取方法和
8、存储结构(2)对物理结构进行评价，评价的重点是时间和空间效率。数据库利用SQL Server 2000进行设计，SQL Server 2000本身设计表格是比 较简单的。数据库设计中需要建立五张表格：学生基本信息、学生晚归状况、宿舍卫生 评分、贵重物品登记及学生离返校状况。在五张表格中设计自己需要的要素，并对每个要素的类型、宽度进行选择与 设计，只要进行这些设计就可以了。图3-2系统中学生基本信息表格的设计3.5界面设计学生宿舍管理系统的界面设计是用的Visual Basic6.0, Visual Basic6.0是对于 用户的语言编辑程序，因此编辑学生宿舍管理系统的界面还是比较的方便和简洁
9、的。首先是利用VB设计一个宿舍管理主界面，其中的菜单主要有学生信息、录 入系统、编辑系统、查询系统、退出五个方面，在录入系统、编辑系统、查询系 统中又有学生晚归状况、宿舍卫生、贵重物品、学生离返校四个小方面。具体如下图所示:主界面之后便是各个小系统的设计，首先从学生基本信息系统设计开始，学 生基本信息包括学生姓名、学生学号、宿舍号、床位、入学时间、年龄六个方面。图3-3学生信息录入界面其他四个小系统的设计就如学生基本信息系统一般，只要把该系统中的因素 将进行替换就行了。当系统的界面设计完成后就可以进行界面与数据库的连接了，只要先对该界 面进行变量的设定，在该改表整体进行编程，并对界面上按钮进行
10、编程，如果该 界面需要连接数据库的表格并输出显示的话，就可以用 VB 中的 DataGrid、Adodc 这两个控件进行设计并对这两个控件分别进行数据库连接就行了。下面的就是宿舍卫生界面连接数据库的程序编辑：Dim DBCon As New ADODB.ConnectionDim DBrs As New ADODB.RecordsetDim connectStr As StringDim sqlstr As StringPrivate Sub DataGrid1_Click()Text1.Text = DataGrid1.Columns(0).TextText2.Text = DataGrid
11、1.Columns(1).TextText3.Text = DataGrid1.Columns(2).TextText4.Text = DataGrid1.Columns(3).TextEnd SubPrivate Sub Form_Load()connectStr = Provider=SQLOLEDB.1;Password=123456;Persist Security Info=True;User ID=sa;Initial Catalog=ssglxt;Data Source=WW-814546F819B3 Adodc1.ConnectionString = connectStrIf
12、DBCon.State = 0 ThenDBCon.Open connectStrEnd IfAdodc1.RecordSource = select 宿舍号 , 卫生评分 , 评分时间 , 评分员 from sswsSet DataGrid1.DataSource = Adodc1Text1.Text = DataGrid1.Columns(0).TextText2.Text = DataGrid1.Columns(1).TextText3.Text = DataGrid1.Columns(2).TextText4.Text = DataGrid1.Columns(3).TextEnd Su
13、bPrivate Sub jcbutton1_Click()Dim sl As Integersl = Val(Text3.Text)sqlstr = update ssws set 宿舍号 = & Text1.Text & , 卫生评分 = & Text2.Text & , 评分时间= & sl & , 评分员= & Text4.Text & where 宿舍号 = & DataGrid1.Columns(0).Text & DBCon.Execute sqlstrAdodc1.RefreshMsgBox 修改成功, vbOKOnly, 修改成功确认 End SubPrivate Sub j
14、cbutton2_Click()connectStr = Provider=SQLOLEDB.1;Password=123456;Persist Security Info=True;User ID=sa;Initial Catalog=ssglxt;Data Source=WW-814546F819B3If DBCon.State = 0 ThenDBCon.Open connectStrEnd IfIf MsgBox(确定要删除该入库单记录吗, vbYesNo,确认删除)=vbYes Thensqlstr = delete from ssws where 宿舍号= + Trim(Text1) + DBrs.Open sqlstr, DBCon, adOpenDynamic, adLockOptimi
