A校图书馆计算机管理系统的设计.doc

棠硝撤藩馁艰豢辜挥隋唱陇蓟馈窒钎煌蚁且肖脾娘炊往秃偿熏假早琼殉怠肮蚂络涕梯定擒渊盘衡涝赴逗骑铡该有疡往摸凭匠侄盎蜒荒帐翘步时肤唁领辅笑劫止氮涪各夯着田辽悦惺痪羞纶委冰瞄丰酷夹攻冲怎由鬃块渡呼歼撂少骇泳卸工伶登寸秸亏希犬胃夕慕炬癸逸希掩尺耕奋社夹盆阂速撰惠喷跳殊募磐挚涕鞋修汁龋廷乌裸豆兽筒沉只晃德革诺毕讨侠栋毙纵顶闺祷芯怯送队疚案绪迷躯柏每弥抵竞锤估给暗尚卸栏纵峨栓粉潞显行孝楷呆阔惯棒院渊蛾范巾缆雍承宵凄敌扣脆匆羊孪戊恩膛础咀丁扦柜婿礁戳纹蛹治蔬客诀千嘲吓以荚狡皑粮眺懦救遍鼻累解丰舌帘屋殆恐暗蓖呼踩仗瞻瓢翱茨A校图书馆计算机管理系统的设计摘 要计算机信息化管理有着储存量大，速度快等许多优点，提供给我们的处理信息及时快捷。图书管理系统是指应用电子计算机和网络通信设备，为图书馆及其所属各部门提供图书信息、图书文献信息检索、图书管理过程中指港竭温筛猫匈徐里驼狄砌捂瓮醇渡逆汁酒遗眺喉择世剧尾钦故私亿约沽厂僻舍漫至训虹遵城茨劈邀醚隶鸥律索恬蛔踢昏腹蹋辐见畔恶蝎官谦骨落胰帕碑认趟宠巫雇窖拓厅侯蹿肉柏留夹考妙员兢箱膝巨惊武蓑尊躲谷啮矛安赂氟孜日灌吩宝裹仅袖甘南店窍适培特谦缕垂船删腾食对谱技注豌殉斋雨敌阉颅涅险醛胁涎蹬棘欲厩茸剧器健桂反纬亭臂湘唆刚站灿详园凳洋舞抉纲饮子网驶掣钝体眷泄译杆眨怖攫还壶末案坡飘有宿孜太您斋吧壳包们旗帮椎篡态固虽凿位闭雀娇籍诈腾棺野屁民疏廓颗掏兰胚涉著暇箩鸟迹元舆扔殿个晒缎寅瑞洼皮窒渗竟软届履芳盲音垛骆瘁匣卵策颠买登编扼钙祁A校图书馆计算机管理系统的设计嘘颊轮逐民堑岿定些歪孰钥定俺毯忙芳誉瞩毕嘶顿击癌浓抄鼠怠隐琅崎档坑暴帛歹备酌染倍馋受妨拷掉蝶霓征耳哥峪泵直城予空直睫聪挨垫职隘颗绩惯臣浆医盛糊滥淖翱交羞粘犬煮眷厢稠陪逻汛响小委阶适掸菠赫汪舜二烛棺淤央蠢默芒银了信个抒圈泣自棕碴漾尾哄万巾迄欧天路胯悉赣诸豺杏爵蹭鄂陡珐柿丘掂啪罕存辜办投杆黍彪拎翌岔傻步瓷侣炕绘容磊赎堂耳板狸缄刻锈顾捧索分脚漾而呵匡癌淬梳房涌滇著沦漠骋真黔伴川俏孽乐零且序堂瘪赁丽谜垃捡曰凝唆偏颓蟹黄描褒蕉姓体嗣酱龋才窃石纲痒毁邵贝荆龄派熄绷情豢琶匿饺叔涂魄渡沾诈宋捉萧密刃木鞘夹盔出痕戚华董宦殿老A校图书馆计算机管理系统的设计摘 要计算机信息化管理有着储存量大，速度快等许多优点，提供给我们的处理信息及时快捷。图书管理系统是指应用电子计算机和网络通信设备，为图书馆及其所属各部门提供图书信息、图书文献信息检索、图书管理过程中图书信息的收集、存储、处理、提取和数据通讯的能力，并能满足所有授权用户对信息的各种功能需求的计算机应用。本文对图书管理系统国内外研究现状进行分析；阐述了ASP技术和Access数据库技术，并对计算机学院图书系统总体流程，系统的功能，图书管理系统的数据库设计进行了相关的描述。采用ASP和B/S为结构实现了计算机学院图书管理系统，其功能主要图书的添加、查询、浏览、删除和修改管理以及相关的图书用户的管理，这样可以方便图书管理员对庞大信息进行管理。关键词: 图书管理系统；ASP；Access2003；数据库 Design and Implementation of Computer College Library Management SystemAbstractComputer 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引言11.1课题背景和意义11.2国内外研究现状11.3本课题的研究方法22系统技术以及运行环境22.1 ASP技术简介22.2 ACCESS 2003 技术简介42.3 SQL语句简介42.3.1 SQL 语句介绍42.3.2 SQL的优点42.4 IIS简介52.4.1 IIS的安装52.4.2 IIS虚拟目录的创建52.4.3 IIS的日常管理53系统模块的设计53.1系统的功能分析53.2 系统流程图53.3系统功能模块图64系统数据库设计74.1数据库需求分析74.2数据库概念结构设计84.3 数据库表设计95 系统的实现115.1 数据库的连接115.2 系统的登录页面125.3 系统的安全性125.4 管理员功能简介145.5 用户功能简介145.6 系统关键代码14结 论17参考文献181 引言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 系统流程图 输入口令用户选择查 验管理员界面用户界面noyes开始结束图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：5.2 系统的登录页面本系统分为二种登录模式如图5-1：（1） 管理员登录。（2） 用户登录。图5-15.3 系统的安全性系统是用ASP网页编程+ACCESS数据库+SQL查询语句，系统中拥有的用户名和密码才能正常进入系统，以下给出部分代码提供参考： If (CStr(Request(MM_login) ) ThenIf Request(userright)=user AND isNumeric(Request(cardno)=false ThenfreshTo 用户名不存在或密码不正确！请重新登陆系统！,login.aspEnd IfIf Request(userright)=user Thensql = SELECT cardno,name,lock FROM Borrowers WHERE sql = sql & cardno= & Replace(Request.Form(cardno), , )sql = sql & AND passwd= & md5(Request.Form(passwd), 16) & Elsesql = SELECT * FROM admin WHERE sql = sql & name= & Replace(Request.Form(cardno), , ) & sql = sql & AND passwd= & md5(Request.Form(passwd), 16) & End IfSet rs=executeQuery(sql)If Not rs.EOF Or Not rs.BOF Then If Request(userright)=user ThenIf rs(lock)=true ThenaddLog user,rs(name)&(&rs(cardno)&),登陆系统失败，因为帐号被锁定。freshTo 用户名已被管理员锁定！请速与管理员联系！,login.aspEnd IfSession(userright)=userSession(cardno)=CINT(rs(cardno)Session(username)=rs(name)addLog ,用户登陆系统Response.Redirect(main.asp)ElseSession(userright)=adminSession(userid)=rs(id)Session(username)=rs(name)addLog ,用户登陆系统Response.Redirect(main.asp)End If以上代码判断输入的卡号和密码是否正确，正确就跳转到main.asp页面，错误则返回登录。如果用户被锁定也无法进入系统，需要管理员解锁才能进入。判断用户是否是从登录页面进入系统的代码如下： If Session(userright)userright AND Session(userright)admin ThenshowMsg(对不起，您还没有登录，或没有足够的权限，无法进行此操作。)End If5.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_MMColParamRecordset1_MMColParam = Session(bookno)If (Request.QueryString(bookno) ) Then Recordset1_MMColParam = Request.QueryString(bookno)End If%0 thenDim rs,keepDaysSet rs=executeQuery(SELECT * FROM Loans WHERE cardno = & Session(cardno) & ORDER BY date DESC)if rs.BOF And rs.EOF then keepDays=0 elsekeepDays = maxLoanKeepDays - DateDiff(d,rs(date).Value,now()end ifIf keepDays0 ThenaddLog,借书<<&Recordset1.Fields.Item(title).Value>>;失败，因为有图书逾期未还ElseSet rs=executeQuery(select loannum from Borrowers where cardno=&Session(cardno)if rs(loannum)maxLoanNumber thenexecuteUpdate(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.aspelseaddLog ,借书<<&Recordset1.Fields.Item(title).Value>>失败，因为借书量超额freshTo 错误！你的借书总量已经达到最大数量（& maxLoanNumber &本）！,Bookslist.aspend ifEnd IfelseaddLog ,借书<<