图书馆管理信息系统

摘要图书馆管理信息系统是为实现图书馆管理工作系统化、规范化、自动化。它将计算机操作及管理融到图书管理系统的实际运用中，使日常手工管理的复杂方法和过程被计算机简单、易行的操作所替代，一方面图书馆在正常运营中总是面对大量的读者信息、书籍信息及两者相互作用产生的借书信息、还书信息。因此需要对读者资源、书籍资源、借书信息、还书信息进行管理、及时了解各个环节的变更，使系统能够迅速、准确地向图书馆管理者提供有效的信息；另一方面也极大地减轻了工作人员的工作强度、提高了工作效率，充分地发挥了人力资源的作用。通过本系统，旨在促进图书馆管理系统的现代化、科学化和规范化。关键词数据字典；业务流程；数据流程；结构组织；业务组织AbstractThe library management information system is to achieve the library management standardization, systematization, automation. It will computer operation and management of the atoms in the books management system management system in practical application, make daily manual management by the complex method and process of computer is simple and feasible operation replaced, on the one hand, library in the normal running of always faced a lot of readers' information, books information and both interact to produce the books information, return books information. Therefore need to readers resources, books resources, borrow books information, return books information management, prompt understanding each link of change, the system can quickly, accurately to the library director offer effective information, On the other hand also greatly reduce staff working strength, improve work efficiency, fully played the role of human resources. Through this system, aims to promote the modernization of library management system, scientization and standardization. Key WordsData dictionary； Business process； The data flow； The organizational structure；Business organization目 录摘要IAbstractII插图索引V附表索引VII1引言11.1 项目来源11.2 任务目标12. 项目规划12.1 项目资源12.1.1 硬件设备12.1.2 软件环境12.1.3 软件工具22.2 项目规划22.2.1 任务描述22.2.2 进度安排33. 系统需求分析33.1 业务需求33.1.1 业务组织33.1.2 业务定义43.2 功能需求63.3 数据需求84. 系统结构设计104.1 总体框架104.2 软件结构114.3 数据结构135. 系统详细设计175.1 程序算法详细设计175.2 数据库详细设计195.3 界面设计216. 系统测试与使用236.1 系统测试情况236.2 系统使用说明257. 项目总结25参考文献26附录：系统程序源代码26插图索引图2.1 图书馆管理信息系统开发步骤2图2.2 图书馆管理信息系统进度安排3图3.1 图书馆管理信息系统的组织结构图4图3.2 图书馆管理信息系统的顶层数据流程图5图3.3 图书馆管理信息系统的业务流程图5图3.4 图书馆管理信息系统的功能模块图6图3.5 图书馆管理信息系统的顶层关联图6图3.6 图书馆管理信息系统的1层数据流程图7图3.7 图书采编系统数据流程图7图3.8 图书借阅系统数据流程图8图3.9 读者管理系统数据流程图8图3.10 图书馆管理信息系统的E-R图9图4.1 两层客户机/服务器结构11图4.2 图书馆管理信息系统软件结构图11图4.3 读者信息实体E-R图14图4.4 图书信息实体E-R图14图4.5 借阅信息实体E-R图15图4.6 电子读物信息实体E-R图15图4.7 留言信息实体E-R图15图5.1 读者注册登录模块流程图18图5.2 读者借阅模块流程图18图5.3 读者留言模块流程图19图5.4 登录界面21图5.5 读者主窗体界面22图5.6 管理员登录窗体界面22图5.7 图书管理窗体界面23图5.8 图书查询窗体界面23图6.1 登录窗体测试界面24图6.2 留言窗体添加界面24图6.3 留言窗体添加成功界面25图6.4 添加留言成功后的留言表25附表索引表3.1图书库数据字典9表3.2 读者库数据字典10表3.3 借阅库数据字典10表3.4 电子读物库数据字典10表3.4 留言库数据字典10表4.1“读者注册登录”模块的IPO图12表4.2“图书采编”模块的IPO图12表4.3“读者查询”模块的IPO图12表4.4 “电子读物”模块的IPO图13表4.5“读者留言”模块的IPO图13表4.6 读者数据项描述16表4.7 图书数据项描述16表4.8 借阅数据项描述16表4.9 电子读物数据项描述17表4.10 留言数据项描述17表5.1 读者表19表5.2 图书表20表5.3 借阅表20表5.4 电子读物表20表5.5 读者留言表20VII湖南商学院学年论文图书馆管理信息系统设计与开发1引言1.1 项目来源在原有的图书馆管理信息系统中, 借书和还书过程主要依靠手工。随着近年来信息技术及计算机网络技术的不断发展，图书馆也先从传统的图书馆发展到自动化图书馆，再发展到今天的数字图书馆，这些变化使得图书馆的形象越来越现代化，人们查找资料也更方便。读者借书只能到图书馆手工方式查找书目，而在手工操作方式下，图书的编目和借阅等的工作量大、效率低，准确性低且不易修改维护，不能满足借阅需求，因此需要建设一套网络化的电子图书管信息系统。1.2 任务目标该图书馆藏书上万，媒体满的借阅量近千册，服务对象主要包括两部分人：注册用户和一般读者。一般读者经注册成为注册用户，注册用户可以在图书馆借阅图书，其他人员只可查阅图书目录，但是不能借阅图书。该系统同时考虑提供电子读物服务，目前只提供电子读物的目录查询服务。不久的将来将有可能提供电子读物全文服务。用户课通过网络方式访问该图书馆管理信息系统。2. 项目规划2.1 项目资源2.1.1 硬件设备（1）服务器：奔腾双核处理器CPU2.20GHZ，2GB的内存。（2）客户端：Pentium（R）CPU2.80GHz，2G的内存（3）网络设备：100/1000MBPS以太网卡，双绞线，48口交换机2.1.2 软件环境（1）操作系统：Windows XP（2）数据库工具：Windows Office Access 20032.1.3 软件工具（1）建模工具：Microsoft Office Visio 2003（2）软件开发工具：Microsoft Visual Basic 6.0（3）数据库工具：Windows Office Access 20032.2 项目规划2.2.1 任务描述本系统采用自上而下的项目开发步骤，整个过程主要分为三个阶段。具体如图2.1所示： 图2.1 图书馆管理信息系统开发步骤第一阶段是系统分析阶段。它包括项目研究、需求研究和项目设计，主要是去各大中小图书馆进行调查分析，查阅相关资料和构思图书馆管理信息系统的项目方案，包括系统的业务需求的详细分析与系统的总体规划、设计，做出系统需求分析说明书；需求规格说明书；概要设计说明书；详细设计说明书；项目实施计划书。第二阶段是开发阶段。它包括确定图书馆管理信息系统的设计方案，逐步开始方案实施。主要是对图书馆管理信息系统的总体架构、软件结构、数据结构等的功能模块系统等内容进行详细设计及界面编码的实现。第三阶段是系统测试和系统评估阶段。主要是进行数据准备、数据初始化、单元测试、模块测试、压力测试、整合测试、图书馆管理信息系统的安装，系统调试等工作。最后邀请指导老师对系统进行评估。2.2.2 进度安排根据任务描述，在对该系统进行总体规划的基础上进行一个详细的安排。该系统全部开发过程用了2个月，具体用时分配如图2.2所示：图2.2 图书馆管理信息系统进度安排3. 系统需求分析3.1 业务需求3.1.1 业务组织图书馆由馆长负责全面工作，副馆长协助其工作，下设八室，分别为：财务室、办公室、技术支持室、采编室、期刊阅览室、图书借阅室、电子借阅室和学术论文室。该图书馆管理系统的组织结构如图3.1所示： 图3.1 图书馆管理信息系统的组织结构图他们各自的职责如下：(1) 财务室：主要负责财务方面的工作。(2) 办公室：主要负责图书馆日常工作，为读者办理借阅证、补办借阅证、借阅证挂失和图书仪式赔偿等手续。(3) 技术支持室：主要负责图书馆计算机管理系统和硬件设备的管理和维护。(4) 采编室：主要负责图书的采购、入库、分类、编目、粘贴标签及送往图书借阅室上架，供读者借阅。(5) 期刊阅览室：主要负责期刊的手机整理和借阅。(6) 图书借阅室：主要提供对读者书目查询和图书借阅服务。(7) 电子阅览室：主要负责收集整理电子读物，提供电子读物的查询和借阅服务。(8) 学术论文室：主要负责收集和整理学术论文。3.1.2 业务定义图书馆是直接面向读者的，读者在图书馆从注册、查询书目到借书还书完成整个过程，所以我们只考虑读者部分的顶层关联图。如图3.2所示。 图3.2 图书馆管理信息系统的顶层数据流程图3.1.3 业务流程图书馆管理员编制图书采购计划，由采购员负责新书的采购工作采购图书入库后，交采编室编目，粘贴标签，产生新的图书书目。图书交图书借阅室上架，工读者借阅；电子读物交电子阅览室。读者分为非注册读者和注册读者，只有注册读者可以在本图书馆借书，非注册读者只能查询书目。该图书馆管理信息系统的业务流程如图3.3所示： 图3.3 图书馆管理信息系统的业务流程图3.2 功能需求3.2.1 功能组成该图书馆管理信息系统主要完成图书采编、图书借阅、电子图书、图书维护和读者管理几大功能模块。各功能模块的功能描述及系统流程图如图3.4所示： 图3.4 图书馆管理信息系统的功能模块图3.2.2 功能逻辑图书馆在读者借阅的过程中，会伴随着数据的流动，也就是信息的传递和反馈过程。根据上述对图书馆管理信息系统的业务流程的分析，一下是得出系统的数据流程图。1. 顶层数据流程图图3.5 图书馆管理信息系统的顶层关联图2. 1层数据流程图 图3.6 图书馆管理信息系统的1层数据流程图3. 2层数据流程图图书馆管理信息系统的2层数据流程图有：图书采编系统数据流程图、图书借阅系统数据流程图、图书查询系统数据流程图、图书维护系统数据流程图、读者管理系统数据流程图和电子读物系统数据流程图。下面仅对图书采编系统、图书借阅系统和读者管理系统的数据流程图做详细分析。（1） 图书采编系统数据流程图 采编人员P1.1采编管理图书库图书采编信息图书信息 图3.7 图书采编系统数据流程图（2） 图书借阅系统数据流程图 P2.1检查读者身份P2.2检查图书是否在库P2.3填写借阅库，修改图书库借阅库图书库P2.4图书归还处理图书馆管理员有效在库填写归还记录借阅修改在库数量借阅库图书库图书借阅还书读者库图书库 图3.8 图书借阅系统数据流程图（3） 读者管理系统数据流程图图3.9 读者管理系统数据流程图3.3 数据需求3.3.1 数据关系对于整个图书馆管理信息系统的详细分析，将系统中要用到的数据表进行设计和提炼，并分析各表之间的实体关系，绘制的E-R图如图3.10所示： 图3.10 图书馆管理信息系统的E-R图3.3.2 数据定义数据字典是关于数据的信息集合，也就是对数据流中包含的所有元素的定义的集合。数据流图和数据字典共同构成系统的逻辑模型。数据字典的任务是对于数据流图中出现的所有被命名的图形元素在数据字典中作为一个词条加以定义，使得每一个图形元素的名字都有一个确切的解释。数据字典包括五部分：外部项、数据元素、数据流、数据处理、数据存储。本系统主要考虑数据存储的定义。表3.1图书库数据字典数据存储名：图书库数据存储编号F1说明：对每一本图书的ID、图书名、作者、出版社、价格、出日期和库存数等信息进行记录。数据存储组成：图书ID+图书名+作者+出版社+价格+出版日期+库存数关键字:图书ID表3.2 读者库数据字典数据存储名：读者库数据存储编号F2说明：对每一个读者的ID、姓名、密码、班级等信息进行记录。数据存储组成：读者ID+读者姓名+密码+班级关键字:读者ID表3.3 借阅库数据字典数据存储名：借阅库数据存储编号F3说明：对每本图书的借阅流水号、借阅日期、图书名、读者ID、归还日期和借阅数量等信息进行记录。数据存储组成：借阅流水号+借阅日期+图书名+读者ID+归还日期关键字:借阅流水号表3.4 电子读物库数据字典数据存储名：电子读物库数据存储编号F4说明：对每一本电子读物的ID、电子读物名、作者、出版社、价格、出日期和库存数等信息进行记录。数据存储组成：电子读物ID+电子读物名+作者+出版社+价格+出版日期+库存数关键字:电子读物ID表3.4 留言库数据字典数据存储名：留言库数据存储编号F5说明：对每一个读者的ID、姓名、留言主题、留言内容等信息进行记录。数据存储组成：读者ID+读者姓名+留言主题+留言内容关键字:读者ID4. 系统结构设计4.1 总体框架在系统架构方面，基于系统的访问速度，便捷性、可行性等要求，本系统采用了C/S两层结构。它包括客户机、数据库服务器层，如图15所示。在两层客户机/服务器结构中，客户机负责信息表示与应用逻辑处理，服务器负责管理数据库事务。 客户机信息表示应用逻辑处理数据库服务器 数据库管理图4.1 两层客户机/服务器结构4.2 软件结构4.2.1 软件模型该系统的软件结构图如图4.2所示。 图4.2 图书馆管理信息系统软件结构图4.2.2 模块定义根据本系统的项目规划、需求分析、系统结构设计等，可以得出系统的各个模块：读者注册登录模块、图书采编模块、读者借阅模块、电子读物模块和读者留言模块。表4.1“读者注册登录”模块的IPO图系统名称：图书馆管理信息系统模块名称：读者注册模块模块编号：1输入数据：读者ID、读者姓名、密码、班级输出数据：打开系统欢迎界面处理步骤：（1）程序开始启动系统注册对话框。（2）用户输入读者ID、读者姓名、密码和班级信息。（3）从读者库中检查是否有相应的读者ID和密码。（4）如果读者ID或密码错误，进行提示。（5）如果正确，则打开系统欢迎界面。（6）进入主程序界面。表4.2“图书采编”模块的IPO图系统名称：图书馆管理信息系统模块名称：图书采编模块模块编号：2输入数据：图书ID、图书名、作者、出版社、价格、出日期和库存数输出数据：更新图书库表处理步骤：（1）程序开始启动系统图书采编对话框。（2）图书管理员输入用户名和密码。（3）从用户清单表中检查是否有相应的用户名和密码。（4）如果用户名或密码错误如果进行提示。（5）如果正确，进入该模块。（6）将要添加的图书的详细信息输入图书库中。表4.3“读者查询”模块的IPO图系统名称：图书馆管理信息系统模块名称：读者查询模块模块编号：3输入数据：图书名输出数据：图书详细信息处理步骤：（1）程序开始启动系统读者借阅对话框。（2）读者输入需要查询的图书名。（3）从图书库中检查是否有相应的书名。（4）如果如果没有，进行提示。（5）如果有，显示图书的详细信息。（6）如果该图书的库存数>0，则可以选择借阅该图书。表4.4 “电子读物”模块的IPO图系统名称：图书馆管理信息系统模块名称：电子读物模块模块编号：4输入数据：电子读物名输出数据：电子读物详细信息处理步骤：（1）程序开始启动系统电子读物对话框。（2）读者输入需要查询的电子读物名。（3）从电子读物库中检查是否有相应的电子读物名。（4）如果没有，进行提示。（5）如果有，显示该电子读物的详细信息。表4.5“读者留言”模块的IPO图系统名称：图书馆管理信息系统模块名称：读者留言模块模块编号：5输入数据：读者ID、读者姓名、留言内容、留言主题输出数据：更新留言板处理步骤：（1）程序开始启动系统吐着留言对话框。（2）读者输入用户名和密码。（3）从读者表中检查是否有相应的用户名和密码。（4）如果用户名或密码错误如果进行提示。（5）如果正确，进入该模块。（6）添加新的留言。4.3 数据结构4.3.1 数据库模型根据数据项和数据结构，就可以设计出能够满足用户需求的各种实体，以及它们之间的关系。这些实体包含各种具体信息，通过相互之间的作用形成数据的流动。根据上面的设计规划出的实体有：读者信息实体、图书信息实体、和借阅信息实体。各个实体具体的描述的E-R图如下。读者信息实体E-R图如图4.3所示。 图4.3 读者信息实体E-R图图书信息实体的E-R图如图4.4所示。图4.4 图书信息实体E-R图 借阅信息实体E-R图如图4.5所示。图4.5 借阅信息实体E-R图电子读物信息实体E-R图如图4.6所示。图4.6 电子读物信息实体E-R图留言信息实体的E-R图如图4.7所示。图4.7 留言信息实体E-R图4.3.2 数据定义通过系统的数据需求分析，根据E-R图及E-R实体图可以得到系统中所包含的实体及相关属性，数据定义则是对数据的类型、长度及是否为空等属性进行进一步的说明，通过数据项描述来说明：表4.6 读者数据项描述数据项含义说明类型长度取值范围与其他数据项逻辑关系读者ID唯一标识 文本10关联读者名称读者姓名文本6关联借阅密码文本10班级文本10表4.7 图书数据项描述数据项含义说明类型长度取值范围与其他数据项逻辑关系图书ID唯一标识 文本10关联图书名称图书名文本20关联借阅作者文本10出版社文本价格货币出版日期日期/时间库存数数字表4.8 借阅数据项描述数据项含义说明类型长度取值范围与其他数据项逻辑关系借阅流水号唯一标识 文本10关联图书名称借阅日期日期/时间10图书名文本读者ID文本归还日期日期/时间表4.9 电子读物数据项描述数据项含义说明类型长度取值范围与其他数据项逻辑关系电子读物ID唯一标识 文本10关联电子读物名电子读物名文本20关联借阅作者文本10出版社文本价格货币出版日期日期/时间库存数数字表4.10 留言数据项描述数据项含义说明类型长度取值范围与其他数据项逻辑关系读者ID唯一标识 文本10关联读者姓名读者姓名文本20留言内容文本10留言主题文本5. 系统详细设计5.1 程序算法详细设计1读者注册登录模块的流程图如图5.1所示。 图5.1 读者注册登录模块流程图2读者借阅模块的流程图如图5.2所示。图5.2 读者借阅模块流程图3读者留言模块的流程图如图5.3所示。 图5.3 读者留言模块流程图5.2 数据库详细设计5.2.1 数据库环境配置操作系统：Microsoft Windows XP 数据库系统：ACCESS 2003登陆密码都为123。系统开发语言： Visual Basic 6.0 企业版5.2.2 表设计及其关系设置表5.1 读者表字段名称数据类型字段长度是否为关键字读者ID文本10是读者姓名文本6否密码文本10否班级文本10否表5.2 图书表字段名称数据类型字段长度是否为关键字图书ID文本10是图书名文本20否作者文本6否出版社文本10否价格货币-否出版日期日期/时间短日期否库存数数字整型否 表5.3 借阅表字段名称数据类型字段长度是否为关键字借阅流水号文本10是借阅日期日期/时间短日期否图书名文本20否读者ID文本10否归还日期日期/时间短日期否表5.4 电子读物表 字段名称数据类型字段长度是否为关键字电子读物ID文本10是电子读物名文本20否作者文本6否出版社文本10否价格货币-否出版日期日期/时间短日期否 表5.5 读者留言表字段名称数据类型字段长度是否为关键字读者ID文本10是读者姓名文本20否留言主题文本20否留言内容文本50否5.3 界面设计5.3.1 登录窗体用户正确输入自己ID、密码后就登录进入系统主界面。登录界面如图5.4所示。考虑系统安全性，数据一致性，系统为每一种不同身份登录的人员设置了不同的操作权限。用户登陆是信息系统最常采用的安全手段，由此可防止非用户进入系统。安全机制的最终实现则考虑在系统启动过程中设置用户登录窗体中获得，通过验证用户名和密码，由此确定用户是否合法。 图5.4 登录界面5.3.2 读者登录窗体当用户输入正确的ID和密码后，就可以进入读者主窗体，主要包括图书查询、电子读物查询和读者留言三个功能模块。如图5.5所示。 图5.5 读者主窗体界面5.3.3 管理员登录窗体如果在登录的时候用户选择的是管理员登陆，那么进入的界面如图5.6所示。在该窗体中选择图书管理、读者管理、电子读物管理和留言管理子窗体。在图书管理和电子读物中，图书管理员可以添加、修改和删除图书和电子读物信息；在读者管理中，可以添加、修改和删除读者等信息；在留言管理中，可以查看和恢复读者留言信息。图5.6 管理员登录窗体界面5.3.4 图书管理窗体我们以图书管理为例，单击上图中的图书管理按钮，我们可以看到如图5.7所示的界面，我们可以添加、修改和删除图书等信息。图5.7 图书管理窗体界面5.3.5 图书查询窗体单击图5.5中借阅查询按钮，那么进入的窗体如图5.7所示。在该窗体中，不仅可以看到关于图书的详细信息，如书名、出版日期等信息，还可以了解到被借阅的情况，如被谁借走了，什么时候归还等。图5.8 图书查询窗体界面6. 系统测试与使用6.1 系统测试情况6.1.1 测试登录窗体在“登录”窗体中输入错误的密码后，窗体会弹出“密码错误”的提示框，如图6.1所示。 图6.1 登录窗体测试界面6.1.2 测试留言板窗体6.1.2.1在“读者留言窗体”中，我们添加如图6.2所示的记录。图6.2 留言窗体添加界面6.1.2.2 单击上图中的“添加记录”按钮，我们观察下面的子窗体（如图6.3所示）已经有了相应的内容，说明已经添加进去了。图6.3 留言窗体添加成功界面6.1.2.3 这时我们再回去看读者留言表中的信息，发现刚刚添加的信息也添加到了表中，如图6.4所示。图6.4 添加留言成功后的留言表6.2 系统使用说明该图书馆管理信息系统操作非常简单，启动“图书馆管理信息系统” ，进入“登录”窗体，根据身份选择相应的用户名和密码，就可以进行不同权限的操作。7. 项目总结经过2个月的课题关键技术研究、功能需求分析、系统模块设计、代码实现及最后的功能设计，现已基本完成了图书馆管理信息系统的设计与开发任务。通过本次系统设计能很好地测试了专业理论知识和实践相结合的能力。通过这次课程设计，我发现了自己以前专业学习中的许多不足，也学到了很多以前自己不知道的东西。比如数据字典的定义，使用visio 画图，以及自顶向下，把一个问题具体化，用系统的方法来分析问题等。我觉得这次真的收获挺大的。参考文献1 薛华成. 管理信息系统. 北京：清华大学出版社，19992 刘永. 系统分析与设计. 北京：科学出版社，20023 罗超理. 管理信息系统原理与应用. 北京：北京航空大学出版社，2002.64 邓晶. 管理信息系统及应用实例. 北京：中国电力出版社，20035 高林，周海燕主编. 管理信息系统与案例分析. 北京：人民邮电出版社，2004附录：系统程序源代码1登录窗体的代码Option Compare DatabasePrivate Sub 登录_Click()If IsNull(读者姓名) = False Then读者姓名.SetFocusIf DLookup("密码", "读者表", "读者姓名=""" & 读者姓名.Text & """") = 密码 ThenDoCmd.CloseDoCmd.OpenForm "读者主窗体"Else密码 = ""密码.SetFocusMsgBox "密码错误！", vbCriticalEnd IfEnd IfEnd SubPrivate Sub 退出_Click()On Error GoTo Err_退出_Click DoCmd.QuitExit_退出_Click: Exit SubErr_退出_Click: MsgBox Err.Description Resume Exit_退出_Click End Sub2读者主窗体代码Option Compare DatabasePrivate Sub Form_Load()End SubPrivate Sub 图书查询_Click()On Error GoTo Err_图书查询_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = ChrW(23398) & ChrW(29983) & ChrW(22522) & ChrW(26412) & ChrW(20449) & ChrW(24687) DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_电子读物查询_Click: Exit SubErr_电子读物查询_Click: MsgBox Err.Description Resume Exit_电子读物查询_ClickEnd SubPrivate Sub 读者留言_Click()On Error GoTo Err_读者留言_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = ChrW(23398) & ChrW(29983) & ChrW(25104) & ChrW(32489) & ChrW(20449) & ChrW(24687)DoCmd.OpenForm stDocName, , , stLinkCriteria3图书管理员登录窗体代码Option Compare DatabasePrivate Sub Form_Load()End SubPrivate Sub 图书管理_Click()On Error GoTo Err_图书管理_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = ChrW(23398) & ChrW(29983) & ChrW(22522) & ChrW(26412) & ChrW(20449) & ChrW(24687) DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_图书管理_Click: Exit SubErr_图书管理_Click: MsgBox Err.Description Resume Exit_图书管理_Click End SubPrivate Sub 读者管理_Click()On Error GoTo Err_读者管理_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = ChrW(23398) & ChrW(29983) & ChrW(25104) & ChrW(32489) & ChrW(20449) & ChrW(24687) DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_读者管理_Click: Exit SubErr_读者管理_Click: MsgBox Err.Description Resume Exit_读者管理_Click End SubPrivate Sub 电子读物管理_Click()On Error GoTo Err_电子读物管理_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = ChrW(25945) & ChrW(24072) & ChrW(20449) & ChrW(24687) DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_电子读物管理_Click: Exit SubErr_电子读物管理_Click: MsgBox Err.Description Resume Exit_电子读物管理_Click End SubPrivate Sub 留言管理_Click()On Error GoTo Err_留言管理_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = ChrW(23398) & ChrW(29983) & ChrW(20449) & ChrW(24687) & ChrW(31649) & ChrW(29702) DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_留言管理_Click: Exit SubErr_留言管理_Click: MsgBox Err.Description Resume Exit_留言管理_Click End Sub4读者留言窗体代码Private Sub Command9_Click()On Error GoTo Err_Command9_Click DoCmd.GoToRecord , , acNewRecExit_Command9_Click: Exit SubErr_Command9_Click: MsgBox Err.Description Resume Exit_Command9_Click End SubPrivate Sub Command10_Click()On Error GoTo Err_Command10_Click DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70Exit_Command10_Click: Exit SubErr_Command10_Click: MsgBox Err.Description Resume Exit_Command10_Click End SubPrivate Sub Command11_Click()On Error GoTo Err_Command11_Click DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70Exit_Command11_Click: Exit SubErr_Command11_Click: MsgBox Err.Description Resume Exit_Command11_Click End SubPrivate Sub Command12_Click()On Error GoTo Err_Command12_Click DoCmd.CloseExit_Command12_Click: Exit SubErr_Command12_Click: MsgBox Err.Description Resume Exit_Command12_Click End Sub5图书管理窗体代码Option Compare DatabasePrivate Sub Command14_Click()On Error GoTo Err_Command14_Click DoCmd.GoToRecord , , acNewRecExit_Command14_Click: Exit SubErr_Command14_Click: MsgBox Err.Description Resume Exit_Command14_Click End SubPrivate Sub Command15_Click()On Error GoTo Err_Command15_Click DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70Exit_Command15_Click: Exit SubErr_Command15_Click: MsgBox Err.Description Resume Exit_Command15_ClickEnd SubPrivate Sub Command16_Click()On Error GoTo Err_Command16_Click DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70Exit_Command16_Click: Exit SubErr_Command16_Click: MsgBox Err.Description Resume Exit_Command16_ClickEnd SubPrivate Sub Command17_Click()On Error GoTo Err_Command17_Click DoCmd.CloseExit_Command17_Click: Exit SubErr_Command17_Click: MsgBox Err.Description Resume Exit_Command17_Click End Sub6读者管理窗体代码Private Sub Command8_Click()On Error GoTo Err_Command8_Click DoCmd.GoToRecord , , acNewRecExit_Command8_Click: Exit SubErr_Command8_Click: MsgBox Err.Description Resume Exit_Command8_Click End SubPrivate Sub Command9_Click()On Error GoTo Err_Command9_Click DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70Exit_Command9_Click: Exit SubErr_Command9_Click: MsgBox Err.Description Resume Exit_Command9_Click End SubPrivate Sub Command10_Click()On Error GoTo Err_Command10_Click DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70Exit_Command10_Click: Exit SubErr_Command10_Click: MsgBox Err.Description Resume Exit_Command10_Click End SubPrivate Sub Command11_Click()On Error GoTo Err_Command11_Click DoCmd.CloseExit_Command11_Click: Exit SubErr_Command11_Click: MsgBox Err.Description Resume Exit_Command11_Click End Sub7电子读物窗体代码Private Sub Command14_Click()On Error GoTo Err_Command14_Click DoCmd.GoToRecord , , acNewRecExit_Command14_Click: Exit SubErr_Command14_Click: MsgBox Err.Description Resume Exit_Command14_Click End SubPrivate Sub Command15_Click()On Error GoTo Err_Command15_Click DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70Exit_Command15_Click: Exit SubErr_Command15_Click: MsgBox Err.Description Resume Exit_Command15_Click End SubPrivate Sub Command16_Click()On Error GoTo Err_Command16_Click DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70Exit_Command16_Click: Exit SubErr_Command16_Click: MsgBox Err.Description Resume Exit_Command16_Click End SubPrivate Sub Command17_Click()On Error GoTo Err_Command17_Click DoCmd.CloseExit_Command17_Click: Exit SubErr_Command17_Click: MsgBox Err.Description Resume Exit_Command17_ClickEnd SubPrivate Sub Command18_Click()On Error GoTo Err_Command18_Click DoCmd.CloseExit_Command18_Click:Exit SubErr_Command18_Click: MsgBox Err.Description Resume Exit_Command18_ClickEnd Sub湖南商学院学年论文（课程设计）评审表姓名徐红霞学院信息学院学 号080310040专业班级徐红霞题目图书馆管理信息系统设计与开发评审意见 评审成绩指导教师签名职称时间 年 月 日37