动态网页课程设计报告报告

1、.PAGE . 课程设计名称 图书管理系统 目 录 TOC o 2-3 h z t 标题 1,1 HYPERLINK l _Toc1068641531、引言 PAGEREF _Toc106864153 h 5HYPERLINK l _Toc1068641541.1项目开发背景 PAGEREF _Toc106864154 h 5HYPERLINK l _Toc1068641551.2 设计思想 PAGEREF _Toc106864155 h 5HYPERLINK l _Toc1068641612、系统分析 PAGEREF _Toc106864161 h 9HYPERLINK l _Toc1068

2、641622.1 项目背景 PAGEREF _Toc106864162 h 9HYPERLINK l _Toc1068641632.2 任务概述 PAGEREF _Toc106864163 h 9HYPERLINK l _Toc1068641642.3 数据描述 PAGEREF _Toc106864164 h 9HYPERLINK l _Toc1068641652.3.1 静态数据 PAGEREF _Toc106864165 h 9HYPERLINK l _Toc1068641662.3.2 数据字典 PAGEREF _Toc106864166 h 9HYPERLINK l _Toc10686

3、41673、系统设计 PAGEREF _Toc106864167 h 11HYPERLINK l _Toc1068641683.1系统功能描述 PAGEREF _Toc106864168 h 11HYPERLINK l _Toc1068641693.2 模块图 PAGEREF _Toc106864169 h 11HYPERLINK l _Toc1068641704、系统实施 PAGEREF _Toc106864170 h 12HYPERLINK l _Toc1068641714.1 查询 PAGEREF _Toc106864171 h 12HYPERLINK l _Toc106864172图书

4、信息查询 PAGEREF _Toc106864172 h 12HYPERLINK l _Toc1068641734.1.2 借阅信息查询 PAGEREF _Toc106864173 h 14HYPERLINK l _Toc1068641744.1.3 显示所有图书信息 PAGEREF _Toc106864174 h 15HYPERLINK l _Toc1068641754.2 管理员登录 PAGEREF _Toc106864175 h 15HYPERLINK l _Toc106864176功能 PAGEREF _Toc106864176 h 15HYPERLINK l _Toc10686417

5、74.2.2 程序构成及代码说明 PAGEREF _Toc106864177 h 16HYPERLINK l _Toc1068641784.3 图书借阅管理 PAGEREF _Toc106864178 h 16HYPERLINK l _Toc1068641794.3.1 图书借阅 PAGEREF _Toc106864179 h 16HYPERLINK l _Toc1068641804.3.2 图书归还 PAGEREF _Toc106864180 h 17HYPERLINK l _Toc1068641814.3.3 图书续借 PAGEREF _Toc106864181 h 18HYPERLINK

6、 l _Toc1068641824.4 会员管理 PAGEREF _Toc106864182 h 19HYPERLINK l _Toc1068641834.4.1 添加会员 PAGEREF _Toc106864183 h 19HYPERLINK l _Toc1068641844.4.2 删除会员 PAGEREF _Toc106864184 h 20HYPERLINK l _Toc1068641854.4.3 修改会员信息 PAGEREF _Toc106864185 h 20HYPERLINK l _Toc1068641864.5 图书信息管理 PAGEREF _Toc106864186 h 2

7、1HYPERLINK l _Toc1068641874.5.1 添加图书信息 PAGEREF _Toc106864187 h 21HYPERLINK l _Toc1068641884.5.2 删除图书信息 PAGEREF _Toc106864188 h 22HYPERLINK l _Toc1068641894.5.3 添加图书类别 PAGEREF _Toc106864189 h 22HYPERLINK l _Toc1068641904.5.4 删除图书类别 PAGEREF _Toc106864190 h 23HYPERLINK l _Toc106864195参考文献 PAGEREF _Toc1

8、06864195 h 27HYPERLINK l _Toc106864196附录：代码 PAGEREF _Toc106864196 h 28中文摘要摘要随着新世纪的到来,科学技术的突飞猛进,知识经济的日益发展,许多图书管理系统已经慢慢走向了老化。图书馆作为一种信息资源的集散地,图书和用户借阅资料繁多,包含很多的信息数据的管理,现今,有很多的图书馆都是初步开始使用,甚至尚未使用计算机进行信息管理。针对这种情况我个人制作了一个简单的图书管理系统网站。本网站使用Frontpage制作页面,用Asp语言做连接数据库的程序,使用Access制作系统的数据库,做出了这个具有图书查询、图书借阅、归还、续借、

9、会员管理以及图书信息管理等功能的小型的网站。我在文章中论述了整个网站的开发过程,网站的结构及网站开发的基本原理和方法。本文详细阐述了系统功能、需求分析、概要设计、详细设计、系统实现以及系统维护等软件开发过程。我力求将所学到的知识在网站开发中得以全面的应用,并使网站在实际的操作中能按照设计的要求安全有效正确的运行。 本网站界面友好,操作简单,比较实用。关键字：access ASP frontpage 脚本语言 AbstractAlong with the new century arrival,science and technology progressing by leaps and bou

10、nds, knowledge economy flourishing more and more daily, many books management system already slowly moved towards the aging. The library took one kind of information resource the collection and distribution center, the books and the user borrow the material to be many, contains the very many informa

11、tion data the management, nowadays, has very many libraries all is initially starts to use, even not yet uses the computer to carry on the information management. By this condition I made this simple library manage system station.Theweb station is using Frontpage made the web page, using the languag

12、e of Active Server Page linked the database, and using Access as the background database, made this mini web station which has the function of book search book borrow ,book back ,book reborrow ,reader manage book message manage and so on .In terms of the web station as background, I discussed the wh

13、ole developing process of developing web station、the structure of web station and the basic principle and method . This article particularly discussed the developing process of system analyse、demand analyse、summary analyse、particular analyse、system implemt and system maintenance . I try hard to appl

14、y mastered knowledge in the web developing , make web station safely correcticty running in the practicely operating . This web station has frindly interface. It is easy to operate. And has good practicability. Key word: access ASP frontpage script 1、引言1.1项目开发背景 近年来,随着计算机技术的发展和互联网时代的到来,我们已经进入了信息时代,也

15、有人称为数字化时代,在这数字化的时代里,图书事业的发展就成为精神文明进步的一个动力。在迈入二十一世纪的今天,对图书馆的管理显得极其重要,合理地管理不但反映一个国家的科技水平,而且影响人们对知识掌握的速度和质量。在知识经济时代到来的今天,用计算机控制图书馆的工作由自动化系统运行而完成。这不仅节省了人力,还提高了工作效率和服务质量,而且还加速了图书的流通。计算机技术是现代技术的一部分,图书自动化也只是图书馆现代化的一部分,它们之间是部分和整体的关系,但由于计算机技术是信息技术的心脏,现代社会的骄子,信息社会的科技主角,所以在图书馆现代技术中,计算机技术处于核心地位,它对于其他现代化设备起控制,连接

16、和转换的作用,而图书馆自动化是图书馆现代化的核心和主导部分。图书的计算机管理系统能提高图书馆本身管理水平,能代替工作人员进行图书资料的某些加工处理,把工作人员从繁重的手工劳动,重复劳动中解放出来。总之,建立图书馆的计算机自动化管理系统,不但可以大大提高图书馆图书流通率,而且推动了社会文化生活的进步。1.2 设计思想通过建立图书馆的计算机自动化管理系统,提高图书馆本身管理水平,能代替工作人员进行图书资料的某些加工处理,提高工作效率。2、系统分析2.1 项目背景该网站是一个实用性网站,能提高图书馆本身管理水平,能代替工作人员进行图书资料的某些加工处理,把工作人员从繁重的手工劳动,重复劳动中解放出来

17、。2.2 任务概述图书管理系统实现以下功能：1图书查询2图书借阅管理3会员管理4图书管理5显示所有图书信息2.3 数据描述2.3.1 静态数据 本设计采用access数据库建表,数据库为2flybook.mdb,共有五个表,说明如下：表2.1表名说明book存放图书信息booktype存放图书类型信息borrow存放借阅信息manager存放管理员信息reader存放会员信息2.3.2 数据字典book： 表2.2字段名数据类型说明id自动编号图书序号bookno文本图书编号bookname文本图书名字booktype文本图书类型author文本图书作者publishing文本图书出版社boo

18、kmoney数字图书价格booktxt备注备注booknum数字图书数量2booktype： 表2.3字段名数据类型说明bookid自动编号图书类型序号type文本图书类型 borrow： 表2.4字段名数据类型说明borrowid自动编号借阅编号bookno文本图书编号readerid文本会员编号borrowdate日期/时间借书日期manager文本管理员姓名4manager： 表2.5字段名数据类型说明id自动编号管理员序号name文本管理员姓名 pw文本管理员登陆密码5reader： 表2.6字段名数据类型说明id自动编号会员序号readerid文本会员编号 readername文本会

19、员姓名 rtel文本会员电话 raddress文本会员地址 rtxt备注会员备注3、系统设计3.1系统功能描述本网站功能主要有：图书查询:根据关键字查询在库图书图书借阅管理：管理员可进行图书借阅、归还以及续借操作,并可查询已借出的书籍及借书人的信息会员管理：管理员可对会员进行添加、修改、删除的操作图书管理：管理员可对图书信息进行添加、删除,也可对图书类别进行添加和删除显示所有图书信息：用户跟管理员都可对所有图书信息进行查阅3.2 模块图主页面主页面查询登录图书信息查询借阅信息查询显示所有图书信息图 书借 阅管 理会员管理图书信息管理图书借阅图书归还图书续借添加会员删除会员修改会员添加图书删除图

20、书添加图书类别删除图书类别选择操作一般用户 管理员图3.14、 系统实施本网站共分查询、管理员登陆、图书借阅管理、会员管理、图书信息管理书几大模块,其主界面为：图4.1具体功能及其它连接页面如下：4.1 查询4.1.1图书信息查询图4.21.功能任何人员都可对图书进行查询,可按图书编号、按书籍名、按分类、按出版社、按作者进行准确查询或模糊查询,通过查询可了解图书的基本信息,若会员对这本书感兴趣就可以到图书管理员那里办理借阅。2.程序构成及代码说明实现思想：查询时,查询人员可以不输入任何信息进行不限制查询,但要判断查询者是否输入错误信息,要是数据库中没有相符纪录,就输出没有您要查询的图书,有就从

21、相关位置输出信息。设计思想：查询由两个程序实现,select.asp,select_book.asp。select-book.asp为用户输入页面,其中用到了一个表单,文本框用来接受用户输入的书的编号、书名、书类、出版社、作者,根据选择情况赋给变量SQL查询条件。两个按钮用来确定查询和重新输入,属性分别为submit和reset处理此表单的action为select1.asp。select.asp是通过表单调用的页面,首先用request对象获取表单中的编号信息,然后连接数据库。在使用ADO Connection对象之前,使用Server.CreateObject方法创建该对象的实例。在ASP

22、中访问Access数据库时,在连接字符串中包含DRIVER和DBQ两个参数,分别指定所用的数据库驱动程序和要连接的Access数据库文件的路径：Set conn = Server.CreateObjectconn.Open driver=Microsoft Access Driver ;dbq=&Server.MapPath创建记录集时,通过调用Connectiond对象的Execute方法,以SQL命令从2flybook数据库中的book表中检索图书信息并返回一个记录集,用Recordset对象变量来访问该记录集内的数据：Set rs = Server.CreateObjectsql = s

23、elect * from book Set rs=conn.Execute在数据集不为空的情况下,将数据集中的记录按页数逐条显示出来。例如我们根据图书编号进行查询, 数据库中有图书信息表book,首先用request对象获取表单中的编号信息,然后连接数据库,再次以取得的编号信息进行查询,语句为sql=select * from book where& &sql,要是查到相符纪录,就把它输出到页面中的相关位置。其他的查询实现与此类似,简单说明如下：例如按书名查询：语句为 bookno=trimrequest,然后连接数据库,再次以取得的编号信息进行查询,语句为 sql=select * from

24、 book where& &sql,要是查到相符纪录,就把它输出到页面中的相关位置。输出语句为%=rs%。其他的查询实现与此类似。4.1.2 借阅信息查询图4.31.功能任何人都可对图书借阅信息进行查询,查询者输入会员编号,点提交就能显示该会员所有借阅信息。2.程序构成及代码说明实现思想：查询者输入会员号,点提交查询borrow表中对应的会员号的信息。1提取表单中输入的会员号2连接数据库同上3赋值SQL语句 sql=select * from borrow,book where readerid=& bookbh & and borrow.bookno=book.bookno4执行查询把结果赋

25、给rs结果集。5利用表格把rs结果集显示出来,实现查询。4.1.3 显示所有图书信息图4.41.功能任何人都可使用该功能,一点该连接就会显示所有图书信息。2.程序构成及代码说明实现思想：同借阅信息查询,只是不同的是查询book表中的信息。4.2 管理员登录图功能当管理员进行图书借阅管理和会员管理以及图书管理时,要先进行登录操作,管理员输入姓名和密码,点登录就可进入管理员界面,便可进行各项操作了。4.2.2 程序构成及代码说明实现思想：登陆由两个程序实现,login.htm,login.asp。login.htm为用户输入页面,其中用到了一个表单,文本框用来接受用户输入的管理员姓名及密码,连接数

26、据库同上,赋值语句：sql=select * from manager where name=& name & and pw= & passwor &然后执行查询把结果赋给rs结果集。要是输入为空,就直接输出用户名或密码不能为空 response.write & chr & alert; & history.back & ,然后要是存在相符纪录则保留用户名session=name,再转到选择操作页面Response.Redirect index1.htm。否则输出登陆失败信息：response.write & chr & alert; & history.back & 。登录成功后,进入ind

27、ex1.asp页面,管理员便可进行各项操作了。4.3 图书借阅管理4.3.1 图书借阅图4.61.功能管理员点图书借阅管理,进入会员借书界面,输入会员编号和图书编号,管理员姓名将在文本框中自动显示,点击提交,将会显示借书成功,并显示图书编号、书籍名称、书籍分类、借阅者、价格、操作员等信息。2.程序构成及代码说明 实现思想：借阅图书的实现,本模块由两个程序构成,borrow_in.asp是前台程序,borrowed.asp 是后台处理程序,borrow_in.asp要求用户输入书号和会员号,它的后台处理action是borrowed.asp,borrowed.asp取得书号和会员号后,先判断是否

28、还有可以借的书连接数据库以输入书号为查询条件查询表book中的该书的number是否大于1,要是有的话就在borrowed.asp中显示书号、书名、会员号、会员名,以供确认。会员号和会员名是以输入的会员号为查询条件从表reader中查出并显示在页面上,书号和书名是以输入的书号为查询条件从表book中查出并显示,经手人是从登录页面中取得的session在这个页面显示没有的话就显示出错信息：库存不够后台处理程序 也在borrowed.asp,borrowed.asp用来修改表book的这本书的number值将number值减1,然后添加图书借阅信息到表borrow中,添加书号、会员号、借书日期、经

29、手人,借书日期是取得系统日期添到表borrow中,最后在页面输出借阅成功并以表格的形式显示书名、借阅人、作者、出版社、价格、经手人。书名、作者、价格、出版社、借阅人、经手人是以session形式保存在上一页面中,在这个页面中使用.4.3.2 图书归还图4.71.功能管理员点图书还书管理,进入会员还书界面,输入书籍编号,点提交显示会员还书页面,显示该书籍编号对应的几个借阅者编号,由管理员进行选择要还书的借阅者编号,点提交,显示借书信息,如会员编号、会员名称、书籍编号、书籍名称以及借书时间,点击还书,显示还书成功的页面,并显示图书编号、书籍名称、书籍分类、还书者、操作员。2.程序构成及代码说明实现

30、思想：本模块由四个程序构成return_in.asp,return_select.asp,return1.asp,return2.asp,return_in.asp要求用户输入书号,它的后台处理action是return_select.asp ,return_select.asp取得书号后,先判断有没有该书借出记录,有的话就从数据库的borrow 表里找出该书号和借阅该书号bookbh的会员编号readerid并显示出来,点击提交后其action为return1.asp,在return1.asp页面中显示借书信息,先从borrow表中取得该书号,以及与该书号对应的会员编号并赋给变量rid,分别

31、从后台数据库的reader和book表中取得readerid=& rid &的会员编号以及对应的会员名和bookno=& bno &的图书编号以及对应的图书名,并从borrow表里取得该书号和会员号所对应的借书时间,将以上内容显示出来,点击还书,其action为return2.asp,显示还书成功,并显示对应的并显示图书编号、书籍名称、书籍分类、还书者、操作员。后台数据库的操作为从后台数据库的book表中取得bookno=& bookbh &的图书编号对应的书的数量并加1。4.3.3 图书续借图4.81.功能管理员点图书续借管理,进入图书续借界面,输入书籍编号,点提交显示图书续借页面,显示该书

32、籍编号对应的几个借阅者编号,由管理员进行选择要续借的借阅者编号,点提交,显示借书信息,如会员编号、会员名称、书籍编号、书籍名称以及借书时间,点击续借,显示续借成功的页面,并显示图书编号、借阅者、续借日期、操作员。2. 程序构成及代码说明实现思想：本模块由四个程序构成rborrow_in.asp,return_select1.asp,reborrow1.asp,reborrow2.asp,rborrow_in.asp要求用户输入书号,它的后台处理action是return_select1.asp ,return_select1.asp取得书号后,先判断有没有该书借出记录,有的话就从数据库的bor

33、row 表里找出该书号和借阅该书号bookbh的会员编号readerid并显示出来,点击提交后其action为rborrow1.asp,在rborrow1.asp页面中显示借书信息,先从borrow表中取得该书号,以及与该书号对应的会员编号并赋给变量rid,分别从后台数据库的reader和book表中取得readerid=& rid &的会员编号以及对应的会员名和bookno=& bno &的图书编号以及对应的图书名,并从borrow表里取得该书号和会员号所对应的借书时间,将以上内容显示出来,点击续借,其action为rborrow2.asp,显示续借成功,并显示对应的并显示图书编号、借阅者编

34、号、续借日期、操作员。后台数据库的操作为从系统的日期中取得date令rs=date,然后从库中取出相应的各项信息显示出来。4.4 会员管理4.4.1 添加会员图4.91.功能 管理员点击会员添加,显示会员信息添加页面,要添加会员编号、会员名字、会员电话、会员地址、备注信息,点提交,显示添加成功页面,显示读者编号、读者名称、电话号码、读者地址、备注、操作员。2.程序构成及代码说明实现思想：本模块由两个程序构成addreader.asp和add_reader.asp,addreader.asp输入会员信息,表单的action为add_reader.asp,从addreader.asp中获取表单信息

35、并写入数据库的reader表中,语句为：rs.addnewrs=nors=namers=telrs=addrs=txtrs.update然后显示出来。4.4.2 删除会员图4.101.功能管理员点删除会员,进入删除会员界面,输入会员编号点击提交,显示该会员信息然后进行信息删除,显示更新成功。2.程序构成及代码说明实现思想：本模块由两个程序构成deleter.asp和delete_reader.asp, deleter.asp中输入会员编号,action为delete_reader.asp,在数据库中删除该会员,语句为sql=delete * from reader where readerid

36、=& rno &,然后显示删除成功。4.4.3 修改会员信息图4.111.功能管理员点修改会员,进入修改会员界面,输入会员编号点击提交,显示该会员信息然后进行信息修改,点击更新,显示更新成功,并显示更新后的会员信息。2.程序构成及代码说明实现思想：本模块由三个程序构成updater.asp, updater1.asp,updater2.asp。updater.asp中输入会员编号,action为updater1.asp,从数据库中获取会员已有信息赋给变量rs,并显示出来,修改信息后表单action为updater2.asp,从数据库中修改信息,语句为rs=namers=telrs=addrs=

37、txtrs.update然后显示更新成功,并显示修改后信息。4.5 图书信息管理4.5.1 添加图书信息图4.121.功能管理员点击图书添加,显示图书信息添加页面,要添加图书编号、图书类型、书价、出版社、书名、作者名、书籍数量,备注信息。点击提交显示添加成功。2.程序构成及代码说明实现思想：同添加会员信息。4.5.2 删除图书信息图4.131.功能管理员点击图书删除,显示图书信息删除页面,输入图书编号点击删除,显示删除成功。2.程序构成及代码说明实现思想：同删除会员信息。4.5.3 添加图书类别图4.141.功能管理员点击图书类别添加,显示图书类别添加页面,输入添加类别点击提交,显示添加类别成

38、功。2.程序构成及代码说明实现思想：同添加会员信息。4.5.4 删除图书类别图4.151.功能管理员点击图书类别删除,显示图书类别删除页面,选择图书类别点击提交,显示删除成功。2.程序构成及代码说明实现思想：同删除会员信息。参考文献1 扬皓等编著.ASP步步高M.第一版.北京：机械工业出版社.20XX11月版.272页2 廖彬山,高峰霞等编著.ASP动态网站开发教程M.第一版.北京：清华大学出版社. 20XX11月版.272页3 肖金秀,冯沃辉,施鸿翔,香文斌等编著. ASP3.0动态网页培训教程M.第一版.北京：冶金工业出版社.20XX8月版。356页4 张登辉,刘益红编著.ASP编程基础及

39、应用M.第一版.北京：机械工业出版社.20XX8月版.297页5 丁贵广,闫允一,孟繁杰编著.ASP及ASPNET编程基础与实例M.第二版.北京：机械工业出版社.20XX1月版.289页6 刘小东编著.Dreamweaver MX实用教程入门与提高M.第一版.北京：中国铁道出版社.20XX5月版.388页附录：代码读者信息模块代码如下：%if Request=empty then response.write 读者证条码号不应该为空！ response.endelse ReaderID=requestend ifif Request=empty then response.write 读者姓名

40、不应该为空！ response.endelse ReaderName=requestend ifReaderTel=trimRequestif Request=请选择 then response.write 读者证件类型没有选择！ response.endelse ReaderCerti=requestend ifif Request=empty then response.write 读者证件号码不应该为空！ response.endelse ReaderCertiNum=requestend ifif Request=请选择 then response.write 读者类型您没有选择！ r

41、esponse.endelse ReaderClassID=requestend ifReaderDis=request查询读者证设定年限Set RS=Server.CreateObject sql=select * from readerclass where ReaderClassID= & ReaderClassID & RS.Open sql,DBConnection,3ReaderYear=RSReaderCardDate=daters.closeReaderCarDue=dateaddAdminName=Sessionresponse.write readerID & & read

42、erID & & ReaderName & & ReaderTel & & readerID & & readerID & & readerID & & readerID & & readerID & & response.write Readerdepositresponse.endSet RS=Server.CreateObject sql=select * from readercard where ReaderID= & ReaderID & or ReaderCertiNum= & ReaderCertiNum & RS.Open sql,DBConnection,3 if not

43、RS.Eof then response.write 您输入的读者证号或证件号码已经存在,您以前办过读者证！ response.endelse Set CmdObj = Server.CreateObject Set CmdObj.ActiveConnection = DBConnection SQL_Command=Insert into readercard values CmdObj.CommandText = SQL_Command CmdObj.Executeend ifSet RS = Nothing 重设RS物件 set DBConnection=Nothing Response

44、.Redirect dzbz.asp%读者信息添加：function re_load location.reload; .x:link COLOR: white; TEXT-DECORATION: none.x:visited COLOR: white; TEXT-DECORATION: none.x:active COLOR: red; TEXT-DECORATION: none.x:hover COLOR: redTR FONT-SIZE: 10ptTD FONT-SIZE: 10ptBODY FONT-SIZE: 10ptA:link COLOR: black; TEXT-DECORAT

45、ION: underlineA:visited COLOR: black; TEXT-DECORATION: underlineA:active COLOR:black; TEXT-DECORATION: underlineA:hover COLOR:black; TEXT-DECORATION: underlineA:hover color: #FF0000; text-decoration: none; font-size: 10pt %set rs=server.CreateObjectrs.open Select * From readerclass order by ReaderCl

46、assID desc,dbconnection,1,1% 添加办证读者 读者证条码号: 读者姓名： 联系电话： 证件类型： 请选择 身份证 军官证 驾驶证 其他有效证件 证件号码： 读者类型： 请选择 % RS.movefirst while not rs.eof response.write option value= & RS& & RS & rs.movenext wend rs.close % 读者备注： %set rs=server.CreateObjectrs.open Select top 1 * From readercard order by ReaderID desc,db

47、connection,1,1if rs.eof then response.write 暂无读者办证记录else ReaderID=RS ReaderClassID=RS ReaderName=RS ReaderTel=RS ReaderCerti=RS ReaderCertiNum=RS ReaderDis=RS ReaderState=RS ReaderCardDate=RS ReaderCarDue=RS rs.close set rs=server.CreateObject rs.open Select ReaderClassName From readerclass where Re

48、aderClassID= & ReaderClassID ,dbconnection,1,1 ReaderClassName=RS% 最新读者办证记录 读者证条码号: 读者类型： 读者姓名： 联系电话： 证件类型： 证件号码： 读者信息修改：function re_load location.reload; .x:link COLOR: white; TEXT-DECORATION: none.x:visited COLOR: white; TEXT-DECORATION: none.x:active COLOR: red; TEXT-DECORATION: none.x:hover COLO

49、R: redTR FONT-SIZE: 10ptTD FONT-SIZE: 10ptBODY FONT-SIZE: 10ptA:link COLOR: black; TEXT-DECORATION: underlineA:visited COLOR: black; TEXT-DECORATION: underlineA:active COLOR:black; TEXT-DECORATION: underlineA:hover COLOR:black; TEXT-DECORATION: underlineA:hover color: #FF0000; text-decoration: none;

50、 font-size: 10pt %CheckWay=requestReaderID=trimRequestif ReaderID=empty then response.write 查询条件有问题！ response.endend ifset rs=server.CreateObjectif CheckWay=请选择 then response.write 请选择查询类型 response.endelseif CheckWay=读者证号 then rs.open Select * From readercard where ReaderID= & ReaderID,dbconnection,

51、1,1else rs.open Select * From readercard where ReaderCertiNum= & ReaderID & ,dbconnection,1,1end if If rs.eof then response.write 查无此读者！ respone.endend ifReaderIndexID=RSReaderID=RSReaderClassID=RSReaderName=RSReaderTel=RSReaderCerti=RSReaderCertiNum=RSReaderDis=RSReaderState=RSReaderCardDate=RSRead

52、erCarDue=RSrs.closeresponse.write ReaderStateresponse.endSet RS=Server.CreateObject sql=select * from readerclass where ReaderClassID= & ReaderClassID & RS.Open sql,DBConnection,3ReaderClassName=rsrs.close% 办证读者信息修改 读者证索引号： input type=text name=ReaderIndexID size=33 readonly Value= 读者证条码号: input typ

53、e=text name=ReaderID size=33 Value= 读者姓名： input type=text name=ReaderName size=33 Value= 联系电话： input type=text name=ReaderTel size=33 Value= 证件类型： 请选择 身份证 军官证 驾驶证 其他有效证件 证件号码： input type=text name=ReaderCertiNum size=33 Value= 读者类型： % response.write & ReaderClassName & % 请选择 % set rs=server.CreateOb

54、ject rs.open Select * From readerclass order by ReaderClassID desc,dbconnection,1,1 RS.movefirst while not rs.eof response.write & RS & rs.movenext wend rs.close % 办证时间： input type=text name=ReaderCardDate size=33 Value= 证逾期时间： input type=text name=ReaderCarDue size=33 Value= 读者证状态： % if ReaderState

55、=0 then response.write 正常状态 elseif ReaderState=1 then response.write 退证状态 elseif ReaderState=2 then response.write 挂失状态 elseif ReaderState=3 then response.write 停用状态 end if % 请选择 正常状态 退证状态 挂失状态 停用状态 读者备注： %set rs=server.CreateObjectrs.open Select top 1 * From readercard order by ReaderID desc,dbconn

56、ection,1,1if rs.eof then response.write 暂无读者办证记录else ReaderID=RS ReaderClassID=RS ReaderName=RS ReaderTel=RS ReaderCerti=RS ReaderCertiNum=RS ReaderDis=RS ReaderState=RS ReaderCardDate=RS ReaderCarDue=RS rs.close set rs=server.CreateObject rs.open Select ReaderClassName From readerclass where Reader

57、ClassID= & ReaderClassID ,dbconnection,1,1 ReaderClassName=RS% 最新读者办证记录 读者证条码号: 读者类型： 读者姓名： 联系电话： 证件类型： 证件号码： 读者借阅管理：function re_load location.reload; .x:link COLOR: white; TEXT-DECORATION: none.x:visited COLOR: white; TEXT-DECORATION: none.x:active COLOR: red; TEXT-DECORATION: none.x:hover COLOR: r

58、edTR FONT-SIZE: 10ptTD FONT-SIZE: 10ptBODY FONT-SIZE: 10ptA:link COLOR: black; TEXT-DECORATION: underlineA:visited COLOR: black; TEXT-DECORATION: underlineA:active COLOR:black; TEXT-DECORATION: underlineA:hover COLOR:black; TEXT-DECORATION: underlineA:hover color: #FF0000; text-decoration: none; fon

59、t-size: 10pt%if Request=请选择- then response.write 您还没有选择读者证操作方式！ response.endelseif Request=读者续证 then ReaderID=request查询读者证设定年限 Set RS=Server.CreateObject sql=select ReaderID,readercard.ReaderClassID,ReaderCardDate,ReaderCarDue,ReaderDocumentDate,ReaderName from readercard,readerclass where ReaderID=

60、 & ReaderID & and readercard.ReaderClassID=readerclass.ReaderClassID RS.Open sql,DBConnection,3 ReaderCardDate=RS ReaderYear=RS ReaderName=RS rs.close ReaderCarDue=dateadd response.write ReaderClassName & & ReaderBookLimit & & ReaderBookDate Set CmdObj = Server.CreateObject Set CmdObj.ActiveConnecti