宿舍管理文档——.doc

2010-2011学年度第1学期宿舍管理系统期末课程设计班级： 信管0802学号：姓名： 宿舍管理系统摘要 学生宿舍是大学生学习、生活、休息的重要场所，使用管理信息系统来进行大学宿舍的管理工作无疑将提高宿舍管理工作的效率和保证信息的准确性。我们这个系统主要通过需求分析，逻辑分析，系统分析和SQL数据库，VB实现了一个小型的宿舍管理系统，我们这个系统主要可以实现学生的管理功能，宿舍的管理功能，公寓的管理人员的管理，来访人员的管理功能，基本的功能在我们这个系统中都可以加以体现。学生宿舍是一个学校不可或缺的一部分，学生宿舍管理系统必将一个学校管理中不可缺少的部分,它所实现的功能对于学校的宿舍分配管理和日常的寝室各类信息的管理来说都至关重要。所以学生宿舍管理系统应该能够为用户提供方便、快捷、准确的宿舍管理和查询手段。手工纪录的宿舍管理方式已经不能适应高速发展的信息化时代，新的宿舍管理系统开发出来之后，学校现有的宿舍信息管理将有很大的改观，由过去的人工方式转变为计算机方式，由效率低、数据冗余、易产生错误转变为检索迅速、查找方便、可靠性高、存储量大。这些优点能够极大地提高效率,也是学校科学化、正规化管理的重要条件。关键字: 宿舍管理 SQL VB 系统开发目录第一章 需求分析4一、技术上的可行性4二、经济上的可行性4三、运行可行性4四、目标分析5第二章 项目开发计划5一、项目开发组织机构的设置和人员的安排51、小组成员52、系统开发中人员的安排5二、项目开发进度5三、项目所需的硬件和软件资源5第三章 系统分析6一、业务流程图6二、数据流程图8三、系统功能分析图11四、实体的E-R图111、实体之间的E-R图关系：112、学生实体的E-R图：123、宿舍的实体E-R图：124、房间的实体E-R图：13五、数据字典14第四章 系统的设计报告15一、功能结构设计15二、系统的功能图部分151、学生管理的功能图：152、宿舍管理模块的功能图：15三、信息处理流程设计16四、数据库设计161、数据库和表名称162、表的结构设计163、表间关系设计184、数据源185、用户管理21第五章 系统的实现22一、模拟运行数据221、系统的主界面：222、学生基本资料展示22二、系统的使用说明231、系统环境：232、功能简介：233、注意事项：23第六章 总结23第七章 附录（代码）24第一章 需求分析需求分析就是明确对象目标的要求是什么，我们应该怎样满足他们的需要，通过需求分析我们可以了解对象目标最关心的是什么，他们最希望得到什么，从而使我们的工作可以很好的顺利进行，以便在我们的系统制作过程中可以很顺利的进行，也为我们以后的分析和制作奠定了基础。所以需求分析是非常必要的。一、技术上的可行性 技术可行性是指：根据现有的技术条件，能否达到所提出的要求；所需要的物理资源是否具备，能否得到。针对于本系统，本系统属于一个普通的MIS系统。在其组织关系上也未存在的很大的复杂性、繁琐性及不确定性，而且整个系统的技术构成上来看，它还是属于一个简单的数据库应用类的系统。其基本操作还是对存在数据库进行添加、删除、查找、编辑等。所以就单纯的数据库应用来看，暂不存在太大的技术问题。并且本系统的开发我利用Microsoft SQL Server2000作为本系统的数据库，它是一个支持多用户的新型数据库，适用于大中规模的数据量需求。使用VB为系统开发的开发环境，它作为一种现代的编程语言，提供完善的指令控制语句、类与对象的支持及丰富的数据类型，给开发高性能系统提供的保障为开发满足客户要求的系统，保证了代码的模块化要求，而代码模块化的提高，非常有利于以后对新系统的扩展与修改。因此，本系统的设计与开发在技术上和硬件设备上的条件都是满足的，它在技术上是可行的。二、经济上的可行性经济可行性分析要估计项目的成本和效益，分析项目经济上是否合理，并将费用与效益进行比较，看是否有利。主要是对项目的经济效益进行评价，一方面是支出的费用，其中包括设备购置费用，软件开发费，管理和维护费，人员工资和培训费等。另一方面是取得的收益中可以用钱来衡量的那部分。 企业工资管理信息系统地实现的硬件支持只是一台简单的计算机，如今的性能较好的计算机的价格已经十分低廉。而本系统的成功开发，将为企业的工作效率带来了一个质的飞跃，不但能大大减少重复性的书面报告，降低办公费用，提高办公室效率，而且能提高检测数据效用。为此主要表现有以下几个方面：第一，本系统的运行可以代替人工进行许多繁杂的劳动；第二，本系统的运行可以节省许多资源；第三，本系统的运行可以大大的提高企业的工作效率；第四，本系统可以使敏感文档更加安全。所以在经济上一定是可以实现的，即我们在经济上就是不存在问题的。三、运行可行性 运行可行性是指所建立的信息系统能否在该企业实现，在当前的操作环境下能否很好的进行，即组织内外是否具备接受和使用新系统的条件。 本系统为一个普通的信息管理系统，所耗费的资源非常的小，对电脑的是硬件和软件的条件要求并不高；而且将来的操作界面简洁易操作，企业的管理人员无需培训即可很快学会如何进行操作。而且鉴于本系统的操作适合企业人员，简单上手，功能适合管理，所以这个系统在运行上是可行的。四、社会可行性社会可行性研究是对系统投入使用后对社会可能带来的影响进行分析，比如是否为人们所接受，是否能为社会带来利益。而这方面是显而易见的。五、目标分析 企业的管理人员在企业工资管理系统中完成对运行该子系统所需的基本数据的维护，包括这些信息的增加、修改及对各项信息的变动。而员工则可以查询和打印出自己的工资单，过程简单明了。我们希望这个子系统可以帮助企业很好的管理企业的工资变动，从而可以减少大量的人工手作劳动，很好的协助企业对人员的管理。第二章 项目开发计划一、项目开发组织机构的设置和人员的安排 1、小组成员组长：李鑫 组员：李尔康 刘明2、系统开发中人员的安排李鑫负责学生管理和宿舍管理的模块功能部分，其中包括学生资料管理，住校毕业生资料，宿舍分配，宿舍调动，宿舍楼管理，房间管理。李尔康主要负责后台的数据库和用户管理这个模块功能，其中包括新用户的注册和后台数据库的管理和创建表的职责。刘明主要负责缴费管理和查询管理的模块功能，其中包括学生缴费，按学号查询学生和查询未交费学生的功能。二、项目开发进度第1-4天：系统分析第5-6天：系统总体设计第7-9天：数据库的设计第10-15天：程序设计第16-19天：系统测试三、项目所需的硬件和软件资源·以 Windows xp为操作系统·以 VB为前台开发工具·以SQL Server 2000作为后台数据库 第三章 系统分析一、业务流程图 系统的业务是系统要达到的业务目标，业务流程分析是系统分析的基础环节新生入住业务流程图宿舍调整业务流程图可入住宿舍楼调整业务流程图毕业生离校业务流程图二、数据流程图顶层DFD第一层DFD宿舍管理框的展开学生管理展开图宿舍调动展开图宿舍分配展开图宿舍楼管理展开图三、系统功能分析图 这是我们整个的系统功能分析图，它主要包五个主要的模块功能，而其中又包括了其他的一些具体的功能，像用户管理就包括了新用户注册；学生管理就包括学生资料和毕业生的资料；宿舍管理包括了宿舍调动，宿舍楼的管理和房间的管理；缴费的管理主要包括了学生缴费这个功能；查询主要包括了按学号查询和按缴费情况的查询。四、实体的E-R图1、实体之间的E-R图关系： 2、学生实体的E-R图：3、宿舍的实体E-R图：4、房间的实体E-R图： 五、数据字典数据存储及数据流名字：学生信息描述：学生的基本信息定义：学生信息=学号+房号+缴费号+姓名+性别+入学时间+毕业时间+班+系+学院位置：存储 输出给用户名字：宿舍信息描述：宿舍的各项基本信息定义：宿舍信息=楼号+楼名+位置+房间数+楼高+住宿费位置：存储 输出供查询及维护名字：房间信息描述：房间的住宿信息定义：房间信息=房号+楼号+性别+可入住人数+已入住人数位置：存储 输出供查询及维护名字：缴费信息描述：所交学费信息定义：缴费信息=缴费号+学年学费位置：存储 输出供查询及维护名字：用户信息描述：访问系统数据的用户信息定义：用户信息用户名密码位置：存储输出供查询及维护数据项名字：学号描述：唯一标识学生信息的关键域定义：学生编号15字符15位置：学生信息查询及结果名字：房号描述：唯一标识宿舍房间信息的关键域定义：房间编号15字符15位置：房间信息名字：楼号描述：唯一标识宿舍楼信息的关键域定义：宿舍楼编号10字符10位置：宿舍信息名字：缴费号描述：唯一标识缴费信息的关键域定义：缴费编号4字符4位置：缴费信息 第四章 系统的设计报告一、功能结构设计本系统主要有五个模块功能，用户管理，学生管理，宿舍管理，缴费管理，查询管理，我主要负责的就是学生管理和宿舍管理这两个部分的模块，其中学生管理这个模块主要有学生资料管理和毕业生的资料注销这两个功能；宿舍管理这个模块主要有宿舍调动，宿舍分配，宿舍楼管理，房间管理。我主要就是管理学生和宿舍的这两个功能可以正常的运行和使用。二、系统的功能图部分1、学生管理的功能图：2、宿舍管理模块的功能图： 三、信息处理流程设计 四、数据库设计1、数据库和表名称在本系统中数据库的名称设置为宿舍管理。数据库中表名称和字符标识如下所示：序号表名称1学生信息表2宿舍信息表3房间信息表4缴费表5用户信息表2、表的结构设计学生信息表字段名称类型宽度是否为空学号char15No房号char15Yes缴费号int4Yes姓名char15Yes性别char4Yes入学时间datetime8Yes毕业时间datetime8Yes班char10Yes系char16Yes学院nchar20Yes宿舍信息表字段名称类型宽度是否为空楼号char10No楼名char10Yes位置char10Yes房间数float8Yes楼高int4Yes住宿费money8Yes房间信息表字段名称类型宽度是否为空房号char15No楼号char10Yes性别char2Yes可入住人数int4Yes已入住人数int4Yes缴费表字段名称类型宽度是否为空缴费号int4No学年学费money8Yes用户信息表字段名称类型宽度是否为空用户名char10No密码char16Yes3、表间关系设计4、数据源（1）建立数据源添加数据源名称以及描述，选择要连接的服务器 选择登录模式更改当前默认的数据库（2）数据源测试完成ODBC数据源的建立并进行测试数据源测试成功5、用户管理（1）用户登录登录成功（2）新用户注册 第五章 系统的实现一、模拟运行数据1、系统的主界面：2、学生基本资料展示二、系统的使用说明1、系统环境：windowsXP2、功能简介：本系统主要设计了五个功能模块，其中学生管理和宿舍管理主要包括学生基本信息的添加，删除，保存和查询；宿舍管理的功能模块主要包括宿舍的分配，宿舍调动，楼房管理和房间管理。用户登录主要包括新用户的注册，需要输入用户名和密码。查询功能有按学号查询和按缴费情况的查询情况。3、注意事项：（1）在添加学生的基本信息的时候姓名，学号，性别这些基本的因素是不能为空的，否则就会添加失败，从而取消操作。（2）本系统未设置已毕业的学生，所以在学生管理那个功能中，我们不能查询到毕业生的相关的资料。3在添加信息的时候要注意外键之间的联系，否则会发生冲突，从而取消操作。第六章 总结我们这学期进行了几门课程的捆绑式学习，使我们学到了许多系统性的知识，而且学会了更多关于信息系统与数据库的实际操作，增加了广泛的综合性管理信息的知识，掌握了更多的实践方法。通过信息系统的学习，使我们知道了业务流程图，业务流程图和数据字典，需求分析这些在一个系统的制作过程中非常重要的东西，同样也是很实用，对我们帮助很大的东西，通过这个的学习使我们知道了逻辑的重要性，而且考虑问题的全面性。通过数据库系统概论和的学习我们了解到了数据库背后的那些很深奥的东西，表之间的联系和关系，数据哭对于一个系统来说有一种不可或缺的作用。VB的学习给这个系统提供了一个很好的前台，使我们做出来的东西可以很好的表达出来。 这个系统的制作更加深了我们对这几门课的深刻的理解，也使我们对计算机有了更进一步的认识，感谢这次在系统过程中指导我们的老师。第七章 附录（代码）Dim myrs As New ADODB.RecordsetDim SQL As StringPrivate Sub Command1_Click()Dim i As IntegerIf txtItem(0) = "" Or txtItem(1) = "" ThenMsgBox ("请把用户名或者密码输入完整！")Else: SQL = "select * from 用户信息表 where 用户名='" & Trim(txtItem(0) & "' "Set myrs = SelectSQL(SQL)If myrs.RecordCount > 0 ThenIf Trim(txtItem(0) = Trim(myrs.Fields(1) ThenB启动菜单.Showmyrs.CloseUnload MeElse: MsgBox ("密码不正确!")End IfElse: MsgBox ("该用户不存在!")End IfEnd IfEnd SubPrivate Sub Command2_Click()C用户登录.Enabled = TrueUnload MeEnd SubPrivate Sub Form_Load()txtItem(1).PasswordChar = "*"End SubPublic Function Cnn(cnstr As String) As ADODB.ConnectionSet Cnn = New ADODB.ConnectionCnn.Open cnstrEnd FunctionPrivate Function SelectSQL(ByVal SQL As String) As ADODB.Recordset'执行SQL语句，返回ADODB.Recordset Dim rst As New ADODB.Recordset Dim str As String str = "driver=SQL SERVER;Server=(LOCAL);database=宿舍管理;Uid=sa;pwd=" rst.Open Trim$(SQL), Cnn(str), adOpenKeyset, adLockOptimistic Set SelectSQL = rst End FunctionPrivate Sub Form_Unload(Cancel As Integer)C用户登录.Enabled = True '退出操作End SubDim SQLS As StringPrivate Sub Command1_Click()If Checkdata = True ThenSQLS = "insert into 用户信息表 values('" & Trim(Text1.Text) & "','" & Trim(Text2.Text) & "')"Call ExecuteSQL(SQLS)MsgBox ("成功添加用户")End IfEnd SubPublic Function Checkdata() As BooleanDim kkk As StringDim SQL As StringDim hs As ADODB.RecordsetSQL = "select 用户名 from 用户信息表 where 用户名='" & Trim(Text1.Text) & "'"Set hs = SelectSQL(SQL)If Text1.Text = "" Or Text2.Text = "" ThenMsgBox ("请输入用户名或密码!")ElseIf hs.RecordCount <> 0 ThenMsgBox ("此用户名已经存在!")Else: Checkdata = TrueEnd IfEnd FunctionPrivate Sub ExecuteSQL(ByVal SQL As String)Dim Cnn As New ADODB.Connection Dim str As String str = "driver=SQL SERVER;Server=(LOCAL);database=宿舍管理;Uid=sa;pwd=" Cnn.Open strCnn.Execute SQLEnd SubPublic Function Cnn(cnstr As String) As ADODB.ConnectionSet Cnn = New ADODB.ConnectionCnn.Open cnstrEnd FunctionPrivate Function SelectSQL(ByVal SQL As String) As ADODB.Recordset'执行SQL语句，返回ADODB.Recordset Dim rsts As New ADODB.Recordset Dim str As String str = "driver=SQL SERVER;Server=(LOCAL);database=宿舍管理;Uid=sa;pwd=" rsts.Open Trim$(SQL), Cnn(str), adOpenKeyset, adLockOptimistic Set SelectSQL = rsts End FunctionPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Unload(Cancel As Integer)B启动菜单.Enabled = TrueUnload MeEnd Sub参考文献：1郑阿奇主编.SQLServer实用教程，电子工业出版社，2009.32许庆芳、翁婉真编.程序设计与应用教程，清华大学出版社，2007.93邝孔武、邝至云编.管理信息系统分析与设计，西安电子科技大学出版社，2003.64杜栋编著信息管理学教程，清华大学出版社，200585黄梯云主编.管理信息系统，高等教育出版社，20053