图书管理系统Word文件下载.docx
《图书管理系统Word文件下载.docx》由会员分享,可在线阅读,更多相关《图书管理系统Word文件下载.docx(26页珍藏版)》请在冰豆网上搜索。
![图书管理系统Word文件下载.docx](https://file1.bdocx.com/fileroot1/2023-1/22/db3ede61-d018-427d-8547-598d92d6ed40/db3ede61-d018-427d-8547-598d92d6ed401.gif)
由于数据繁多,容易丢失,且不易查找。
总的来说,缺乏系统,规范的信息管理手段。
尽管有的图书馆有计算机,但是尚未用于信息管理,没有发挥它的效力,资源闲置比较突出,这就是管理信息系统的开发的基本环境。
1.2需求分析
立足于当今社会信息的发达,着眼于未来发展,建成符合标准化协议、通用性较强、实用的系统,以提高图书信息的现代化管理水平,实现信息资源的共享。
图书管理系统是一种基于集中统一规划的数据库数据管理新模式。
在对图书、读者的管理,其实是对图书、读者数据的管理。
图书借阅网站不仅要有漂亮的网页,更要有严谨的规划。
每一个细小的环节都很重要。
运用相关应用网站开发技术把数据库和动态网页相关联。
使得图书借阅管理系统中的数据能及时得到更新,保存,从而方便读者对图书相关信息的查询,续借。
同时也大大提高了管理员的工作效率。
本系统的建成无疑会为管理者对图书管理系统提供极大的帮助。
使用该系统之后,图书馆管理人员可以管理读者的登记、借出以及归还等;
还可以查询某位读者、某本图书的借阅情况,对当前借阅情况给出一些统计,给出统计表格,以全面掌握图书的流通情况。
本系统的宗旨是提高图书管理工作的效率,减少相关人员的工作量,使学校的图书管理工作真正做到科学、合理的规划,系统、高效的实施。
图1-1系统流程图
系统流程分析:
这是一个相对封闭的图书借阅系统,只有通过管理员注册了账号与密码的用户才够登录进入系统。
系统登录页面:
用户通过已有账号进行登录,若登录成功则进入首页,若登录的用户、密码和类型有错误,系统会自动给予提示。
首页:
显示图书借阅排行榜和该系统所具有的全部功能的链接。
当读者点击不属于自己权限的链接时,系统会给予其不具有此权限的提示。
管理员:
具有访问所有页面的权限。
可以实现更改用户权限、密码,注册用户,管理书架信息,管理读者与图书信息,管理图书的借还和执行系统查询
读者:
只具有图书续借、图书借阅查询和图书档案查询的权限。
用户在任何界面均可返回主页。
1.3开发环境
(1)MicrosoftVisualStudio2005开发环境
(2)MicrosoftOfficeAccess2007数据库
数据库是数据管理的最新技术,是计算机科学的重要分支。
十年来,数据库管理系统已从专用的应用程序包发展成为通用系统软件。
由于数据库具有数据的结构化、可控冗余度、较高的程序与数据独立性、易于扩充、易于编制应用程序
等优点,较大的信息系统都是建立在数据库设计之上的。
用VB.Net语言进行编码。
VB.Net编程语言是微软在.NET计划中重要的开发语言,它具有语法简单,功能强大,快速应用,语言自由,强大的Web服务器控件,支持跨平台,与XML相融合等。
因此选择VB.Net编程语言。
第2章系统设计
2.1系统架构
整个系统分为三个部分,管理员、读者和主界面。
首先,因为系统是面向特定的某些对象的,所以用户进入系统应该进行身份验证。
根据不同的身份进入不同的操作界面。
首先,对于管理员来说,具有任何权限。
登录后,能够对书架、图书和读者的信息进行管理,例如添加和修改读者、图书,对读者、图书进行分类;
并实现图书的借还、查询功能
对于读者可以登陆系统,具有续借图书,查询图书、读者信息的功能。
本系统是以WindowsXP系统为操作平台,在VB.NET环境下编程实现。
系统E-R图,如图2-1所示:
图2-1系统E-R图
2.2系统功能模块
本系统就是采用模块化的设计思想来完成的系统按照功能分成4个模块,即系统设置、系统管理、图书借还、系统查询。
系统设置包括管理员与书架设置。
系统管理包括读者类型与信息、图书类型与信息的管理。
图书的借还包括图书借阅、续借与归还。
系统查询包括图书借阅与档案的查询。
功能模块图如图2-2所示:
图2-2系统模块图
在本系统中,管理员具有任何权限,能够访问任何界面。
而普通读者只具有图书续借、图书借阅查询、图书档案查询的功能,能访问的页面有限。
。
系统设计的用例图如下:
图2-3管理员用例图
图2-4读者用例图
2.3系统数据库设计
为实现系统功能,本系统设计了9个表:
用户表、用户权限表、图书借阅信息表、书架信息表、图书信息表、图书类型信息表、读者信息表、读者类型表和管理员信息表。
表2-1学生表
序号
字段名
数据类型
数据长度
NULL
Primarykey
描述
1
userId
int
4
否
是
用户编号
2
userName
varchar
50
用户名称
3
userPwd
用户密码
userType
用户类型
表2-2用户权限表
80
userManage
bit
管理员设置
bookcaseManage
书架设置
readerType
读者类型
5
readerInfo
读者档案
6
bookType
图书类型
7
bookInfoManage
图书档案
8
bookBorrow
图书借阅
9
bookRenewal
图书续借
10
bookReturn
图书归还
11
bookBorrowSearch
图书借阅查询
12
bookInfoSearch
图书档案查询
表2-3图书借阅信息表
BookBarcode
图书条形码
BookName
20
图书名称
BorrowTime
datetime
借书时间
ReturnTime
还书时间
ReaderBarcode
读者条形码
ReaderName
读者名称
IsRetrun
是否归还
表2-4书架信息表
BookId
书架编号
BookcaseName
书架名称
表2-5图书信息表
100
BookType
BookCase
图书书架
BookConCern
出版社
Author
作者
Price
money
图书定价
BorrowSum
借阅次数
表2-6图书类型信息表
TypeID
类型编号
TypeName
类型名称
BorrowDay
可借天数
表2-7读者信息表
读者姓名
Sex
char
性别
ReaderType
CertificateType
证件类型
Certificate
证件号码
Tel
联系电话
Email
邮箱
Remark
500
备注
表2-8读者类型表
Id
类型号
Type
读者类型名称
Num
可借数量
表2-9管理员信息表
ManagerBarcode
管理员条形码
ManagerName
管理员姓名
第3章系统实现
本次所设计的界面,均由四个模块组成,即导航栏、页面内容提示、页面内容、版权信息。
用panel控件对页面进行布局,主要功能均由GridView控件完成。
无论在哪个也面,点击导航栏里的链接按钮,均可链接到相应的页面。
3.1系统首页
首页主要显示的是图书借阅排行榜与图书基本信息。
如图3-1所示:
图3-1首页
按BorrowSum字段对bookInfo表进行排序,主要代码如下:
DimconnAsNewOleDbConnection("
Provider=Microsoft.Jet.OLEDB.4.0;
DataSource=H:
\VisualStudio\bookdatabase\book.mdb;
PersistSecurityInfo=False"
)
DimcmdAsNewOleDbCommand("
select*frombookInfo"
conn)
DimadpAsNewOleDbDataAdapter(cmd)
DimdsAsNewDataSet()
adp.Fill(ds,"
bookInfo"
GridView1.DataSource=ds.Tables("
).DefaultView
ds.Tables("
).DefaultView.Sort="
BorrowSumdesc"
GridView1.DataBind()
3.2系统设置
系统设置是由管理员来完成的,读者不具有此功能。
主要包括管理员设置与书架设置。
3.2.1管理员设置
管理员设置页面主要包括添加用户、用户权限设置、删除用户和更改口令4个功能。
此页面中将显示用户名称和用户拥有的权限。
管理员设置页面的运行效果如图3-2所示。
图3-2管理员设置图
获取CheckBox与所要插入admSet表的值的主要代码如下:
text1=CType(GridView1.Rows(e.RowIndex).Cells("
1"
).Controls(0),CheckBox).Checked.ToString
Iftext1="
True"
Then
t1=1
ElseIftext1="
False"
t1=0
EndIf
3.3.2书架设置
书架设置模块主要包括添加、删除和修改3个功能。
此页面将显示书架名称。
,在TextBox中添加好书架名称,单击“添加书架信息”的链接后,在下面的表格中将显示所添加的书架。
若想对书架信息进行修改或删除,只要单击书架信息所属行的修改或删除链接即可。
书架设置页面的运行效果如图3-3所示。
图3-3书架设置页面
添加书架的代码如下:
Dimerror2AsException
IfTextBox1.Text="
"
MsgBox("
请输入书架名称"
vbInformation,"
友情提示"
Else
Try
DimconnAsNewOleDbConnection("
DimstrsqlAsString
strsql="
insertintobookcase(BookcaseName)values('
&
TextBox1.Text.ToString&
"
'
)"
DimcmdAsNewOleDbCommand(strsql,conn)
conn.Open()
cmd.ExecuteNonQuery()
conn.Close()
Catcherror2
此书架已经存在"
EndTry
Response.Redirect("
bookcase.aspx"
3.3系统管理
3.3.1读者类型
读者类型设置模块包括添加、删除和修改3个功能。
如图3-4所示:
图3-4读者类型设置图
3.3.2图书类型
图书类型设置模块包括添加、删除和修改3个功能。
如图3-5所示:
图3-5图书类型设置图
3.3.3读者档案
读者档案设置页面的运行效果如图3-6所示。
主要包括添加、删除和修改3个功能。
此页面将显示读者的基本信息。
若想对读者信息进行修改或删除,只要单击读者信息所属行的修改或删除链接即可。
单击“添加读者”的链接将弹出添加读者信息页面,如图3-7所示。
填写完读者信息后,单击注册,将完成添加读者的操作。
图3-6读者档案设置图
图3-8读者信息登记图
3.3.4图书档案
图书档案信息的修改、删除如图3-9所示;
图书信息的添加如图3-10所示:
图3-9图书档案设置图
图3-10图书信息登记图
3.4图书借还
3.4.1图书借阅
管理员进入图书借阅页面后输入读者条形码单击查找读者按钮,将显示出该读者的信息,此时调用了读者信息表。
然后输入读者想借的图书的条形码,将显示图书信息,然后单击图书信息中“借阅”链接按钮实现借阅功能。
此图书借阅页面运行效果如图3-11所示。
图3-11图书借阅图
获取读者信息的代码如下:
Dimstrsql,textAsString
text=TextBox1.Text.ToString
selectReaderName,ReaderName,ReaderType,CertificateType,Certificate,NumfromreaderInfo,readerTypewhereReaderBarcode='
text&
andreaderInfo.ReaderType=readerType.Type"
readerInfo"
Ifds.Tables("
).Rows.Count>
0Then
TextBox3.Text=ds.Tables("
).Rows(0)(0)
TextBox4.Text=ds.Tables("
).Rows(0)
(1)
TextBox5.Text=ds.Tables("
).Rows(0)
(2)
TextBox6.Text=ds.Tables("
).Rows(0)(3)
TextBox7.Text=ds.Tables("
).Rows(0)(4)
TextBox8.Text=ds.Tables("
).Rows(0)(5)
Panel5.Visible=True
不存在此读者"
图书借阅的代码如下:
Dimstrsql,strsql1,text1,text2,strsql3,strsql5AsString
Dimtext3AsInteger
text1=TextBox1.Text.ToString
text2=TextBox2.Text.ToString
strsql3="
selectBorrowSumfrombookInfowhereBookBarcode='
text2&
Dimcmd3AsNewOleDbCommand(strsql3,conn)
Dimadp3AsNewOleDbDataAdapter(cmd3)
Dimds3AsNewDataSet()
adp3.Fill(ds3,"
bookInfo1"
text3=ds3.Tables("
).Rows(0)(0)+1
strsql5="
updatebookInfosetBorrowSum='
text3&
'
whereBookBarcode='
insertintobookBorrow(BookBarcode,BookName,ReaderBarcode,ReaderName)selectBookBarcode,BookName,ReaderBarcode,ReaderNamefrombookInfo,readerInfowhereBookBarcode='
text1&
andReaderBarcode='
strsql1="
updatebookBorrowsetBorrowTime=#"
Now()&
#whereReaderBarcode='
andBookBarcode='
andIsReturn=0"
Dimcmd1AsNewOleDbCommand(strsql1,conn)
Dimcmd5AsNewOleDbCommand(strsql5,conn)
cmd1.ExecuteNonQuery()
cmd5.ExecuteNonQuery()