期末作业管理信息系统案例分析.docx

1、期末作业管理信息系统案例分析个管理信息系统实验报告题目 图书管理系统系统分析 指导老师 XXX 专 业 工商管理 姓 名 XXX 学 号 07 2013年5月第一章图书管理系统分析1.前言本系统结构分为读者信息管理模块，书籍信息管理模块，借阅信息管理模块，管理者信息管理模块。读者信息管理部分有两方面的功能，可以浏览读者的信息，可以对读者信息进行维护。书籍信息管理可以浏览书籍的信息，可以对书籍信息进行维护。借阅信息管理可以显示当前数据库中书籍借阅情况，可以对借阅信息进行维护。管理者信息管理可以显示数据库中管理者的情况，可以对管理者信息进行维护。可见，本系统并不复杂，主要解决的问题是利用关键字对数

2、据库进行查询。编写目的 系统开发的总的设计目标是实现图书管理的系统化、规范化和自动化，实现对图书资料的集中统一的管理。1.2 背景近年来，随着图书馆规模的不断扩大，图书数量也相应的增加，有关图书的各种信息量也成倍增加，面对着庞大的信息量，传统的人工方式管理会导致图书馆管理上的混乱，人力与物力过多浪费，图书馆管理费用的增加，从而使图书馆的负担过重，影响整个图书馆的运作和控制管理，因此，必须制定一套合理、有效，规范和实用的图书管理系统，对图书资料进行集中统一的管理。 另一方面，IT产业和Internet获得了飞速发展，计算机应用已渗透到了各个领域，引起信息管理的革命，实现了信息的自动化处理，提高了

3、处理的及时性和正确性。 图书管理工作面对大量的可模块化处理的信息，是当今信息革命的一个重要阵地。我们小组开发图书管理信息系统就是采用现代化的信息管理方式代替手工管理方式，提高图书管理工作效率，作到信息的规范管理，科学统计和快速查询，让图书馆更好的为学校，社会服务。（1）产品名称：图书管理系统（2）任务提出者：大连电视大学（3）产品开发：第三开发小组（4）产品用户：图书管理人员（5）产品所有权：田亮1.3 参考资料 （1）VISUL BASIC 可视化编程 （2）VISUL BASIC 程序设计 （3）信息系统开发案例分析与课程设计2 项目概述2.1系统开发前提这是一个图书管理系统，主要负责图书

4、的采购信息存档、对图书信息的查询及编辑、对学生相关信息的管理、对借阅书本情况的管理；2.2系统开发的基本目标A.由于原先图书管理采用的人工系统，浪费人力物力财力，图书管理系统可以改善这种情况，只需一台电脑和一个管理员老师就能轻松完成。 B.提高对新书入库、借阅图书以及学生信心管理的速度。 C.减少人力的投入的同时提高了信息处理的精度和准确度，在输入无误的基础上可保证数据的正确性。 D.改进了管理服务的质量，可由系统对入库图书进行自动分类、归类，学生信息整理、借阅情况登记入档。 E.改进人员的利用率，减少了前台操作人员，更多的人员可用于为借阅者服务、更新采购图书等其他事物，节省人力资源。2.3

5、经济目标节省人力，物力的开支，从而达到一人一台电脑就能完成图书管理。2.4 社会目标采取的是人工方式，相对而言耗时大，效率低。而根据现有的硬件条件以及工作制度，在办公室中，管理学籍的老师都配备电脑。而且电脑的系统软件都是WINDOWS2000 以上的，所以足够可以来运行我们的软件；从学院老师们的文化素质来看，我们的软件操作简单，运行方便。2.5 开发规模该系统软件开发总人数：8辅导老师：任东华组长：冯昊程序分析：全体开发人员2.6系统流程客户端程序流程图3 可行性研究的方法及评价度3.1 经济可行性目标系统开发需求比较低，加上具有成熟的软硬件环境，所以在软硬件的支出上十分有限。而且，目标系统并

6、不是十分的复杂，开发的周期较短，人员经济支出有限。当系统开发完实际运行后，将很大程度上提高计算机的功能，在为使用者带来便利的同时，也为系统的进一步推广创造了条件。这带来的经济回报将远超过支出，并且最重要的一点是该软件的开发可以给我们对系统的开发有个全面的认识。从经济角度考虑，此信息系统开发可行。3.2 技术可行性就技术力量来说，我们小组可以完成此次开发工作。开发过程中会出现许多问题，有我们预想之中的，也有一些没有我们预想到，但，我们有信心克服一切困难。该学期，我们小组各成员已经学习了SQL SERVER，对网络技术和操作系统也有系统的了解，有些成员熟悉计算机原理，能解决常见的硬件故障和硬件选择

7、。目前，图书管理信息系统已得到了大量应用，有许多可供参考的成功系统。而且，网上有许多关于VISUL BASIC编程的资料和SQL SERVER方面的资料。 从技术角度考虑，此信息系统开发可行3.3 法律可行性由于是自行开发，自行使用，所以系统本身不存在法律上的版权争议。在服务器软件方面，应该使用正版软件，如果不是正版软件，将不得不面临民事诉讼的风险。4 可行性分析结论 根据以上的可行性研究，我们小组认为开发此系统的条件已经具备，可以开始进行开发5 软件分析（1）. 由于原先图书管理采用的人工系统，浪费人力物力财力，图书管理系统可以改善这种情况，只需一台电脑和一个管理员老师就能轻松完成。 （2）

8、. 提高对新书入库、借阅图书以及学生信心管理的速度。 （3）. 减少人力的投入的同时提高了信息处理的精度和准确度，在输入无误的基础上可保证数据的正确性。 （4）. 改进了管理服务的质量，可由系统对入库图书进行自动分类、归类，学生信息整理、借阅情况登记入档。 （5）. 改进人员的利用率，减少了前台操作人员，更多的人员可用于为借阅者服务、更新采购图书等其他事物，节省人力资源。5.1 硬件需求（1）服务器最低配置：Pentium 4 2.4 GHZ内存256MB以上硬盘 30GB以上。（2）客户端最低配置：Pentium 3 633MHZ 内存256MB以上硬盘 30GB以上5.2 软件需求 系统：

9、Windows2000或Windows XP，Visual Basic 6.0 数据库：Access(Office2000或Office2003)5.3 功能需求（1）网络连接模块：用于连接服务器。（2）图书借阅管理模块：用于实现图书借阅信息的管理，包括借阅图书、归还图书、续借图书、缴纳罚款等功能（3）图书信息管理模块：管理图书资料，主要有图书类别管理、图书信息管理两部分，每部分都有查询、添加、维护等功能。（4）读者信息管理模块：用于实现读者资料数据的管理，主要包括查询读者信息、添加读者信息、删除读者信息、维护读者信息等功能。（5）管理员信息管理模块：用于实现管理员资料数据的管理，主要包括查询

10、管理员信息、添加管理员信息、删除管理员信息等功能。（6）数据统计模块：用于实现统计系统的基本数据，以便于系统的管理，主要包括图书借阅统计、未还图书统计、过期读者统计等功能。第二章模块结构管理员信息管理模块：用于实现管理员资料数据的管理，主要包括查询管理员信息、添加管理员信息、删除管理员信息等功能。（1）添加管理员：“Usr , 01 , Usr _ID ，Usr _Name”帧头“Usr”，类型号为01，接着是协议的具体内容, Usr_ID，Usr_Name要添加的管理员相关信息。（2）删除管理员：“Usr , 02 , Usr _ID”帧头“Usr”，类型号为02，接着是协议的具体内容, 只

11、有Usr_ID一项 ，是需要删除的管理员ID。（3）查询管理员：“Usr , 03 , Usr _ID”帧头“Usr”，类型号为03，接着是协议的具体内容, 只有Usr_ID一项 ，是需要查询的管理员ID关键字。第三章数据库设计表结构设计，字段定义。数据关系模式：管理员资料数据表（管理员ID，管理员姓名，管理员密码，权限类型，备注）管理员资料数据表（User_Info）名称类型宽度用途索引Usr_ID文本8管理员ID主索引Usr_Name文本20管理员姓名Usr_Pwd文本16管理员密码Usr_Type数字整型权限类型Usr_Remark文本255备注管理员资料数据表。管理员资料数据表记录了所

12、有管理员的基本资料，管理员可添加、删除和查询该表。该表包括管理员ID、姓名、密码和权限类型（系统管理员、高级管理员、普通管理员）等资料。第四章程序界面及编码一图书管理信息系统主窗体界面简介：管理员可以在主窗体上选择要操作的功能。此窗体属于功能一览的界面。图书管理系统登录界面登录界面的代码为：Private Sub mnuViewStatusBar_Click() StatusBar1.Visible = True - StatusBar1.Visible mnuViewStatusBar.Checked = StatusBar1.VisibleEnd Sub菜单栏的点击事件Private Su

13、b mnuViewToolbar_Click() Toolbar1.Visible = True - Toolbar1.Visible mnuViewToolbar.Checked = Toolbar1.VisibleEnd Sub winsock的关闭Private Sub winsock_Close() main.StatusBar1.Panels(1).Text = 服务器连接状态：断开。End Sub winsock的连接Private Sub winsock_Connect()Dim str As String str = Cnn, & UserNow.ID & , & UserNo

14、w.Pwd & , & winsock.LocalIP If main.winsock.State sckConnected Then MsgBox 还没有连接数据库，不能发送请求！ Exit Sub End If Me.winsock.SendData str MsgBox strEnd Sub winsock传递数据的数组Private Sub winsock_DataArrival(ByVal bytesTotal As Long)Dim StrArrival, a As String, StrGet() As String, StrGet1() As StringDim Start A

15、s IntegerDim i As Integer, j As Integer, k As IntegerDim LtItm As ListItemDim ss As StringDim qq As StringDim ww As StringMe.winsock.GetData StrArrival, vbString If Len(StrArrival) 1 Then Exit Sub 数组中数据的操作 StrGet() = Split(StrArrival, , -1) Select Case StrGet(0) Case abc MsgBox StrGet(1), , 服务器广播 Case Usr Select Case StrGet(1) Case 01 main.StatusBar1.Panels(1).Text = 服务器连