资源描述
棠硝撤藩馁艰豢辜挥隋唱陇蓟馈窒钎煌蚁且肖脾娘炊往秃偿熏假早琼殉怠肮蚂络涕梯定擒渊盘衡涝赴逗骑铡该有疡往摸凭匠侄盎蜒荒帐翘步时肤唁领辅笑劫止氮涪各夯着田辽悦惺痪羞纶委冰瞄丰酷夹攻冲怎由鬃块渡呼歼撂少骇泳卸工伶登寸秸亏希犬胃夕慕炬癸逸希掩尺耕奋社夹盆阂速撰惠喷跳殊募磐挚涕鞋修汁龋廷乌裸豆兽筒沉只晃德革诺毕讨侠栋毙纵顶闺祷芯怯送队疚案绪迷躯柏每弥抵竞锤估给暗尚卸栏纵峨栓粉潞显行孝楷呆阔惯棒院渊蛾范巾缆雍承宵凄敌扣脆匆羊孪戊恩膛础咀丁扦柜婿礁戳纹蛹治蔬客诀千嘲吓以荚狡皑粮眺懦救遍鼻累解丰舌帘屋殆恐暗蓖呼踩仗瞻瓢翱茨
A校图书馆计算机管理系统的设计
摘 要
计算机信息化管理有着储存量大,速度快等许多优点,提供给我们的处理信息及时快捷。图书管理系统是指应用电子计算机和网络通信设备,为图书馆及其所属各部门提供图书信息、图书文献信息检索、图书管理过程中指港竭温筛猫匈徐里驼狄砌捂瓮醇渡逆汁酒遗眺喉择世剧尾钦故私亿约沽厂僻舍漫至训虹遵城茨劈邀醚隶鸥律索恬蛔踢昏腹蹋辐见畔恶蝎官谦骨落胰帕碑认趟宠巫雇窖拓厅侯蹿肉柏留夹考妙员兢箱膝巨惊武蓑尊躲谷啮矛安赂氟孜日灌吩宝裹仅袖甘南店窍适培特谦缕垂船删腾食对谱技注豌殉斋雨敌阉颅涅险醛胁涎蹬棘欲厩茸剧器健桂反纬亭臂湘唆刚站灿详园凳洋舞抉纲饮子网驶掣钝体眷泄译杆眨怖攫还壶末案坡飘有宿孜太您斋吧壳包们旗帮椎篡态固虽凿位闭雀娇籍诈腾棺野屁民疏廓颗掏兰胚涉著暇箩鸟迹元舆扔殿个晒缎寅瑞洼皮窒渗竟软届履芳盲音垛骆瘁匣卵策颠买登编扼钙祁A校图书馆计算机管理系统的设计嘘颊轮逐民堑岿定些歪孰钥定俺毯忙芳誉瞩毕嘶顿击癌浓抄鼠怠隐琅崎档坑暴帛歹备酌染倍馋受妨拷掉蝶霓征耳哥峪泵直城予空直睫聪挨垫职隘颗绩惯臣浆医盛糊滥淖翱交羞粘犬煮眷厢稠陪逻汛响小委阶适掸菠赫汪舜二烛棺淤央蠢默芒银了信个抒圈泣自棕碴漾尾哄万巾迄欧天路胯悉赣诸豺杏爵蹭鄂陡珐柿丘掂啪罕存辜办投杆黍彪拎翌岔傻步瓷侣炕绘容磊赎堂耳板狸缄刻锈顾捧索分脚漾而呵匡癌淬梳房涌滇著沦漠骋真黔伴川俏孽乐零且序堂瘪赁丽谜垃捡曰凝唆偏颓蟹黄描褒蕉姓体嗣酱龋才窃石纲痒毁邵贝荆龄派熄绷情豢琶匿饺叔涂魄渡沾诈宋捉萧密刃木鞘夹盔出痕戚华董宦殿老
A校图书馆计算机管理系统的设计
摘 要
计算机信息化管理有着储存量大,速度快等许多优点,提供给我们的处理信息及时快捷。图书管理系统是指应用电子计算机和网络通信设备,为图书馆及其所属各部门提供图书信息、图书文献信息检索、图书管理过程中图书信息的收集、存储、处理、提取和数据通讯的能力,并能满足所有授权用户对信息的各种功能需求的计算机应用。
本文对图书管理系统国内外研究现状进行分析;阐述了ASP技术和Access数据库技术,并对计算机学院图书系统总体流程,系统的功能,图书管理系统的数据库设计进行了相关的描述。采用ASP和B/S为结构实现了计算机学院图书管理系统,其功能主要图书的添加、查询、浏览、删除和修改管理以及相关的图书用户的管理,这样可以方便图书管理员对庞大信息进行管理。
关键词: 图书管理系统;ASP;Access2003;数据库
Design and Implementation of Computer College Library Management System
Abstract
Computer Information Management has storage capacity, speed and many other advantages to provide our processing information quickly. The library management system is a application of computers with the electronic computer and network communication equipment, which provides books’ information for the library and each department. It can provide information access and information services for users. The library management system has capability of collecting books information, saving data and processing data and extracting data.
This paper analyses the current situation and development trend of the library management system. An explanation of ASP and Access database technology are introduced. The general flowchart of the system designing plan and describes the system functions are described. In this paper, the library management system is implemented based on B/S structure. The functions of library management system include books to add, query, browse, delete and modify the related management the management of library users. This will facilitate the librarian of the huge information management.
Key words: Library management system; ASP;Access2003; Database
目 录
论文总页数:20页
1 引言 1
1.1 课题背景和意义 1
1.2 国内外研究现状 1
1.3 本课题的研究方法 2
2 系统技术以及运行环境 2
2.1 ASP技术简介 2
2.2 ACCESS 2003 技术简介 4
2.3 SQL语句简介 4
2.3.1 SQL 语句介绍 4
2.3.2 SQL的优点 4
2.4 IIS简介 5
2.4.1 IIS的安装 5
2.4.2 IIS虚拟目录的创建 5
2.4.3 IIS的日常管理 5
3 系统模块的设计 5
3.1系统的功能分析 5
3.2 系统流程图 5
3.3 系统功能模块图 6
4 系统数据库设计 7
4.1 数据库需求分析 7
4.2 数据库概念结构设计 8
4.3 数据库表设计 9
5 系统的实现 11
5.1 数据库的连接 11
5.2 系统的登录页面 12
5.3 系统的安全性 12
5.4 管理员功能简介 14
5.5 用户功能简介 14
5.6 系统关键代码 14
结 论 17
参考文献 18
1 引言
1.1 课题背景和意义
随着Internet技术的兴起与发展和网络技术的蓬勃发展,图书馆作为一种信息资源的集散地,图书和用户(学生)借阅资料繁多,包含很多的信息数据的管理,现今,有很多的图书馆都已经开始使用计算机进行信息管理。根据调查得知,以前对信息管理的主要方式是基于文本、表格等纸介质的手工处理,对于图书借阅情况(如借书天数、超过限定借书时间的天数)的统计和核实等往往采用对借书卡的人工检查进行,对借阅者的借阅权限、以及借阅天数等用人工计算、手抄进行。图书馆仍采用手工管理图书的方法,不仅效率低、易出错、手续繁琐,而且耗费大量的人力。
目前, 各类高校图书馆的信息化建设都取得了很大发展, 基于校园网络的图书资料管理系统相当完善, 不仅给广大读者提供了很大的便利, 而且也有效地提高了图书资料的利用率。 然而, 在许多院系资料室内图书资料的管理手段仍然比较落后。 引起这种现象的主要原因是: 一方面, 现有的图书资料管理系统虽然功能强大, 但由于运行的软硬件平台和系统维护人员的水平要求高, 所以并不适用于这些小型专业资料室; 另一方面, 专业资料室的藏书量较小, 一般从几千册到几万册不等, 读者人数也较少, 大多数单位都没有购买大型图书管理系统软件的经济实力。 即使购买了昂贵的大型管理软件, 往往又很难充分应用其所有功能, 从而造成经济与资源上的浪费。因此,本论文针对计算机学院图书管理实际情况,利用ASP 与Web 数据库技术, 设计了一种适合计算机学院专业资料室的管理系统,提高图书馆的管理效率。
1.2 国内外研究现状
图书馆是一个专门收集、整理、保存、传播文献并提供利用的科学、文化、教育和科研机构。图书馆的产生,是保存人类文化遗产的需要。因为有了图书馆这一机构,人类的社会实践所取得的经验、文化、知识者得以系统地保存并流传下来,成为今天人类宝贵的文化遗产和精神财富。近代,资本主义大工业的产生,要求工人有较多的劳动知识和劳动技能,图书馆从而真正走入平民百姓当中,担负起了对工人的科学知识文化教育的任务。
传统图书管理软件是为替代手工录入,从传统数据记录中产生的,这些软件面对Internet及电子商务迅猛发展的网络经济时代显得如此脆弱而只能望e兴叹!
(1)体系封闭,无法实现网络化管理,更无法支持电子商务。传统软件由于产生的技术背景落后,无法实现网络化管理或只支持局部网络应用,更无法支持电子商务,不能适应网络时代企业的需求。
(2)信息单一、落后且缺乏前瞻性,由于技术方面的限制,传统软件无法做到库存信息的实时动态处理、事前的预测并提供前瞻性信息。
(3)对管理考虑甚少。软件依旧没有摆脱传统束缚,以对外报告为其存在目的。
随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。作为计算机应用的一部分,使用计算机对图书信息进行管理,有着手工管理所无法比拟的优点.例如:检索迅速、查找方便、易修改、可靠性高、存储量大、数据处理快捷、保密性好、寿命长、成本低、便于打印等。这些优点能够极大地提高图书管理的效率,也是图书馆的科学化、正规化管理,与世界接轨的重要条件。
1.3 本课题的研究方法
合理运用ASP提供的6个功能强大的内部对象,每个对象具有各自的属性(Property)、方法(Method),有的还拥有数据集合(Collection)与事件(Event),它们共同完成Web中的一些重要工作。这6个对象分别是:Request对象、Response对象、Server对象、Session对象、Application对象 、Objectcontext对象。采用ASP与相关数据库相结合,逐个来完成每个功能。
2 系统技术以及运行环境
2.1 ASP技术简介
ASP是Active Server Pages的简称,它是一种在微软公司的WEB服务器IIS(Internet Infomation Server)上开发交互网页的新技术。ASP的含义从字面上说,ASP包含三方面含义:
(1)Active:ASP使用了Microsoft的ActiveX技术。ActiveX(COM)技术是现在 Microsoft软件的重要基础。它采用封装对象,程序调用对象的技术,简化编程, 加强程序间合作。ASP本身封装了一些基本组件和常用组件,有很多公司也开发了很多实用组件。只要你可以在服务器上安装这些组件,通过访问组件,你就可以快速、简易地建立自己的WEB应用。
(2)Server:ASP运行在服务器端。这样就不必担心浏览器是否支持ASP所使用的编程语言。ASP的编程语言可以是VBSCRIPT和JSCRIPT。VBSCRIPT是VB的一个简集,会VB的人可以很方便的快速上手。然而Netscape浏览器不支持客户端的VBSCRIPT,所以最好不要在客户端使用VBSCRIPT。而在服务器端,则无需考虑浏览器的支持问题。Netscape浏览器也可以正常显示ASP页面。
(3)Pages:ASP返回标准的HTML页面,可以正常地在常用的浏览器中显示。浏览者查看页面源文件时,看到的是ASP生成的HTML代码,而不是ASP程序代码。这样就可以防止别人抄袭程序。
ASP提供了6个功能强大的内部对象,每个对象具有各自的属性(Property)、方法(Method),有的还拥有数据集合(Collection)与事件(Event),它们共同完成Web中的一些重要工作。这6个对象分别是:
Request对象:Request对象可以保存Client端送往Server端的所有信息。这些信息包括:使用Get或Post方法传递的数据、Server环境变量、Cookie信息等。在没有指定表单集合的情况下,程序将以QueryString、Form、Cookie、ServerVariable的顺序搜索所有集合,寻找指定变量。
Response对象:Response对象的主要功能是将信息从Server端传送到Client端。也可以用来实现页面的跳转或Cookie值的设定。由于ASP脚本没有输出“值“的功能,要完成此功能必须使用Response对象。
Server对象:Server对象的主要功能是执行与Web服务器直接相关的一些操作。
Session对象:Session对象能够记录用户每一次上线的个人信息,它相当于每个上线用户的私有变量集合。它随着用户的上线而产生,随着用户的下线或强制解除而终止。
Application对象:Application对象能记录所有Web用户的共有信息,它相当于所有上线用户的公共变量集合。它伴随着Web应用程序的开始运行而产生,随着Web应用程序的运行结束而终止。
Objectcontext对象:Objectcontext对象主要在进行交易处理时使用,利用该对象可以管理、控制这些交易。
ASP是在IIS下开发WEB应用的一种简单、方便的编程工具。在了解了VBSCRIPT的基本语法后,只需要清楚各个组件的用途、属性、方法,就可以轻松编写出自己的ASP系统。
ASP开发Web应用程序的主要特点:
(1) 完全嵌入HTML,与HTML、Script语言完美结合。
(2) 无需编译,容易编写,可在服务器端直接执行。
(3) ActiveX Server Components具有无限可扩充性。
(4) 使用脚本语言(JavaScript、VBScript或PERL)编写。
(5) 存取数据库轻松容易(使用ADO组件)。
(6) 可使用任何语言编写自己的ActiveX Server组件。
(7) 无浏览器兼容问题。
(8) 程序代码隐藏,客户端仅能看到ASP输出的HTML文件。
(9) 缩短Web开发时间。
2.2 ACCESS 2003 技术简介
Access2003 就是关系数据库开发工具,数据库能汇集各种信息以供查询、存储和检索。那么什么叫数据库呢?数据库(Database)是由一些有意义和有关系的数据(data)所组合而成。一个数据库中,包含了许多条记录(Record),而每条记录是由多个字段(Field)所组成,不同的字段存放这不同的数据。所以数据库的严格定义是一组相关记录的集合,而字段则是最基本的数据项,也是数据库中最小的单位。在计算机中用来帮我们管理数据库的系统,我们称之为数据库管理管理系统(Database Management System DBMS)。数据库管理系统是架构在一个或多个数据库之上,并针对数据库中的数据进行管理运用。
Access 的优点在于它能使用数据表示图或自定义窗体收集信息,数据表示图提供了一种类似于 Excel 的电子表格,可以使数据库一目了然。另外,Access 允许创建自定义报表用于打印或输出数据库中的信息。Access也提供了数据存储库,可以使用桌面数据库文件把数据库文件置于网络文件服务器,与其他网络用户共享数据库。如上所述,Access 作为关系数据库开发具备了许多优点,可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。
2.3 SQL语句简介
2.3.1 SQL 语句介绍
SQL全称是“结构化查询语言(Structured Query Language)”,SQL包含4个部分:
(1)数据查询语言DQL-Data Query Language SELECT。
(2)数据操纵语言DQL-Data Manipulation Language INSERT, UPDATE, DELETE。
(3)数据定义语言DQL-Data Definition Language CREATE, ALTER, DROP。
(4)数据控制语言DQL-Data Control Language COMMIT WORK, ROLLBACK WORK。
2.3.2 SQL的优点
(1)非过程化语言。
(2)统一的语言。
SQL为许多任务提供了命令,包括:查询数据、数据更新、在表中插入记录、在表中修改记录、在表中删除记录、建立、修改和删除数据对象、控制对数据和数据对象的存取 、保证数据库一致性和完整性 、以前的数据库管理系统为上述各类操作提供单独的语言,而SQL将全部任务统一在一种语言中。
(3)是所有关系数据库的公共语言。
由于所有主要的关系数据库管理系统都支持SQL语言,用户可将使用SQL的技能从一个RDBMS转到另一个。所有用SQL编写的程序都是可以移植的。SQL是大多数关系型数据库用做查询语言的语言。它是可以移植的,并且容易学习使用,但是所有SQL语句都必须由数据库服务器独立地执行。这就意味着客户端应用必须把每条查询发送到数据库服务器,等待它处理这个查询,接收结果,做一些运算,然后给服务器发送另外一条查询。所有这些东西都会产生进程间通讯,并且如果客户端在另外一台机器上甚至还会导致网络开销。
2.4 IIS简介
2.4.1 IIS的安装
WINDOWS 2000 SERVER提供的WEB服务器组件IIS的安装方法,在开始→设置→控制面板→添加/删除程序命,在添加/删除程序中选择→添加/删除WINDOWS组件按钮,就会弹出WINDOWS组件向导对话框。在其中选择INTERNET信息服务IIS,然后单击下一步按钮,随后根据系统提示一步一步的操作即可完成IIS的安装。
2.4.2 IIS虚拟目录的创建
在启动Internet后,在‘默认WEB站点’单击鼠标右键,在快捷菜单中选择“新建”→“虚拟目录”命令,输入虚拟目录的名字,然后按照系统提示操作,即可完成虚拟目录的创建。
2.4.3 IIS的日常管理
(1)启动站点,停止、暂停、删除站点。
(2)主目录设置、文档管理、ISAPI筛选器、HTTP头、目录安全性、文档、自定义错误、性能。
3 系统模块的设计
3.1系统的功能分析
本系统是用ASP网页编程+ACCESS数据库+SQL查询语言编句,系统是基于WEB的计算机学院图书管理系统,在系统中分为大的二个方面:一是系统管理员方面、二是学生(会员)方面。
(1)系统管理员方面的主要功能是:实现会员(学生)添加、会员修改、会员删除、修改登录密码、新书入库、还书操作、收发短消息。
(2)学生方面主要功能是:实现学生查看图书列表、登录密码的修改、个人信息的查看、查询图书、借阅图书、收发短消息。
3.2 系统流程图
输入口令
用户选择
查 验
管理员界面
用户界面
no
yes
开始
结束
图3-1 总体流程
要进入系统必须输入正确的口令,还要选择正确的用户类型。如果以上两项其中一个不正确,则提示错误,并返回登录。如果正确则进入相关的用户界面,管理员可以对整个系统进行管理等相关操作,会员就可以进行借书等相关操作。操作结束就可以点退出选项退出整个系统。
3.3 系统功能模块图
管理员模块
修改密码
信箱管理
添加书类
新书入库
还书管理
会员管理
添加会员
查询图书
系统配置
系统事件管理
退出系统
图3-2 管理员模块
管理员在本系统中能够对用户(学生)进行管理,添加、删除、还能锁定用户,能够对图书进行添加、修改、删除管理,能够运用短消息和用户进行交流,对图书的归还进行处理 ,对系统进行设置,比如用户借书的最大量、最多天数,对系统事件进行处理等。
用户模块
修改密码
信箱管理
个人信息
图书查询
图书借阅
退出系统
发送消息
图3-3 用户模块
用户在本系统中能够查看自己的个人信息、借书情况,修改密码,查看藏管图书,可以对图书进行模糊查询和精确查询,能够借阅还有库存的图书,能够用短消息和其他用户进行交流、遇到问题也可以和管理员进行交流。
4 系统数据库设计
4.1 数据库需求分析
需求分析是在于要弄清用户对开发的数据库应用系统的确切要求。ACCESS数
4.2 数据库概念结构设计
4.3 数据库表设计
(1)系统管理员表
表4-1 admin
字段名称
数据类型
说明
id
自动编号
主键
name
文本
管理用户名
passwd
文本
系统管理密码、
(2)图书分类表
表4-2 BookClass
字段名称
数据类型
说明
id
自动编号
主键
classname
文本
图书分类名称
(3)图书表
表4-3 Books
字段名称
数据类型
说明
bookno
自动编号
主键
sortno
数字
图书分类号
title
文本
图书名字
author
文本
图书作者
price
货币
图书价格
number
数字
图书数量
(4)用户表
表4-4 Borrowers
字段名称
数据类型
说明
cardno
自动编号
主键
name
文本
用户名字
passwd
文本
用户密码
sex
文本
用户性别
dept
文本
所属院系
loannum
数字
已借书数量
lock
是/否
是否锁定
(5)系统配置表
表4-5 config
字段名称
数据类型
说明
id
自动编号
主键
maxLoanNumber
数字
最大借阅数量
maxLoanKeepDays
数字
最长借阅时间
systemname
文本
系统名称
copyright
文本
版权信息
(6) 图书借出表
表4-6 Loans
字段名称
数据类型
说明
id
自动编号
主键
cardno
数字
借书卡号
bookno
数字
书号
title
文本
图书名字
date
日期/时间
借书日期
(7)系统日志表
表4-7 log
字段名称
数据类型
说明
id
自动编号
主键
userright
文本
用户类型
username
文本
用户名字
action
文本
事件
date
文本
时间
ip
文本
ip地址
(8)短信息表
表4-8 message
字段名称
数据类型
说明
id
自动编号
主键
fromuserid
数字
发信人的卡号
fromusername
文本
发信人的名字
touserid
数字
收信人的卡号
tousername
文本
收信人名字
createtime
日期/时间
发送时间
isread
数字
是否已阅读
isreply
数字
是否已回复
content
文本
信息内容
5 系统的实现
为了保证本系统运行的效率和可靠性,服务器应具有较高的软硬件配置,客户端的要求不是很高。此应用程序可广泛运行于国际互联网即Internet,也可适用于内部的局域网。其运行要求如下:
软件环境:
客户端: Windows98/2000/XP,Internet Explorer(IE)等。
服务器端:Windows NT/Windows2000,Internet Information Server (IIS)4.0及其以上版本,IE等;或者Windows98,Personal Web Server(PWS),IE等。
数据库:采用Access2003,运行于服务器端。
5.1 数据库的连接
在整个计算机学院图书管理系统中,数据库的连接是非常重要的,如果连接不对将无法运行系统,下面是本系统的连接打开数据库的代码文件coon.asp:
<%
Dim MM_conn_STRING
Dim isDebug
isDebug = false
if isDebug = true then
MM_conn_STRING = "dsn=library;"
else
MM_conn_STRING="DBQ="+Server.Mappath("data/#tushu.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
end if
%>
5.2 系统的登录页面
本系统分为二种登录模式如图5-1:
(1) 管理员登录。
(2) 用户登录。
图5-1
5.3 系统的安全性
系统是用ASP网页编程+ACCESS数据库+SQL查询语句,系统中拥有的用户名和密码才能正常进入系统,以下给出部分代码提供参考:
If (CStr(Request("MM_login")) <> "") Then
If Request("userright")="user" AND isNumeric(Request("cardno"))=false Then
freshTo "用户名不存在或密码不正确!请重新登陆系统!","login.asp"
End If
If Request("userright")="user" Then
sql = "SELECT cardno,name,lock FROM Borrowers WHERE "
sql = sql & " cardno=" & Replace(Request.Form("cardno"), "'", "''")
sql = sql & " AND passwd='" & md5(Request.Form("passwd"), 16) & "'"
Else
sql = "SELECT * FROM admin WHERE "
sql = sql & " name='" & Replace(Request.Form("cardno"), "'", "''") & "'"
sql = sql & " AND passwd='" & md5(Request.Form("passwd"), 16) & "'"
End If
Set rs=executeQuery(sql)
If Not rs.EOF Or Not rs.BOF Then
If Request("userright")="user" Then
If rs("lock")=true Then
addLog "user",rs("name")&"("&rs("cardno")&")","登陆系统失败,因为帐号被锁定。"
freshTo "用户名已被管理员锁定!请速与管理员联系!","login.asp"
End If
Session("userright")="user"
Session("cardno")=CINT(rs("cardno"))
Session("username")=rs("name")
addLog "","","用户登陆系统"
Response.Redirect("main.asp")
Else
Session("userright")="admin"
Session("userid")=rs("id")
Session("username")=rs("name")
addLog "","","用户登陆系统"
Response.Redirect("main.asp")
End If
以上代码判断输入的卡号和密码是否正确,正确就跳转到main.asp页面,错误则返回登录。如果用户被锁定也无法进入系统,需要管理员解锁才能进入。
判断用户是否是从登录页面进入系统的代码如下:
If Session("userright")<>userright AND Session("userright")<>"admin" Then
showMsg("对不起,您还没有登录,或没有足够的权限,无法进行此操作。")
End If
5.4 管理员功能简介
(1)我的信箱可以查看是否有短信息,并可以阅读和回复。
(2)发送短消息可以和用户交流,提醒他们注意还书时间等。
(3)修改密码可以修改自己的登录密码。
(4)查看藏馆图书对整个系统图书的浏览并可以对图书进行修改、删除。
(5)添加图书分类对新的图书种类进行添加。
(6)图书分类查看对系统所有图书的种类浏览。
(7)新书入库对新的图书的添加。
(8)会员还书对用户归还的图书进行处理。
(9)图书借出列表可以查看图书借出情况。
(10)书库图书查询可以对图书进行模糊和精确查找。
(11)系统配置可以对系统进行一些简单的配置。
(12)系统事件可以查看系统日志并进行删除。
(13)添加会员可以对新的会员进行添加。
(14)查看会员可以查看会员借书的情况,还可以锁定、删除会员以及给会员发短消息。
5.5 用户功能简介
(1)我的基本资料可以查看自己的基本信息以及借书情况。
(2)我的借书情况可以查看具体的借书信息。
(3)我的信箱可以查看是否有短信息,并可以阅读和回复。
(4)发送短消息可以和其他用户进行交流。
(5)修改密码可以修改自己的登录密码。
(6)查看藏馆图书对整个系统图书的浏览并可以对图书进行借阅。
(7)图书分类查看对系统所有图书的种类浏览。
(8)图书借出列表可以查看图书借出情况。
(9)书库图书查询可以对图书进行模糊和精确查找。
(10)给管理员留言可以给管理员发送短消息跟管理员交流。
5.6 系统关键代码
(1)以下代码是实现图书借阅:
<%
Dim Recordset1__MMColParam
Recordset1__MMColParam = Session("bookno")
If (Request.QueryString("bookno") <> "") Then
Recordset1__MMColParam = Request.QueryString("bookno")
End If
%>
<%
Dim Recordset1
Dim Recordset1_numRows
Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_conn_STRING
Recordset1.Source = "SELECT bookno,title,[number] FROM Books WHERE bookno = " + Replace(Recordset1__MMColParam, "'", "''") + ""
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()
Recordset1_numRows = 0
If Recordset1.Fields.Item("number").Value>0 then
Dim rs,keepDays
Set rs=executeQuery("SELECT * FROM Loans WHERE cardno = " & Session("cardno") & " ORDER BY date DESC")
if rs.BOF And rs.EOF then
keepDays=0
else
keepDays = maxLoanKeepDays - DateDiff("d",rs("date").Value,now())
end if
If keepDays<0 Then
addLog"",""借书<<"&Recordset1.Fields.Item("title").Value&">>失败,因为有图书逾期未还"
Else
Set rs=executeQuery("select loannum from Borrowers where cardno="&Session("cardno"))
if rs("loannum")<maxLoanNumber then
executeUpdate("UPDATE Books SET [number]=[number]-1 WHERE bookno = " + Replace(Recordset1__MMColParam, "'", "''") + "")
executeUpdate("UPDATE Borrowers SET loannum=loannum+1 WHERE cardno="&Session("cardno"))
executeUpdate("INSERT INTO Loans (cardno,bookno,title,[date]) Values ("&Session("cardno")&","&Recordset1.Fields.Item("bookno").Value&",'"&Recordset1.Fields.Item("title").Value&"','"&now()&"')")
addLog"","","借书<<"&Recordset1.Fields.Item("title").Value&">>成功"
freshTo "成功借到书名为<<"&Recordset1.Fields.Item("title").Value&">>的图书!","Bookslist.asp"
else
addLog "","","借书<<"&Recordset1.Fields.Item("title").Value&">>失败,因为借书量超额"
freshTo "错误!你的借书总量已经达到最大数量("& maxLoanNumber &"本)!","Bookslist.asp"
end if
End If
else
addLog "","","借书<<
展开阅读全文