图书管理系统（附源代码）

1、毕业设计论文海 洋 学 院信息工程系毕业设计题 目： 图书管理系统 学 院： 河北农大海洋学院 专业班级： 信工系计应04-1班 学 号： 学生姓名： 指导教师： 二o一二年 六 月 十五 日 目录前言3摘要4第一章绪论51.1数据库应用开发5第二章 系统需求分析72.1系统性能要求：72.2项目背景72.3系统功能模块图：8第三章 系统设计93.1系统模块93.2系统数据库需求分析93.3系统数据库概念设计103.4版块e-r图103.4 acess2000数据库简介11第四章 系统实现124.1数据库逻辑设计124.2图书管理系统界面13第五章 源代码165.1数据库连接文件165.2版块

2、代码实现165.2.1 售书登记版块代码165.2.2 售书记录版块代码185.2.3 添加管理员版块代码195.2.4修改密码版块代码205.2.5关于系统版块代码20第六章 设计体会21第七章 感谢21参考文献21前言通过海洋学院3年的学习中，使我收益非浅。在这里我认识了很多的好老师，结交了许多朋友，更重要的是学习到了很多知识。在这里先要感谢传授我知识的老师和陪我度过3年学习的同窗好友。随着经济文化水平的显著提高，人们对生活质量及工作环境的要求也越来越高。书籍做为人类的精神食粮，在现代社会中越来越受到重视，大量的书籍出现在市场上，人们有了各种各样不同的选择。与此同时，作为阅读图书的重要场所

3、图书馆为了管理大量的图书，图书管理问题也就提上了日程。随着图书的大量增加，其管理难度也越来越大，如何优化图书日常管理也就成为了一个大众化的课题。采用计算机管理信息系统已成为图书借阅管理科学化和现代化的重要标志，它给图书馆的管理来了明显的经济效益和社会效益。主要体现在：极大提高了图书馆人员的工作效率，大大减少了以往入出存流程繁琐，杂乱，周期长的弊端。可以减少图书入库管理、出库管理及库存管理中的漏洞，可以节约不少管理开支。为了加快图书借阅管理自动化的步伐，提高管理业务处理效率，建立图书借阅管理系统已变得十分心要。通过对图书借阅管理日常工作的详细调查，搜集了大量的资料，从系统结构的组织，功能的实现，

4、技术的要求以及可行性等多方面进行考虑，认为本课题是一个适应现今图书借阅管理需求的计算机信息管理系统，具有一定的实际开发价值和使用价值。摘要社会当今科技日益发展迅猛,在这样一个知识大爆炸的时代里图书馆作为一个获取知识一个不可缺少的单元,其重要性是不言而喻的.图书馆在正常的运营过程中总是面对大量的读者信息、书籍信息以及两者相互作用所产生的借书信息、还书信息.因此快捷方便的对读者资源、书籍资源、借书信息、还书信息进行管理,如何提高工作效率成为一个关键性的问题.在此基础以上构建了针对于中小型校园图书管理系统.本论文阐述了校园图书管理系统详细开发过程。 括了借阅信息管理、书籍信息管理、读者信息管理、系统

5、管理等几大模块. 全文介绍了这些模块的功能，程序设计及实现。具体从系统概叙、需求分析、总体设计、数据库结构、程序编制、模块实现、技术背景、心得体会等几个方面对此系统进行了阐述【关键字】visualbasic6.0、access、借阅abstractsocial science and technology are growing rapidly in such a big explosion of knowledge era as a library to acquire knowledge an indispensable module, and its importance is self

6、-evident. library in the normal course of the operation is always faced with a lot of readers information, books and information arising from the interaction between library information, book information. so convenient for readers to resources, books resources, library information, book information

7、management, how to improve efficiency as a key issue. on this foundation and address in a medium-sized campus library management system. this paper elaborated on the campus library management system detailed development process. the system includes a library information management, information manag

8、ement books, readers information management, system management, several major modules. these modules introduced by the function, and design procedures to achieve. specific system shall from syria, demand analysis, design, database structures, programming, modular realization, technical background, a

9、nd experience several aspects of this system described【keywords】book, visualbasic6.0, access, reader, borrow to read第一章 绪论1.1数据库应用开发 在数据库应用系统开发之前，对开发数据库的基本概念应当了解，对数据库的结构、开发数据库应用程序的步骤、开发体系及方法都应当有相当清晰的了解和认 数据库应用系统开发的目标是建立一个满足用户长期需求的产品。开发的主要过程为：理解用户的需求，然后，把它们转变为有效的数据库设计。把设计转变为实际的数据库，并且这些数据库带有功能完备、高效能的应

10、用。 数据库技术在计算机软件邻域研究中一直是非常重要的主题，产生于60年代，30多年来数据库技术得到了迅速发展，并已形成较为完整的理论体系和一大批实用系统。并且，近年来，随着world wide web(www)的猛增及internet技术的迅速发展，使得数据库技术之时成为最热门技术之一。 数据库系统把用户数据表示为关系。现在把关系看作数据表。表的列包含域或属性，表的行包含对应业务环境中的实体的记录。并非所有的关系都同样符合要求，有些关系比其它关系更结构化一些。1.1.1索引 改进了数据库的性能和可访问性，这种数据经常称作开销数据，尽管有时也采用其他类型的数据结构，如链表，但它主要还是索引。索

11、引可以用来排序和快速访问数据。下面以本人的图书管理信息系统中的book表为例来说明 磁盘上是按图书编号的递增顺序排列的，用户想打印一个按图书名称排序的图书数据报表。为此，所有的数据都需要从源表中提取出来并排序，除非表很小，否则这是一个很费时的过程。或者，可以在图书名称字段上创建一个索引，该索引的条目按照图书名称排序，这样，该索引的条目可以读出来，并用来按顺序访问book数据。引对排序和查找是有帮助的，但要付出代价。book表中的行每次改变时，索引也必须改变，这意味着索引并非随意的，应该在真正需要时保存。 1.1.2 数据库管理系统 dbms是数据库系统的核心组成部分。对数据库的一切操作，包括定

12、义、更新及各种控制,都是通过dbms进行的。dbms总是基于某种数据模型，可以把dbms看成是某种数据模型在计算机系统上的具体实现。根据数据模型的不同，dbms可以分成层次型、网状型、关系型、面向对象型等。ms sql server2000就是一种关系型数据库管理系统。 关系模型是由若干个关系模式组成的集合。关系模式相当于前面提到的记录类型，它的实例称为关系，每个关系实际上是一张二维表格。 关系模型和层次、网状模型的最大判别是用关键码而不是用指针导航数据，表格简单用户易懂，编程时并不涉及存储结构，访问技术等细节。关系模型是数学化模型。sql语言是关系数据库的标准化语言，已得到了广泛的应用。 设

13、计子系统有一个方便数据库及其应用创建的工具集。它典型地包含产生表、窗体、查询和报表的工具。dbms产品还提供编程语言和对编程语言的接口。 运行子系统处理用设计子系统开发的应用组件。它所包含的运行处理器用来处理窗体和数据库的数据交互，以及回答查询和打印报表等。 1.1.3 创建数据库 1.1.4 数据库模式 数据库模式是一种设计，数据库和应用正是建立在此基础上的。数据库模式定义了数据库的结构、表、关系、域和业务规域是一列可能拥有的值的集合。必须为每一个表的每一列确定域。除了数据的物理格式外，还需要确定是否有些域对表来说是唯一的。 业务规则是模式的一个重要部分，因为他们指定了无论什么数据变化到达d

14、bms引擎，允许的数据值必须满足的约束。不管无效的数据变化请求是来自窗体的用户、查询/修改请求还是应用程序，dbms都应该拒绝。 1.1.5 创建表 1.1.6 定义联系 1.81.7应用组件 数据库应用包括窗体、查询、报表、菜单和应用程序。 1.2 图书管理系统 当今时代信息开发，正是计算机被广泛应用于信息管理系统的环境。计算机的最大好处在于利用它能够进行信息管理。使用计算机进行信息控制，不仅提高了工作效率，而且大大的提高了其安全性。尤其对于复杂的信息管理，计算机能够充分发挥它的优越性。计算机进行信息管理与信息管理系统的开发密切相关，系统的开发是系统管理的前提。本系统就是为了管理好图书馆信息

15、而设计的。 图书馆采取手工方式对图书借阅情况进行人工管理，由于信息比较多，图书借阅信息的管理工作混乱而又复杂；一般借阅情况是记录在借书证上，图书的数目和内容记录在文件中，图书馆的工作人员和管理员也只是当时对它比较清楚，时间一长，如再要进行查询，就得在众多的资料中翻阅、查找了，造成查询费时、费力。如要对很长时间以前的图书进行更改就更加困难了。数据处理手工操作，工作量大，出错率高，出错后不易更改。 基于这此问题，我认为有必要建立一个图书管理系统，使图书管理工作规范化，系统化，程序化，避免图书管理的随意性，提高信息处理的速度和准确性，能够及时、准确、有效的查询和修改图书情况。 第二章 系统需求分析2

16、.1系统性能要求：系统安全、可靠；功能齐全；操作方便、界面友好；易于维护和扩充。2.2项目背景 随着社会信息量的与日俱增，作为学校需要有一个很好的图书管理系统对学生的借还书进行管理，方便图书馆对学生借书信息的查询、插入、修改和维护，也方便学生对自己所借图书的了解。在计算机日益普及的今天，对学校而言若采用一套行之有效的图书管理系统来管理学生的借书情况会方便许多。图书管理系统sgms v1.0是一套功能比较完善的数据管理软件，具有数据操作方便高效迅速等优点。该软件采用功能强大的数据库软件开发工具进行开发，具有很好的可移植性，可在应用范围较广的windows系列等操作系统上使用。2.3系统功能模块图

17、： 图 书 系 统 关于帮助系统管理图书销售系统介绍关于系统退出系统修改密码填加管理员售书登记售书记录图2-3-1系统模块第三章 系统设计3.1系统模块 销 售 模 块 读者身份查验 用户界面售书记录 输入 输入 获取相 关信息 输出 数据库查询 售书登记 操作命 令生成数据库操作 图3-1-1销售模块系统管理模块 修改密码添加新用户输入新密码确认密码输入密码确认新密码添加用户户 选择权限退出系统 图3-1-2系统管理模块 3.2系统数据库需求分析设计数据库之前，应该首先了解用户需求，弄清用户需要存储、更新、查询哪些数据，弄清这些数据之间的关系和流向；然后对这些需求进行分析，总结出数据项和数据

18、结构。根据系统功能的分析和需求总结，考虑到将来功能上的扩展，设计到如下的数据项和数据结构。 售书登记，包括：书籍编号、出售数量、出售日期、登记人等。 售书记录，包括：查询某一时间段的记录等。 添加用户，包括：输入新用户、输入密码、确认密码、选择权限等。 关于系统，包括：系统帮助、系统介绍等。3.3系统数据库概念设计得到上面的数据项和数据结构后，就可以设计出能够满足用户需求的各种实体，以及它们之间的关系，为后面的逻辑结构设计打下基础。这些实体包含各种实体信息，通过相互之间的作用形成数据之间的流动。本系统根据上面的设计规划出的实体有：售书登记实体、售书记录实体、添加用户实体、修改密码实体、系统介绍

19、实体。 3.4版块e-r图书籍编号编号备注信息书 名售书登记出售数量出售日期登记人图3-4-1售书登记实体e-r 新用户名输入密码 确认密码添加用户选择权限图3-4-2添加用户实体e-r图介 绍关于系统帮 助图3-4-3关于系统实体e-r图 3.4 acess2000数据库简介access 是office2000里面的一个组件。是用来制作简单的数据库。 还有的意思就是访问、还有接入的意思。 如access list 访问列表 access point 接入点 在办公软件office套件中，最为广大用户熟悉的是word和excel，因为它们功能强大且方便易用，更因为它们不仅可用于办公，还可用于个

20、人写作和家庭记帐理财等。同为office套件中一部分的access，虽然有着同样强大的功能，但使用的人却相对少些，不像word和excel那样广泛。事实上，真正用过access的用户，对其强大功能和灵活应用均称赞有加。 access 数据库管理系统是microsoft office 套件的重要组成部分，适用于小型商务活动，用以存贮和管理商务活动所需要的数据。access不仅是一个数据库，而且它具有强大的数据管理功能，它可以方便地利用各种数据源，生成窗体（表单），查询，报表和应用程序等。 microsoft access是一种关系式数据库，关系式数据库由一系列表组成，表又由一系列行和列组成，每一

21、行是一个记录，每一列是一个字段，每个字段有一个字段名，字段名在一个表中不能重复。图1是一个“产品”表的例子。“产品”表由10个记录组成，一个记录占一行，每一个记录由产品id、产品名称、库存量、订货量、单价和折扣率6个字段组成。“产品id”是字段名，其下面的1，2等是字段的值。 表与表之间可以建立关系（或称关联，连接），以便查询相关联的信息。access数据库以文件形式保存，文件的扩展名是mdb。 access 数据库由六种对象组成，它们是表、查询、窗体、报表、宏和模块。 表(table) 表是数据库的基本对象，是创建其他5种对象的基础。表由记录组成，记录由字段组成，表用来存贮数据库的数据，故又

22、称数据表。 查询(query)查询可以按索引快速查找到需要的记录，按要求筛选记录并能连接若干个表的字段组成新表。 窗体(form) 窗体提供了一种方便的浏览、输入及更改数据的窗口。还可以创建子窗体显示相关联的表的内容。窗体也称表单。 报表(report) 报表的功能是将数据库中的数据分类汇总，然后打印出来，以便分析。 宏(macro) 宏相当于dos中的批处理，用来自动执行一系列操作。access列出了一些常用的操作供用户选择，使用起来十分方便。 模块(module) 模块的功能与宏类似，但它定义的操作比宏更精细和复杂，用户可以根据自己的需要编写程序。模块使用visual basic编程第四章

23、 系统实现退出系统4.1数据库逻辑设计数据库的概念结构设计完毕后，现在可以将上面的数据库概念结构转化为某种数据库系统所支持的实际数据概念，也就是数据库的逻辑结构。4.2图书管理系统界面图书管理系统中各个界面的设计结果如下面表格所示。图4-2-1.用户主界面 图4-2-2售书登记界面图4-2-3售书记录界面 图4-2-4添加用户界面 图4-2-5修改密码界面图4-2-6 关于系统界面 图4-2-7 系统介绍界面第五章 源代码5.1数据库连接文件为了操作方便,所连接数据库、查询、更新、插入、关闭、连接等数据库操作都写在一个公用文件conn.asp中，这样其他页面引入这个页面，就可以调用数据库操作方

24、法，操作数据库了，这样便于提高程序的重用性，下面给出了这段程序的参考代码。用于标记连接对象 public conn as new adodb.connection 用于打开数据库rs_leibie.open sql, conn, adopenkeyset, adlockpessimistic5.2版块代码实现5.2.1 售书登记版块代码if trim(text1.text) = then msgbox 图书编号不能为空, vbokonly + vbexclamation, text1.setfocus exit subend ifif trim(text2.text) = then msgbo

25、x 书名不能为空, vbokonly + vbexclamation, text2.setfocus exit subend ifif trim(text3.text) = then msgbox 请填写售书数量!, vbokonly + vbexclamation, text3.setfocus exit subend if if not isdate(text4.text) then msgbox 请按照 年-月-日 格式输入日期, vbokonly + vbexclamation, text4.setfocus exit sub end if sql = select * from 图书

26、销售 where 书籍编号= & text1.text & rs_addsellbook.open sql, conn, adopenkeyset, adlockpessimisticif rs_addsellbook.eof then rs_addsellbook.addnew rs_addsellbook.fields(0) = trim(text1.text) rs_addsellbook.fields(1) = trim(text2.text) rs_addsellbook.fields(2) = trim(text3.text) rs_addsellbook.fields(3) =

27、trim(text4.text) rs_addsellbook.fields(4) = trim(text5.text) rs_addsellbook.fields(5) = trim(text6.text) rs_addsellbook.update msgbox 售书信息填写成功！, vbokonly, rs_addsellbook.close text1 = text2 = text3 = text4 = text5 = text6 = else rs_addsellbook.movelast rs_addsellbook.movenext rs_addsellbook.addnew r

28、s_addsellbook.fields(0) = trim(text1.text) rs_addsellbook.fields(1) = trim(text2.text) rs_addsellbook.fields(2) = trim(text3.text) rs_addsellbook.fields(3) = trim(text4.text) rs_addsellbook.fields(4) = trim(text5.text) rs_addsellbook.fields(5) = trim(text6.text) rs_addsellbook.update msgbox 售书信息填写成功

29、！, vbokonly, rs_addsellbook.close text1 = text2 = text3 = text4 = text5 = text6 = end ifend sub5.2.2 售书记录版块代码 if not isdate(text1.text) then msgbox 请按照 年-月-日 格式输入日期, vbokonly + vbexclamation, text1.setfocus exit subend ifif not isdate(text2.text) then msgbox 请按照 年-月-日 格式输入日期, vbokonly + vbexclamatio

30、n, text2.setfocus exit subend ifwhere 日期 between # & dtpicker1 & # and # & dtpicker2 & # sql = select * from 图书销售 where 售书日期 between # & cdate(text1.text) & # and # & cdate(text2.text) & #rs_findbook.cursorlocation = aduseclientrs_findbook.open sql, conn, adopenkeyset, adlockpessimisticrs_findbook.m

31、ovefirstif rs_findbook.eof = false then datagrid1.allowaddnew = false datagrid1.allowdelete = false datagrid1.allowupdate = false set datagrid1.datasource = rs_findbook rs_findbook.closeelse msgbox 你所查询的图书不存在！，请重新查询, vbokonly + vbexclamationend ifend sub5.2.3 添加管理员版块代码if trim(text1.text) = then msgb

32、ox 用户名不能为空, vbokonly + vbexclamation, exit sub text1.setfocuselse sql = select * from 系统管理 rs_add.open sql, conn, adopenkeyset, adlockpessimistic while (rs_add.eof = false) if trim(rs_add.fields(0) = trim(text1.text) then msgbox 已有这个用户, vbokonly + vbexclamation, text1.setfocus text1.text = text2.tex

33、t = text3.text = combo1.text = exit sub else rs_add.movenext end if wend if trim(text2.text) trim(text3.text) then msgbox 两次密码不一致, vbokonly + vbexclamation, text2.setfocus text2.text = text3.text = exit sub elseif trim(combo1.text) system and trim(combo1.text) guest then msgbox 请选择正确的用户权限, vbokonly

34、+ vbexclamation, combo1.setfocus combo1.text = exit sub else rs_add.addnew rs_add.fields(0) = text1.text rs_add.fields(1) = text2.text rs_add.fields(2) = combo1.text rs_add.update rs_add.close msgbox 添加用户成功, vbokonly + vbexclamation, unload me end ifend ifend sub5.2.4修改密码版块代码if trim(text1.text) trim

35、(text2.text) then msgbox 密码不一致！, vbokonly + vbexclamation, text1.setfocus text1.text = text2.text = elseif trim(text1.text) = or trim(text1.text) = thenmsgbox 密码不能为空, vbokonly + vbexclamation, else sql = select * from 系统管理 where 用户名= & userid & rs_chang.open sql, conn, adopenkeyset, adlockpessimistic rs_chang.fields(1) = text1.text r