工程科技图书馆管理系统的设计与实现Word格式.docx
《工程科技图书馆管理系统的设计与实现Word格式.docx》由会员分享，可在线阅读，更多相关《工程科技图书馆管理系统的设计与实现Word格式.docx（44页珍藏版）》请在冰点文库上搜索。
本系统就是为了管理好图书馆信息而设计的。
图书馆作为一种信息资源的集散地，图书和用户借阅资料繁多，包含很多的信息数据的管理，现今，有很多的图书馆都是初步开始使用，甚至尚未使用计算机进行信息管理。
我认为有必要建立一个图书管理系统，使图书管理工作规范化，系统化，程序化，避免图书管理的随意性，提高信息处理的速度和准确性，能够及时，准确，有效的查询和修改图书情况。
第1章概述
1.1开发背景
随着我国的经济的发展，大量的人才是社会发展的强大推动力，正因为如此政府也越来越重视教育。
随着一系列措施的实施，我国的教育现状大为改观，学生的入学率大大提高，同时也有很多的学校建立了起来。
为了给同学们增加课外知识，大部分的学校都考虑到要建立图书馆。
从但是手工化的管理方式，显然成了学校正常工作中为了使学校的图书馆更好的服务与广大的老师和学生，提升对图书管理的信息化，编写了本图书管理系统。
1.2开发目的
针对各大中专院校的图书管理现状，设计出适合一般学校的计算机辅助图书管理系统。
实现对图书基本信息、读者基本信息进行计算机辅助管理，完成借书和还书有关信息的记录、修改、查询、删除等一系列任务的计算机管理与实现.。
1.3功能概述
该系统界面完好，操作简便，能完成添加图书信息，修改图书信息，查询图书信息，添加读者类别，修改读者类别，查询读者信息，修改读者信息，添加删除管理员等一系列图书管理功能，开发本系统的总体任务是实现图书管理的系统化和自动化，帮助管理人员更好更高效地完成图书管理工作。
本着实用性和介绍性的原则，整个系统由五大模块组成，每个大的模块又包括三至四个小的模块。
一、
图书管理部分：
包括图书信息管理和类别管理，其功能是实现对各部分数据内容进行添加、修改、查询等操作。
二、
借阅管理部分：
包括借书管理和还书管理，其功能是实现对各部分数据内容的添加和查询等操作。
三、
读者管理部分：
包括读者信息管理和读者类别管理，其功能是实现对各部分数据内容的添加和修改等操作。
四、
系统管理部分：
包括修改系统用户密码和增加新用户两项功能。
五、
帮助部分：
显示关于信息。
系统具有高效、易操作、易维护等特点，并且系统结构清晰、界面友好，功能较为齐全，能有效地协助管理人员进行图书管工作。
如果想真正把它用到图书馆的图书自动化管理中，还需要读者对该系统进行一步的完善工作。
第2章需求分析
需求分析阶段确定的系统逻辑模型是以后设计和实现目标系统的基础，因此必须准确完整地体现用户的要求。
2.1图书管理现状
随着计算机技术的飞速发展，其应用方面已渗透到社会生活的各个领域。
它已经成为我们学习和工作的得力助手。
在学校，尤其是在一些高校，图书是学校的一项重要资源，图书的管理也是学校的一项常规性的重要工作。
而长期以来，学生图书管理都是依赖人工进行的。
现今，有很多的学校都已经开始使用计算机进行图书信息管理，并且起得良好的效果。
近年来我校招生情况越来越好，所以图书管理工作越来越繁重，但由于种种原因，管理人员并没有增加，因此原有的人工管理工作已不能适应现行的工作需要。
同时，陈旧的人工管理也不利于推广计算机应用。
为使图书管理工作科学化、规范化，就必须采用计算机辅助管理。
2.2数据流程图
数据流程图（DataFlowDFD）是描述实际业务管理系统工作流程的一种图形表示法。
它描绘系统的逻辑模型图，其中没有任何具体的物理元素，只是描绘信息在系统中流动和处理的情况。
因为数据流程图是逻辑系统的图形表示，即使不是专业的计算机技术人员也容易理解，所以是极好的通信工具。
此外，设计数据流程图只需考虑系统必须完成的基本逻辑功能，完全不需要考虑如何具体地实现这些功能，所以它也是软件设计的很好的出发点。
《图书管理系统》主要是为了对图书、读者基本信息等进行计算机管理。
下面就是功能模块的流程分析：
2.2.1图书管管理系统基本信息流程
流程分析：
图书基本信息的流动首先是以图书编号为流动方向的依据，来达到添加、修改、记录、删除图书记录。
为了数据的一致性，进行这些操作的同时，也对数据库中的记录进行检查，检查是否有重复的记录。
如有则不能进行添加。
2.2.2读者信息管理基本信息流程图
流程图分析：
读者基本信息的流动首先是以读者的编号为依据，来达到添加、修改、查询、删除读者信息的记录。
同时，也对数据库中的读者信息表的编号进行检查。
2.2.3借书管理基本信息流程图
借书管理基本信息的流动首先是以借阅编号为流动方向的依据，来达到添加、查询借书记录。
如没有则可进行添加。
2.3.4还书管理基本信息流程图
借阅管理部分是实现对各部分数据内容的添加和查询操作，在借阅信息中包括图书编号、读者编号，系统对借书日期进行自动添加。
并通过添加功能来达到借阅信息表的数据的更新，通过查询功能可使管理员很快地了解借阅信息，从而避免书籍的丢失现象产生。
通过上面对各个模块流程的分析，那么我们就不难对整个系统的大致流程有一个全面的认识。
设计时采用了常用的自顶向下的瀑布式结构化设计方法。
这样系统做起来后就便于用户操作。
综合上面各个模块的分析，其总体流程图如图：
启动界面
登录
连接数据库，
验证管理员密码
进入主画面
数据管理记录浏览借还操作系统设置帮助
显示
关于信息
读者借阅借阅归还添加删除
记录记录书籍书籍管理员管理员
添修删
加改除
第3章详细设计
3.1数据库的设计
3.1.1图书信息表
图3-1图书信息表
字段名
数据类型
说明
图书编号
文本
主键，字段大小4
书名
字段大小10
类别
价格
货币类型
无
出版社
字段大小40
入库日期
日期/时间
是否借出
字段大小4
3.1.2事务信息表
图3-2事务信息表
借阅编号
自动编号
读者编号
字段大小50
归还日期
出借日期
3.1.3读者信息表
图3-3读者信息表
读者姓名
年龄
数字
家庭住址
3.2功能模块的实现
在打开数据表之前应该先打开数据库，系统中创建了一个模块，该模块的作用是连接数据库以及数据库中数据的提取，因为系统需要频繁的使用数据库中的数据，建立模块可以使程序简单化，模块的代码如下：
PubliccnAsADODB.Connection定义连接以及取记录的对象
PublicrstAsADODB.Recordset
PublicFunctionCnToDB（）AsBoolean
OnErrorGoToDebug设定错误机制，当连接错误时转到Debug
Setcn=NewADODB.Connection
Withcn设定访问数据库的参数，对象SQL－server.ConnectionString="
provider=sqloledb;
uid=sa;
pwd=;
server=."
.ConnectionTimeout=5
.CursorLocation=adUseClient
.Open
.DefaultDatabase="
booksys"
EndWith
CnToDB=True
ExitFunction
Debug:
当出错时，取消连接数据库
Setcon=Nothing
CnToDB=False
EndFunction
PublicFunctionQueryData（ByValstrSqlAsString）AsBoolean
OnErrorGoToDebug
IfCnToDB=TrueThen当连接到数据库后才能取得记录
Setrst=NewADODB.Recordset
Withrst定义取记录的参数
.Source=strSql
.ActiveConnection=cn
.CursorType=adOpenDynamic
.LockType=adLockOptimistic
EndWith
QueryData=True
EndIf
ExitFunction
Setrst=Nothing
QueryData=False
PublicFunctiongetRS（ByRefrstAsADODB.Recordset,ByValstrSqlAsString）AsBoolean
OnErrorGoTorsErr
Withrst
EndWith
Ifrst.StateThen
getRS=True
ExitFunction
rsErr:
getRS=False
MsgBoxErr.Number&
Err.Description,vbCritical+vbOKOnly,"
错误信息"
3.3登录模块
图3-4系统登录界面
如果使用系统就必须先登录到系统，用户使用登录模块登录系统。
单击“登录”按钮的处理代码如下：
stringstr_name;
stringstr_password;
stringstr_sql;
//获取用户输入的登录用户名和密码
str_name=TextBoxUserName.Text.ToString（）.Trim（）;
//去除用户名两边的空格
str_password=FormsAuthentication.HashPasswordForStoringInConfigFile（TextBoxMM.Text.ToString（）,"
MD5"
）;
//查询相应的用户名和密码的SQL语句
str_sql="
selectReaderName,ReaderLevel,readerIDfromtb_ReaderwhereLibraryCardID='
"
+str_name+"
'
andReaderpwd='
+str_password+"
;
OleDbDataReaderdr=ms.Datareader（str_sql）;
if（dr.Read（）==true）
{
//session变量记录用户名
Session["
user"
]=dr["
ReaderName"
].ToString（）.Trim（）;
//session变量记录管理员级别
userlevel"
ReaderLevel"
//Session变量记录读者的ID号
userID"
readerID"
//Session变量记录读者的借阅证号
userCardID"
]=str_name;
//session变量记录读者的密码
userPwd"
]=str_password;
///////////////////////
ms.Close（）;
//返回跳转的目的页
stringstrweb=LoginManager.UserLevel（Session["
].ToString（））;
Response.Write（"
<
scriptlanguage=javascript>
alert（'
登录成功！
即将跳转！
location='
+strweb+"
/script>
}
else
{ms.Close（）;
this.LabelErrorMessage.Visible=true;
this.LabelErrorMessage.Text="
您必须输入有效的用户名和密码!
}
图3-5登录成功提示
登录的用户先弹出提示登录成功并按用户级别自动跳转到相应的功能页面，判断用户级别
的代码在业务逻辑层，代码如下：
switch（strLevel）
case"
系统管理员"
:
strLevel="
a_UserReg.aspx"
break;
图书管理员"
BookBorrow.aspx"
default:
strLevel="
ReaderQuery.aspx"
returnstrLevel;
系统主窗体的实现
图3-6
其代码如下：
PrivatersAsADODB.Recordset
Privaters1AsADODB.Recordset
Privaters2AsADODB.Recordset
PrivatestrSqlAsString
PrivateSubCommand1_Click（）
borrow.Show
EndSub
PrivateSubCommand2_Click（）
reback.Show
PrivateSubCommand4_Click（）
Text2.Text="
IfCnToDB=FalseThen
MsgBox"
网络未响应！
出现此情况可能是与服务器没有物理连接或数据库不在指向的服务器上！
vbCritical+vbOKOnly,"
ConnectingError"
EndIf
OnErrorGoTofmerr
IfQueryData（"
select*frombook"
）=TrueThen
SetDataGrid1.DataSource=rst
Else
查询失败！
ExitSub
fmerr:
Ifrst.BOF=TrueAndrst.EOF=TrueThen
没有任何记录！
PrivateSubCommand5_Click（）
delbook.Show
PrivateSubImage1_Click（）
DimstrFAsString搜索按钮
strF="
select*frombookwherebooknamelike'
%"
&
Text2.Text&
"
%'
IfQueryData（strF）Then
PrivateSubMDIForm_Load（）
SetDataGrid1.DataSource=rst
EndSub
PrivateSubmun_add_data_recstu_Click（）
addreader.Show
PrivateSubmun_borr_giv_Click（）
PrivateSubmun_borr_ow_Click（）
PrivateSubmun_data_add_recbook_Click（）
addbook.Show
PrivateSubmun_del_book_Click（）
PrivateSubmun_del_stu_Click（）
delreader.Show
PrivateSubmun_exp_borrow_Click（）
booktran.Show
PrivateSubmun_exp_stu_Click（）
reader.Show
PrivateSubmun_help_about_Click（）
about.Show
PrivateSubmun_rework_book_Click（）
reworkbook.Show
PrivateSubmun_rework_stu_Click（）
reworkreader.Show
PrivateSubmun_sys_admin_Click（）
addmange.Show
PrivateSubmun_sys_sys_Click（）
delmange.Show
数据管理的实现
当单击数据管理－添加－书籍记录菜单时，窗体如下：
代码如下：
UnloadMe
OnErrorGoTonore
IfMsgBox（"
确实要添加吗？
vbYesNo+vbQuestion,"
提示"
）=vbYesThen
CallupD
rst.Update
添加成功"
nore:
图书编号重复或者输入错误！
vbOKOnly+vbCritical,"
PrivateSubForm_Load（）
Text1.Text="
Text3.Text="
Text4.Text="
Text5.Text="
Text6.Text="
Ifrst.BOF=TrueA
升级会员 