教材管理论文样例.doc

计算机毕业设计（论文） 教材管理系统摘要学校作为一种教学信息资源的集散地，教材和用户领阅教材种类、数量繁多，包含很多的信息数据的管理。现今，有很多的学校都是初步开始使用，甚至尚未使用计算机进行信息管理。学校若采取手工方式对教材资料和教材领阅情况进行人工管理，由于资料繁多，手工处理的工作量大，整体管理效率低下，也不方便领书人对教材资料的查阅。为了提高日常的教材管理效率，本文针对通常的高校教材管理流程，以数据库设计了一个教材管理系统，可满足高校一般教材管理要求。 本论文是从本校的教材订、领的实际操作流程出发，针对学校教务管理中教材发放手工管理的现状，经过详细的系统调查，为我校教务处开发出的一个实用的单机版教材订领管理信息系统。本论文对教材管理信息系统进行了详细的分析和设计，而且还对系统的安全性等内容进行了初步的考虑。全文共分为四章，其分别为绪论，系统设计阶段，系统实施与管理，系统参考源代码，最后进行系统开发总结。本系统的前端开发工具是Visual Basic 6.0，后台数据库选用的是小型桌面型关系数据库Microsoft ACCESS 2000。关键词：教材管理系统，ACCESS 数据库应用，SQL语言，VB语言目 录摘要 1第一章 引言 3 & 1.1 背景3 & 1.2 开发教材管理系统的目的和原则3& 1.3 开发环境介绍4第二章 系统设计 5 & 2.1 系统分析5 & 2.2 系统流程和操作方式设计6 & 2.3 系统功能模块设计6第三章 数据库的设计 7 & 3.1 数据库设计7 & 3.2 表的建立8第四章 系统实现10 & 4.1 系统功能分析 10 & 4.2 数据库设计 10 & 4.3 部分系统源代码 15总结22致谢23参考文献23第一章 引言1.1 背景1、教材管理系统二十一世纪是信息高度交流与发展的时代，面计算机系统则在信息时代扮演着极为重要的脚色，随着计算机的不断发展，计算机以渗透到各个领域，高校管理也不例外，其中教材管理的计算机化已不容迟缓。教材订购发放的过程中总是面对大量的领书人信息、教材信息以及两者相互作用产生的领书信息、订书信息。因此需要对课程资源、教材资源、领书信息、进书信息进行管理，及时了解各个环节中信息的变更，有利于提高管理效率。学校教材管理主要是由教材计划制定、采购、入库、发放、记账、结算等一系列工作所组成，该工作各院校都设有专门机构负责该项工作，通常是教材科。由于学校中专业设置门类多，各专业每期开设课程种类多其业务不仅涉及出版部门，而且要面对全校各系、部的授课教师，各班级的学生，每期教材科涉及管理的入出库教材种类少则几百多则几千种，涉及教材册数少则几千多则几万，涉及人员广，工作量大，再者特别是近年来，我国高等教育规模的不断扩大，学校学生人数迅速增加，使教材管理工作更加繁重不堪。据调查，到目前为止，我国还有许多学校甚至是一些重点院校的教材管理仍为手工管理方式，这种现状不但与现实学校教材管理的业务需求不相适应，并且也与学校信息化建设的发展趋势不相适应，因此，学校教材管理人员目前迫切需要一套方便、高效的计算机化的管理信息系统来代替他们繁琐、低效的传统手工管理方式，并最终实现教材管理的全面自动化。2、信息管理系统教材管理系统属于信息管理系统中的一个具体信息管理类型，而所谓的管理信息系统也就是我们常说的MIS（Management Information System）。它是“由人、计算机等组成的能进行信息的收集、传送、储存、加工、维护和使用的系统。本系统为单机版运行方式，对于硬件的要求比较小，能够在Windows操作系统上运行。1.2 开发教材管理系统的目的和原则开发教材管理系统的目的就是充分利用计算机和现代办公软件，摆脱传统办公工具，用计算机实现集中方便的管理工作，把学校教材科的工作人员从繁重的体力劳动中解脱出来以达到提高工作效率和质量，最终实现教材管理的全面自动化为和现代化。在开发这个软件的过程中，我们遵循以下几条原则：u 从实际出发，总结领鉴吸收相结合的原则；u 教材管理的框架，以科学严谨，各种新思想，新方法构筑完备为原则；u 既保证教材管理系统的科学性、完整性、系统性，又注意到教材管理的灵活性和可操作性。同时又较好的解决了教材管理工作的部分难点问题，比如多价书（同种书名，不同的版本）的征订采购发行，到货前书目替换，大量的录入工作，查找书目难以操作等等；u 有简单可得的帮助。1.3 开发环境介绍本系统使用了VB和ACCESS数据库软件的组合来完成。数据库操作使用了SQL语言和ADO技术。1、数据库概述从20世纪50年代中期开始，计算机的应用由科学研究部门逐步扩展至企业、行政部门。至60年代，数据处理成为计算机的主要应用。数据库技术作为数据管理技术，是计算机软件领域的一个重要分支，产生于60年代末。现已形成相当规模的理论体系和实用技术。数据库（Database）DB是统一管理的相关数据的集合。数据库管理系统（Database Managerment System）DBMS是位于用户和操作系统之间的一层数据管理软件，为用户或应用程序提供访问DB的方法，包括DB的建立、查询、更新及各种数据控制。数据库系统（Database System）DBS是实现有组织地、动态地存储大量关联数据，方便多用户访问的计算机软、硬件和数据资源组成的系统，即采用了数据库技术的计算机系统。数据库技术：是一门研究数据库的结构、存储、管理和使用的软件学科。2、 Visual Basic 6.0概述Microsoft Visual Basic6.0提供了开发Microsoft Windows应用程序的最迅速、最简捷的方法。”Visual”的意思是“可视化程序设计”，指的是开发图形用户界面的方法。使用这种方法，用户不需要编写大量代码去描述界面元素的外观和位置，而只要把预先建立的对象拖放到屏幕上的一点即可。”Basic”指的是BASIC语言，它是一种在计算机技术发展历史上应用得最为广泛的语言。VB在原有BASIC语言的基础上进一步发展，至今包含了数百条语句、函数及关键词，其中很多和Windows GUI有直接关系。第二章 系统设计2.1 系统分析本教材管理系统，我们共分了六个模块（图2-1）。其中教材管理、查询、打印与报表、系统管理这四个模块为主要模块，分别由我们组里的四个人负责完成。 在本系统中，我主要负责的是数据库结构规划设计，教材出入库管理模块的实现。教材管理系统统统教材管理查询打印与报表系统管理选项帮助系统 图2-11、系统结构设计这个系统是以教材管理业务为原型设计开发的，教材科的日常业务大体上有如下几项：l 教材预订。教材的预订工作基本上是由系、部来完成。教材科将教材征订通知下发到各系、（轮流传阅），各系从中选订所开课程的教材，填写预订单，经系、部汇总报教材科。教材科汇总报教务处审批后，编制填写正式订单寄发到各出版社。l 教材入库业务。出版社按订单如期如数发书，教材科查收入库。l 教材发放。按预订数量发放专业和年级用书。通常是以系、班级为单位领进行领书。l 查询。这项工作包括四项内容，其一是预订查询及时了解各系教材的订购情况；再就是入库查询及时掌握入库情况；第三是库存查询情况；第四是帐务查询，主要记录学生、班级、教师领教材的详细情况。 l 打印与报表。主要用于订书、购书、发书清单的打印。l 系统管理。主要包括用户、密码的更改，学生信息管理和数据库的维护。l 选项和系统帮助能使用户快速得到帮助。系统开发的过程，首先是确定需要建立的表格以及视图，即首先完成数据库的设计，这个过程主要是通过Access的使用完成的；其次，就是进行界面的设计，这个过程是在VB中完成的，它是系统开发中比较重要的一步，最后就是功能编码功能的实现了。2.2 系统流程和操作方式设计首先，在流程安排上应尽量避免数据的重复输入，实现从采购到发放一次输入的数据得到多次使用，以提高系统的工作效率。这一步很大程度依赖于数据库的设计。其次，选择合适的操作方式。我们设计的教材管理系统属于“人机交互方式”，需要用户输入信息完成操作。之所以采用这种方式，主要是考虑到此数据库管理系统的实时性需求，因为数据库随时可能都需要得到改变。这里给出的是教材管理系统的数据流程（图2-1）2.3 教材管理系统功能模块设计根据上述，我们对教材管理业务流程和数据流程的调查分析，并根据我们所分配的模块，我们将系统划分为如图2-2所示的功能模块结构： 图 2-2 系统数据流程 图 2-3 系统功能模块图第三章 数据库的设计3.1 数据库设计数据库设计的主要任务是在DBMS(database management system)的支持下，按照应用的要求，数据结构的好坏将直接影响到系统的效率以及实现的效果。好的数据库结构会减少数据库的存储量、冗余度，数据的完整性和一致性比较高，系统具有较快的响应速度，简化基于数据库的应用程序的实现方法等。1、 数据库模型及参照完整性教材书名ISBN单价版次发票号码主编入库日期入库数量入库出库数量出库日期出库仓库库存数量图3-1 系统E-R图数据库模型是数据库系统的核心和基础，通常由数据结构、数据操作和完整性约束三部分组成。按照数据模型的特点，可将传统数据库系统分为网状数据库，层次数据库和关系数据库。2、 数据库的连接数据库的连接使用ADO技术，代码如下：Set dbConn = New ADODB.connectionstrConn = PROVIDER=Microsoft.Jet.OLEDB.4.0; & Data Source= & App.Path & authority.mdb;Jet OLEDB:Database Password=*; dbConn.Open strConn3.2 表的建立通过数据库的模型，我们建立了如下数据库表：（部分数据库表）订单明细表：ddmxb字段名称数据类型字段说明订单编号文本主键定书编号文本20个字符数量数字课程名称文本15个字符到书否是/否取书否是/否书店文本学生用书情况表：ssq字段名称数据类型字段说明学号文本10个字符ISBN文本20个字符数量数字必修否是/否订单表：ddb字段名称数据类型字段说明订单编号文本主键定书人文本10个字符专业文本10个字符专业号文本15个字符年级文本10个字符系部文本10个字符个人定否是/否定书日期日期/时间定书经手人文本10个字符书全到否是/否领书否是/否通知否是/否附加否是/否入书登记表：rsdjb字段名称数据类型字段说明书名文本15个字符ISBN文本20个字符发票号码文本15个字符主编文本10个字符定书编号文本15个字符单价货币数量数字10个字符入书日期时间/日期书店文本15个字符经手人文本10个字符第四章 系统的实现在本系统中，我主要负责的是数据库结构规划设计，教材出入库管理模块的实现。系统开发的总体任务是实现各种信息的系统化、规范化和自动化。4.1系统功能分析系统功能分析是在系统开发的总体任务的基础上完成。教材管理系统需要完成功能主要有：有关领书人种类标准的制定、性质、单位的输入，包括种类编号、种类名称、领书数量、备注等。领书人种类信息的修改、查询等领书人基本信息的输入，包括领书人编号、领书人姓名、领书人种类、领书人性别、单位、电话号码、备注等。领书人基本信息的查询、修改，包括领书人编号、领书人姓名、领书人种类、单位、电话号码、备注等等教材类别标准的制定、类别信息的输入，包括类别编号、类别名称、关键词、备注信息等。教材信息的输入，包括教材编号、教材名称、教材名称、教材类别、作者姓名、出版社名称、出版日期、教材页书、关键词、登记日期、备注信息等。领书信息的输入，包括领书信息编号、领书人编号、领书人姓名、教材编号、教材名称、领书日期、备注信息等。领书信息的查询、修改，包括领书信息编号、领书人编号、领书人姓名、教材编号、教材名称、领书日期、备注信息等。订书信息的输入，包括订书信息编号、经手人姓名、教材编号、教材名称、订书日期、订书数量等。4.2 数据库设计设计数据库系统时应该首先充分了解用户各个方面的需求，包括现有的以及将来可能增加的需求。数据库设计一般包括如下几个步骤：数据库需要分析。数据库概念结构设计。数据库逻辑结构设计。数据库需求分析1、对象分析用户的需求具体体现在各种信息的提供、保存、更新和查询，这就要求数据库结构能充分满足各种信息的输出和输入，收集基本数据、数据结构以及数据处理的流程，组成一份详尽的数据字典，为后而后具体设计打下基础。仔细分析调查有关教材管理信息需求的基础上，将得到如图4-1所示的本系统所处理的数据流程。书籍类别设置领书人种类设置基本信息录入基本信息录入领书人记录领书人记录书籍类别信息管理领书人种类信息管理基本信息录入基本信息录入书籍信息管理领书人信息管理领书人信息录入订书信息录入书籍信息返回订书信息管理图4-1针对一般教材管理系统的需求，通过对教材管理工作过程的内容和数据流程分析，设计如下面所示的数据项和数据结构：领书人种类信息，包括的数据项有：种类编号、种类名称、领书数量、领书期限、备注等。领书人信息，包括的数据项有：领书人编号、领书人姓名、领书人种类、领书人单位、电话号码、备注等。教材类别信息，包括的数据项有：类别编号、类别名称、关键词、备注信息等。教材信息，包括的数据项有：教材编号、教材名称、教材类别、作者姓名、出版社名称、出版日期、教材页数、关键词、登记日期、备注信息等。领书信息，包括的数据项有：领书信息编号、领书人编号、领书人姓名、教材编号、教材名称、订书日期、领书日期、备注信息等。有了上面的数据结构、数据项和数据流程，我们就能进行下而后数据库设计。2、数据库概念结构设计得到上面的数据项和数据结构以后，就可以设计出能够满足用户需求的各种实体，以及它们之间的关系，为后面的逻辑结构设计打下基础。根据上而后设计规划出的实体有：领书人类别信息实体、领书人信息实体、教材类别信息实体、教材信息实体、领书信息实体。各个实体具体的描述E-R图如下。领书人类别信息实体E-R图如图4-2所示。领书人类别信息实体订书数量领书期限种类名称种类编号 .领书人信息实体E-R图如图4-3所示。领书人信息实体领书人编号领书日期领书人类别领书人姓名 教材类别信息实体E-R图4-4所示。书籍类别信息实体备注信息类别编号关键词类别名称 .教材信息实体E-R图4-5所示。书籍信息实体出版社书籍编号书籍名称书籍类别 .领书信息实体E-R图4-6所示。领书信息实体领书信息编号领书日期书籍领书人信息 实体之间相互关系的E-R图4-7所示。书籍类别信息领书人类别信息书籍信息登记领书人信息登记书籍信息管理领书人信息管理领书人信息登记3、数据库逻辑结构设计逻辑结构设计的任务就是把概念结构设计阶段设计好的基本E-R图，转换为与选用的具体机器上的DBMS产品所支持的数据模型相符合的逻辑结构。E-R图向关系模型转换的结果如下所示：领书人类别表（种类编号、种类名称、领书数量、领书日期、备注）。领书人信息表（领书人编号、领书人姓名、领书人种类、单位、电话号码、电子邮件地址、备注）。教材类别表（类别编号、类别名称、关键词、备注）。教材信息表（教材编号、教材名称、教材类别、作者姓名、出版社名称、出版日期、教材页数、关键词、登记日期、备注）。领书信息表（领书信息编号、领书人编号、领书人姓名、教材编号、教材名称、领书日期、备注）。4、数据库物理结构设计现在需要将上面的数据库概念结构转化为ACCESS 2000 数据库系统所支持的实际数据模型，也就是数据库的逻辑结构。教材管理系统数据库中各个表格的设计结果如下面表格所示。每个表格表示在数据库中的一个表。表 4-1为领书基本信息表。 READERTYPE领书人种类信息表列名数据类型可否为空说明TypenoVarcharNOT NULL种类编号TypenameVarcharNOT NULL种类名称BooknumberNumericNULL领书数量BookdaysNumericNULL领书期限MemoTextNULL备注表4-2 为领书人信息表格。 READERS领书人信息表格列名数据类型可否为空说明ReadernoVarcharNOT NULL领书人编号ReadernameVarcharNOT NULL领书人姓名ReadertypeVarcharNULL领书人种类ReaderdepVarcharNULL单位ReadertelVarcharNULL电话号码CheckdateDatetimeNULL登记日期ReadermemoVarcharNULL备注表4-3为教材类别信息表。 BOOKTYPE教材类别信息表列名数据类型可否为空说明BooktypenoVarcharNULL类别编号TypenameVarcharNOT NULL类别名称KeywordVarcharNOT NULL关键词MemoTextNOT NULL备注表4-4为教材信息表格。 BOOKINFO教材信息表列名数据类型可否为空说明BookidVarcharNOT NULL教材编号BooknameVarcharNOT NULL教材名称BooktypeVarcharNOT NULL教材类别BookauthorVarcharNOT NULL教材作者BookpubVarcharNULL出版社名称BookpubvdateDatetimeNULL出版日期BookpagesNumericNULL教材页码BookkeywordVarcharNULL关键词列名数据类型可否为空说明BookindateDatetimeNULL登记日期ButupVarcharNULL是否被领出BookmemoTextNULL备注表4-5为领书信息表格。BOOROWINFO领书信息表列名数据类型可否为空说明BorrownoVarcharNOT NULL领书编号ReaderidVarcharNOT NULL领书人编号ReadernameVarcharNOT NULL领书人姓名BookidVarcharNOT NULL教材编号BooknameVarcharNOT NULL教材名称Borrowdate DatetimeNULL 出领日期MemoTextNULL备注信息4.3 部分系统源代码一、显示教材信息列表： 通过ADO控件连接数据库后，在窗体中显示教材相关信息供管理人员浏览选择。Option ExplicitPublic txtSQL As StringDim mrc As ADODB.RecordsetDim MsgText As StringPrivate Sub Form_Load() ShowTitle ShowData flagBedit = TrueEnd Sub对窗体的显示效果，控件位置通过指令进行适度设置。Private Sub Form_Resize() If Me.WindowState vbMinimized And fMainForm.WindowState vbMinimized Then 边界处理 If Me.ScaleHeight 10 * lblTitle.Height Then Exit Sub End If If Me.ScaleWidth lblTitle.Width + lblTitle.Width / 2 Then Exit Sub End If 控制控件的位置 lblTitle.Top = lblTitle.Height lblTitle.Left = (Me.Width - lblTitle.Width) / 2 msgList.Top = lblTitle.Top + lblTitle.Height + lblTitle.Height / 2 msgList.Width = Me.ScaleWidth - 200 msgList.Left = Me.ScaleLeft + 100 msgList.Height = Me.ScaleHeight - msgList.Top - 200 End IfEnd Sub显示Grid表头，在表格控件中以列表形式展开教材记录信息。Private Sub ShowTitle() Dim i As Integer With msgList .Cols = 12 .TextMatrix(0, 1) = .TextMatrix(0, 2) = 书籍名称 .TextMatrix(0, 3) = 书籍类别 .TextMatrix(0, 4) = 作者姓名 .TextMatrix(0, 5) = 出版社名称 .TextMatrix(0, 6) = 出版日期 .TextMatrix(0, 7) = 书籍页码 .TextMatrix(0, 8) = 关键词 .TextMatrix(0, 9) = 登记日期 .TextMatrix(0, 10) = 是否被借 .TextMatrix(0, 11) = 备注信息 固定表头 .FixedRows = 1 设置各列的对齐方式 For i = 0 To 11 .ColAlignment(i) = 0 Next i Private Sub msgList_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single) 右键弹出 If Button = 2 And Shift = 0 Then PopupMenu fMainForm.menuBooks End If End Sub2、教材入库信息处理：首先对已有教材记录进行检查，确认已登记的教材记录情况以决定新入库的相应处理。Option Explicit是否改动过记录，ture为改过Dim mblChange As BooleanDim mrc As ADODB.RecordsetPublic txtSQL As StringPrivate Sub cboItem_Change(Index As Integer) 有变化设置gblchange mblChange = TrueEnd Sub若操作者对现在记录进行编辑，则确认记录该修改。Private Sub cmdExit_Click() If mblChange And cmdSave.Enabled Then If MsgBox(保存当前记录的变化吗？, vbOKCancel + vbExclamation, 警告) = vbOK Then 保存 Call cmdSave_Click End If End IfEnd Sub 根据列表框控件中使用者的选择进行相应字段的修改并写入数据库的表。设置输入掩码，规范表中数据的类型、大小。 For intCount = 0 To 6 If Trim(txtItem(intCount) & ) = Then Select Case intCount Case 0 sMeg = 书籍名称 Case 1 sMeg = 作者姓名 Case 2 sMeg = 出版社名称 Case 3 sMeg = 出版日期 Case 4 sMeg = 书籍页码 Case 5 sMeg = 关键词 Case 6 sMeg = 登记日期 End Select sMeg = sMeg & 不能为空！ MsgBox sMeg, vbOKOnly + vbExclamation, 警告 txtItem(intCount).SetFocus Exit Sub End If Next intCount 若新加入教材，则先检测系统数据库中是否已有该记录，若有则显示相关信息，若无，则需完整输入教材各项资料。 If gintBmode = 1 Then txtSQL = select * from books where bookname = & Trim(txtItem(0) & and bookauthor = & Trim(txtItem(1) & and bookpub = & Trim(txtItem(2) & Set mrc = ExecuteSQL(txtSQL, MsgText) If mrc.EOF = False Then MsgBox 已经存在此书籍的记录！, vbOKOnly + vbExclamation, 警告 txtItem(0).SetFocus Exit Sub End If mrc.Close End If If gintBmode = 2 Then 先删除已有记录 txtSQL = delete from books where bookid = & Trim(txtNo) & Set mrc = ExecuteSQL(txtSQL, MsgText) End If 再加入新记录 txtSQL = select * from books Set mrc = ExecuteSQL(txtSQL, MsgText) mrc.AddNew mrc.Fields(0) = Trim(txtNo) mrc.Fields(1) = Trim(txtItem(0) mrc.Fields(2) = Trim(cboItem(0) 3、教材申领管理： 通过执行SQL查询语句，对用户的申领请求进行检查，为提高检索速度，首先要求选择教材种类。 txtSQL = select distinct bookname from books where booktype = & Trim(cboItem(1) & Set mrcc = ExecuteSQL(txtSQL, MsgText) If Not mrcc.EOF Then Do While Not mrcc.EOF cboItem(0).AddItem mrcc.Fields(0) mrcc.MoveNext LoopElseIf Index = 0 Then If Trim(cboItem(0) = Then MsgBox 请首先选择书籍种类！, vbOKOnly + vbExclamation, 警告也可通过教材的教材名称、作者、出版社等信息进行查询。仍然需要先与数据库连接，然后通过窗体控件值绑定进行检查。 For intCount = 0 To 5 Step 5 If Trim(cboItem(intCount) & ) = Then Select Case intCount Case 0 sMeg = 书籍名称 Case 5 sMeg = 领书人姓名 End Select sMeg = sMeg & 不能为空！ If Trim(txtItem(0) = Then MsgBox 领书日期不能为空！, vbOKOnly + vbExclamation, 警告 txtItem(0).SetFocus Exit Sub 对教材出库的限制包括该对象是否有资格领书，是否已领过，可以领书的数量等。 If bookNUM = 0 Then MsgBox 领书数量已超过现有库存，不能再领！, vbOKOnly + vbExclamation, 警告 txtSQL = select * from books where bookid = & Trim(Text1) & and putup y Set mrcc = ExecuteSQL(txtSQL, MsgText) If mrcc.EOF Then MsgBox 这本书已经领出！, vbOKOnly + vbExclamation, 警告 txtSQL = select * from borrowinfo Set mrcc = ExecuteSQL(txtSQL, MsgText) 总 结通过这次毕业设计让我对前面学过的许多课程有了更为深刻的理解，也是我对这五年所学的东西的一个综合体现。然而这次设计让我感受颇深，让我真正体会到了在整个过程给我带来的无奈与快乐。综合起来，主要体现在以下几个方面：首先，急于求成的心情给我带来了很大的困难。以前我注重是编码过程，以为只要能把最后的功能实现了就可以了，所以一开始我就稍微理了一下思绪就动起手来编码，我原以为很快就能完成此次任务，可万万没想到，编了二三天，自已就陷入了泥潭，进退两难，但后来面临的问题只有重来，这真是给了我很大的打击，这样的反复让我进行了几次。后来我终于沉住气，吸取前几次的教训，严格的按照“管理信息系统”“软件开发工具”所提到开发管理信息系统所用的方法中都把系统规划和系统分析放在极为重要的位置。认真细致地对开发过程进行了规划和分析