图书馆管理系统设计报告

1、1.2 后台数据库介绍系统开发平台介绍1.1 开发工具介绍本系统所使用的开发工具是Visual Basic 6.0。Visual Basic 6.0 是 Microsoft Visual Studio 6.0 可视化工具中的一个开发系统。是一个用于快速开发基于Windows勺客户机/服务器应用程序的高效工具，与以前各版本相比Visual Basic 6.0 具有以下新特点。1 提 供了高效能的源码编译器，使应用程序得到优化。2 提 供了新的比其他数据访问接口更加方便，更加全面的数据访问接口 ADO(ActiveX Data object) ，能访问除了标准的关系型数据库(如Access Fox

2、pro SQL server 等)中的数据库外，还能访问邮件数据，Webik的文本或图形目录服务器等信息。3 .提供了动态的HTM页面设计器。4 .提供了 WEB CAASS计器。Visual Basic 6.0 开发软件的优势：1 可 视化程序设计2 面 向对象的程序设计3 事 件驱动的编程机制4 高 度的扩充性5 支 持大型数据库的连接与存取操作本系统所使用的后台数据库是Access数据库数据库引擎数据库引擎是一种管理数据怎样被存储和检索的软件系统，数据库的基本功能就是由它来提供的。数据库引擎有许多种，本系统所涉及的数据库引擎是Microsoft Jet 。 Jet 不是一个商业产品, 准

3、确的说它是好几个Microsoft 产品使用的子系统，在Visual Basic 3.0 和 Microsoft Access1.0 中 Microsoft 就引入了这个引擎，以后 Microsoft 经常修正这个引擎，并且不断提升其功能。本系统涉及的版本是 Jet3.51二 系统分析设计数据库系统时，应该充分了解用户各方面需求，包括现有的以及将来可能增加的需求，数据库设计一般包括以下几个步骤：（ 1） 数据需求分析、（ 2） 数据库概念结构设计（ 3） 数据库逻辑结构设计2.1 数据库需求分析用户的需求具体体现在各种信息的提供，保存，更新和查询。这就要求数据库的结构能充分满足各种信息的输入和

4、输出。在仔细分析调查有关图书馆管理信息需求的基础上设计出如图（见附录图书馆管理系统数据流程图） 所示的数据流程针对图书馆管理系统的需求，通过对图书馆管理工作过程的内容和数据流程分析，设计出如下的数据项1 书库图书信息，包括数据项有：图书编号、书名、 书号、 类别、 出版社、作者、ISBN、印张、字数、版次、印数、定价、开本、是否在库、是否损坏、是否遗失、入库时间、图书介绍2 学生信息，包括数据项有：学生编号、学号、 姓名、 性别、 系别、 班级、级别、已借图书、照片3 借书信息，包括数据项有：图书序号、学生序号、是否归还、书名、姓名、学号、书号、系别、班级、已借图书、出版社、作者、借阅日期、图

5、书类别、是否续借4 供货商信息，包括数据项有：供货商序号、供货商、 城市、 地址、 电话、传真、邮政编码、EMAIL、联系人、首次合作时间5 定单信息，包括数据项有：定单序号、书名、书号、类别、出版社、作者、ISBN、印张、字数、版次、印数、定价、开本、详细信息、供货商序号、供货商、联系人、城市、订购数量、订购价格、交付方式、交货日期、定单日期、是否验收、验收日期6 过期图书信息，包括数据项有：图书序号、书名、书号、学生序号、学生姓名、系别、班级、过期时间7 员工信息，包括数据项有：员工序号、姓名、密码、类别、性别、家庭住址、联系电话、职务、出生日期、照片8 罚款信息，包括数据项有：流水号、罚

6、款原因、罚款金额、日期2.2 数据库概念结构设计得到上面的数据项就能够设计出以下各种实体以及它们的关系，为后面的 逻辑结构设计打下基础根据上面的实力设计规划出的实体有：图书信息实体、学生信息实体、借 阅信息实体、供货商信息实体、定单信息实体、过期图书实体、员工信息实体、 罚款信息实体。2-3借阅信息实力Ghs（供货商信Jhfk（罚款信息实 jX.Orders定单信息阡2-9'各实体间关系图2.3 数据库逻辑结构设计图书馆管理系统中数据库的各个表格设计结果如下:表2-1： shukubiao 书库图书信息表列名数据口说明图书序号Text图书的编号，唯一书号Text图书书号书名Text书名

7、类别Text图书类别出版社Text出版社作者Text作者ISBNText图书ISBN号印张Text图书印张字数Text字数版次Text图书版次印数Text印数定价Currency图书定价开本Text开本是否在库Boolean是否在书库中的标志是否损坏Boolean是否损坏的标志是否遗失Boolean是否遗失的标志入库时间Date/Time图书入库的日期图书介绍Text图书的简单介绍表 2-2 : xueshengbiao书库图书信息表列名数据类型说明学生序号Text学生的编号，唯一学号Text学号，不唯一姓名Text学生姓名性别Boolean性别系别Text学生系别班级Text学生所在班级级别

8、Integer学生的级别，表示借书的能力已借图书Integer已经借过图书多少本照片Text存放学生照片的路径表2-3 : jh借阅信息表列名数据类型说明图书序号Text图书序号学生序号Text学生序号书名Text书名姓名Text学生姓名学号Text学号书号Text书号系别Text学生系别班级Text学生班级已借图书Integer学生已经借阅的图书数量出版社Text出版社作者Text图书作者借阅日期Date/Time借阅日期图书类别Text图书类别是否归还Boolean该书是否归还续借Boolean该书是否续借过表2-4 ghs供货商信息表列名数据类型说明供货商序号Text供货商序号供货商Te

9、xt供货商城市Text城市地址Text地址电话Text电话传真Text传真邮政编码Text邮政编码EMAILTextEMAIL联系人Text联系人首次合作时间Date/Time首次合作时间表2-5 orders 定单信息表列名数据类型说明定单序号Text定单序号书名Text书名类别Text类别出版社Text出版社作者Text作者ISBNTextISBN印张Text印张字数Text字数版次Text版次开本Text开本印数Text印数定价Currency定价详细信息Text详细信息供货商序号Text供货商序号供货商Text供货商联系人Text联系人城市Text供货商城市订购数量Integer订购数

10、量订购价格Currency订购价格交付方式Text交付方式交货日期Date/Time定单验收的日期书号Text书号定单日期Date/Time定单填写的日期是否验收Boolean定单验收的标志验收日期Date/Time定单验收日期表2-6 gqs过期书信息表列名数据类型说明图书序号Text图书序号书名Text书名书号Text书号学生序号Text学生序号学生姓名Text学生姓名系别Text系别班级Text班级过期时间Date/Time过期的天数表2-7 passwordl员工信息表列名数据类型说明姓名Text员工姓名员工序号Text员工序号密码Text密码类别Boolean员工权限级别性别Text

11、性别家庭住址Text家庭住址联系电话Text联系电话职务Text职务出生日期Date/Time出生日期照片Text存放员工照片的路径表2-8 jhfk罚款信息表列一数据类型说明流水号Long流水号罚款原因Text罚款原因罚款金额Currency罚款金额日期Date/Time日期2.4 设计方案构思2.4.1 图书馆管理信息系统的功能分析图书馆管理具有自身鲜明的特点：(1)根据操作人员的级别不同设置权限，对系统的操作有权限的设置(2)能够实现图书的借、还、续借功能(3)具有对图书库的一般性维护的功能，包括过期书统计、损坏书统计(4)能够实现图书的采购、下定单及定单验收、图书出库的功能(5)能够实

12、现学生及供货商的注册、浏览、删除、查询功能(6)能够实现员工的录入、修改等功能(7)能够实现书库借还图书情况、供货商、学生、员工信息的打印报表功能(8)能够实现数据备份功能2.4.2 图书馆管理信息系统的功能需求分析功能模块1分级权限2借还图书3书库维护4图书采购5学生及供货商管理系统总体功能模块框图如图2-10图书馆管理系统数据流程图弹驯如图 2-10书馆管理系统数据流程图图书馆管理系统数据流程图说明本系统需要数据输入的地方有：学生的录入和供货商的注册以及图书采购定单的填写即图书的入库在学生信息录入之前应先设置好学生的种类以及一些相关信息然后进行学生信息的录入，学生信息保存在“xueshen

13、gbia'O表中，进行学生信息的管理；另外一个需要数据输入的地方为供货商的录入，供货商信息保存在“ghs”表中，根据供货商的信息进行供货商的管理最后一个需要数据输入的地方为图书采购定单的填写。在整个图书采购到图书入库的过程中需要所有的数据做为支持。首先学生信息和图书信息二者相互作用，形成图书的借阅信息；然后根据图书的借阅信息进行图书借阅信息的统计，统计出每一类图书的借阅数量等统计信息；这些统计信息的数据支持成为图书采购计划的重要依据，拟订图书的采购任务计划；然后根据供货商信息选择图书采购计划的供货商；根据以上这些信息进行图书采购的定单的填写，图书采购定单保存在Orders表中，形成图书

14、采购定单信息的管理；根据定单信息验收图书，同时图书入库。最后根据入库图书的类别设置进行图书信息管理，书库信息保存在“shukubiaO 中。本文涉及的代码：Public Sub SendMsgToForms(msg As VbMsgBoxResult)Dim frm As FormFor Each frm In Formsfrm.recmsg msgNext frmEnd SubVERSION 1.0 CLASSBEGINmultiuse = -1Endattribute vb_name="vbmsg"attribute vb_globalnamespace=falseat

15、tribute vb_creatable=trueattribute vb_predeclaredid=falseattribute vb_exposed=trueOption ExplicitPublic iType As LongPublic iName As StringPublic iSource As StringDim iT As DatePublic Property Get iTime() As DateiTime = iTEnd PropertyPublic Property Get itimestr() As StringEnd PropertyPrivate Sub cl

16、ass_initialize()iT = Now()End Sub'模块 2: MSGCLICLSVERSION1.0 CLASSBEGINMulitiuse = -1Endattribute vb_name="msgclient"attribute vb_globalnamespace=falseattribute vb_creatable=trueattribute vb_predeclaredid=falseattribute vb_exposed=trueOption Explicitpublic event recmsg(buval msg as VbMs

17、gBoxResult )Public minmsg As LongPublic maxmsg As LongPublic ID As LongPublic Sub setmsg(msg As vbmsg)If msg.iType >= minmsg And msg.itupe < maxmsg ThenRaiseEvent recmsg(msg)End IfEnd SubPublic Property Get key() As Stringkey = "id:" & IDEnd Property'模块 3: MSGCLICLSattribute

18、vb_name="modglobal"Option ExplicitPublic clients As New CollectionPublic clicount As LongVERSION1.0 CLASSBEGINMulitiuse = -1Endattribute vb_name="msgserver"attribute vb_globalnamespace=falseattribute vb_creatable=trueattribute vb_predeclaredid=falseattribute vb_exposed=trueOption ExplicitPublic Sub sendmsg(msg As VbMsgBoxResult)Dim c As msgclientFor Each c In clientsc.setmsg msgDoEventsNext cEnd SubPublic Sub addmsgclient(c As msgclient)clicount = clicount + 1c.ID = clicountclients.Add c, c.keyEnd SubPublic Sub delmsgclient(c As msgclient)clients.Remove c.keyIf