浅谈图书管理系统论文

浅谈图书管理系统论文

图书管理系统设计

【摘要】本文介绍了利用ASP+Access编写图书管理系统的实现

主要步骤与部分技术代码。

【关键字】ASP;Access

一、ASP+Access

ASP是ActiveServerPage的缩写，意为“动态服务器页面”。ASP是微软公司开发的代替CGI脚本程序的一种应用,它可以与数据

库和其它程序进行交互，是一种简单、方便的编程工具。

MicrosoftOfficeAccess(前名MicrosoftAccess)是由微软发布

的关联式数据库管理系统。它结合了MicrosoftJetDatabaseEngine

和图形用户界面两项特点，是MicrosoftOffice的成员之一。

由于Access存储方式简单，易于维护管理、移植性好，所以本

系统采用ASP做为编程工具、Access做数据库来开发

二、系统模块

㈠图书简介：把图书进行分类和定义索书号，以方便查询。

㈡规章制度：主要介绍图书管理的订购、借阅、归还等制度。

㈢图书录入：对新购图书按书名、作者、分类、编号等图书信息进行录入。

㈣图书归还：此模块是图书管理员对归还的图书，按照图书编号进行入库管理。

㈤图书查询：按图书信息一些主要字段对数据库进行查询并显示。

㈥新购图书：查询某一时间段以后所购买的图书并显示。

㈦未归图书：显示未归的图书，并分页显示。

㈧系统维护：对数据库进行备份和恢复。

三、设计数据库

此图书管理系统数据库里主要有以下几个表：

User：用来存储图书管理员的用户名和密码。字段为user、pwd。

Menu：存储程序主页面的菜单名称和链接地址。字段为ID、父

菜单ID、位置、URl、字体颜色、菜单项。

Bookinfo：用来存储图书的各种信息。字段为书名、作者、图书分类、图书编号、索书号、出版社、版期版次、购入日期、价格、

排架号、是否借阅、借阅日期、应归还日期、借阅科室、借阅人、

备注。

Dept：用来存储科室名称。字段为dept。

四、程序设计

㈠登录模块及Session的使用

由于此系统有些功能是不允许普通用户使用的，如图书录入、图书归

还等模块，所以本系统采用以管理员登录的方式，来判断是何种用户使用本系统，如果是普通用户，点击“以普通用户登录”，就

可以使用本系统，但图书录入、归还图书和系统维护等模块不能使用。

㈡表单验证

在图书录入模块中，需要填写图书的各种信息，在提交表单时如果某

functioncheckinput(){

if(frm.bookname.value==''){

alert('请输入书名');

frm.bookname.focus();

returnfalse;

}

}

在提交按钮代码中加入OnSubmit="Returncheckinput()"就可以完成对表单的验证了。

㈢数据库连接

对于Access数据库，一个文件就是一个数据库，所以可以利用数据驱动程序直接访问数据，这种方法需要利用动态连接字符串建立一个连接，具体连接字符如下：

Dimconn,connstr,db

db="./data/tushu.mdb"

connstr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&S erver.MapPath(db)

Setconn=Createobject("ADODB.Connection")

conn.Openconnstr

这样就可连接数据了，再用SQL语句就可以读取表中数据了：

Setrs=CreateObject("ADODB.RecordSet")

sql="Select*Frombookinfo"

rs.Opensql,conn,1,3

㈣对数据库的操作

连接好数据库后，我们就可以对表bookinfo的记录进增加、删除、修改等操作了。具体代码及释义如下：

(1)：增加：

bianhao=Trim(Request("bianhao"))

sql="Select*FrombookinfoWhere图书编号='"&bianhao&"'"

rs.Opensql,conn,1,3

Ifrs.recordcount<>0Then

Response.Write"此图书编号已存在，请重新输入"

Response.Write"

"

Response.Write""

Response.Write"返回"

Else

注：在增加信息时，必须检索图书编号是否唯一，如不唯一会出给出提示：“此图书编号已存在，请重新输入”

rs.addnew

rs("书名")=trim(request("bookname"))

rs(“作者")=trim(request("author"))

……

rs.update

endif

Response.Redirect"addbook.html"

endif

setrs=nothing

(2)删除

本系统“删除”图书记录功能在查询模块中执行，但必须以管理员身份登录，才能显示对记录进行操作的功能：

删除记录采用SQL中的delete语句，代码如下：

bh=Request("bianhao")

Ifbh<>""Then

conn.Execute"DeleteFrombookinfoWhere图书编号='"&bh&"'"

EndIf

(3)修改

(4)查询

本系统有精确查询、模糊查询、分类查询、编号查询、索书号查询、借阅人查询共六种方法。用SQL中select…where…就可以完成查询功能。如按分类查询:

tiaojian=Trim(request("tiaojian"))

Setrs=CreateObject("ADODB.RecordSet")

sql="select*frombookinfowhere图书分类

='"&tiaojian&"'orderby图书编号desc"

rs.Opensql,conn,1,1

五、小结

【参考文献】

[2]武延军，赵彬.精通ASP网络编程.人民邮电出版社，2000

[3][美]MichaelMoncurJavaScript入门经典人民邮电出版，2007

试论图书管理系统