圖書(shū)館管理系統(tǒng)資料資料

1、閩江學(xué)院課程設(shè)計(jì)說(shuō)明書(shū)題目：圖書(shū)館管理系統(tǒng)院系：專業(yè)班級(jí):學(xué)號(hào)：學(xué)生姓名:指導(dǎo)教師:2008年12月29日目錄緒論 1b5E2RGbCAP開(kāi)發(fā)背景2p1EanqFDPw開(kāi)發(fā)工具地選用及介紹 2DXDiTa9E3dASP 簡(jiǎn)介2RTCrpUDGiTDreamweaver 簡(jiǎn)介25PCzVD7HxAMicrosoft SQL Server 2000 簡(jiǎn)介3jLBHrnAILg需求分析3xHAQX74J0X系統(tǒng)分析3LDAYtRyKfE系統(tǒng)目標(biāo)4Zzz6ZB2Ltk總體需求4dvzfvkwMI1系統(tǒng)模塊流程圖6rqyn14ZNXI系統(tǒng)登陸流程圖 6EmxvxOtOco用戶流程圖6SixE2yXPq5

2、管理員流程圖 66ewMyirQFL數(shù)據(jù)庫(kù)設(shè)計(jì)7kavU42VRUs概念結(jié)構(gòu)設(shè)計(jì)7y6v3ALoS89邏輯結(jié)構(gòu)設(shè)計(jì)8M2ub6vSTnP創(chuàng)建表地腳本文件90YujCfmUCw詳細(xì)設(shè)計(jì)11eUts8ZQVRd用戶登陸頁(yè)面11sQsAEJkW5T圖書(shū)查詢頁(yè)面12GMsIasNXkA統(tǒng)計(jì)超期15TIrRGchYzg數(shù)據(jù)庫(kù)備份和還原167EqZcWLZNX圖書(shū)添加17lzq7IGf02E用戶管理18zvpgeqJ1hk最新添加地圖書(shū)20NrpoJac3v1圖書(shū)分類瀏覽211nowfTG4KI給超期用戶發(fā)消息提醒22fjnFLDa5Zo課程設(shè)計(jì)小結(jié)23tfnNhnE6e5參考文獻(xiàn)23HbmVN777sL

3、緒論當(dāng)今時(shí)代是飛速發(fā)展地信息時(shí)代. 在各行各業(yè)中離不開(kāi)信息處理, 計(jì)算機(jī)被廣泛應(yīng)用于 B/S 系統(tǒng)環(huán)境 . 計(jì)算機(jī)地好處在于它能夠進(jìn)行信息管理. 使用計(jì)算機(jī)進(jìn)行信息控制 , 不僅提高了工作效率, 而且大大地提高了安全性. V7l4jRB8Hs對(duì)于復(fù)雜地信息管理, 計(jì)算機(jī)能夠充分發(fā)揮它地優(yōu)越性 . 計(jì)算機(jī)與信息管理系統(tǒng)地開(kāi)發(fā)密切相關(guān), 系統(tǒng)地開(kāi)發(fā)是系統(tǒng)管理地前提. 本系統(tǒng)就是為了管理好圖書(shū)信息而設(shè)計(jì)地. 83lcPA59W9開(kāi)發(fā)背景圖書(shū)管理包括地圖書(shū)和用戶借閱資料繁多 , 包含很多地信息數(shù)據(jù)地管理, 現(xiàn)今 , 有很多地圖書(shū)管理系統(tǒng)都是初步開(kāi)始使用 , 甚至尚未使用計(jì)算機(jī)進(jìn)行信息管理 . 以前對(duì)信

4、息管理地主要方式是基于文本、表格等紙介質(zhì)地手工處理, 對(duì)于圖書(shū)借閱情況如借書(shū)天數(shù)、超過(guò)限定借書(shū)時(shí)間地天數(shù)）地統(tǒng)計(jì)和核實(shí)等往往采用對(duì)借書(shū)卡地人工檢查進(jìn)行, 對(duì)借閱者地借閱權(quán)限、以及借閱天數(shù)等用人工計(jì)算、手抄進(jìn)行 . 數(shù)據(jù)信息處理工作量大, 容易出錯(cuò)；由于數(shù)據(jù)繁多 , 容易丟失 , 且不易查找 . 總地來(lái)說(shuō) , 缺乏系統(tǒng) , 規(guī)范地信息管理手段. 盡管有地圖書(shū)館有計(jì)算機(jī), 但是尚未用于信息管理, 沒(méi)有發(fā)揮它地效力 , 資源閑置比較突出 , 這就是圖書(shū)管理系統(tǒng)開(kāi)發(fā)所要解決地問(wèn)題 . mZkklkzaaP基于這此問(wèn)題 , 有必要建立一個(gè)圖書(shū)管理系統(tǒng) , 使圖書(shū)管理工作規(guī)范化 , 系統(tǒng)化,程序化 , 避

5、免圖書(shū)管理地隨意性 , 提高信息處理地速度和準(zhǔn)確性, 能夠及時(shí)、準(zhǔn)確、有效地進(jìn)行查詢和修改圖書(shū)情況等圖書(shū)管理操作. AVktR43bpw開(kāi)發(fā)工具地選用及介紹ASP 簡(jiǎn)介Active Server Pages ：是一套微軟開(kāi)發(fā)地服務(wù)器端腳本環(huán)境,ASP 內(nèi)含于IIS之中,通過(guò)ASP我們可以結(jié)合HTML網(wǎng)頁(yè)、ASP指令和ActiveX元件建立 動(dòng)態(tài)、交互且高效地 WEES艮務(wù)器應(yīng)用程序.有了 ASP你就不必?fù)?dān)心客戶地瀏覽器 是否能運(yùn)行你所編寫(xiě)地代碼, 因?yàn)樗械爻绦蚨紝⒃诜?wù)器端執(zhí)行, 包括所有嵌在普通 HTML 中地腳本程序. 當(dāng)程序執(zhí)行完畢后 , 服務(wù)器僅將執(zhí)行地結(jié)果返回給客戶瀏覽 器 , 這

6、樣也就減輕了客戶端瀏覽器地負(fù)擔(dān) , 大大提高了交互地速度 . ORjEnOwcEdDreamweaver 簡(jiǎn)介Dreamweaver 是 Macromedia 公司最新推出地主頁(yè)編輯工具. 這是一個(gè)所見(jiàn)即所得主頁(yè)編輯器, 并帶有站點(diǎn)管理功能 , 讓你方便地設(shè)計(jì)和管理多個(gè)站點(diǎn) . 而它最棒地地方就是支持最新地 DHTMIf口 CSSfe準(zhǔn)，你可以用它設(shè)計(jì)出生動(dòng)地 DHTML動(dòng)畫(huà)、多層次地頁(yè)面（layer以及CSS羊式表.2MjTy0dTTMicrosoft SQL Server 2000 簡(jiǎn)介SQL是英文Structured Query Language ）地縮寫(xiě),意思為結(jié)構(gòu)化查詢語(yǔ) 言 .SQ

7、L 語(yǔ)言地主要功能就是同各種數(shù)據(jù)庫(kù)建立聯(lián)系 , 進(jìn)行溝通 .SQL 被作為關(guān)系 型數(shù)據(jù)庫(kù)管理系統(tǒng)地標(biāo)準(zhǔn)語(yǔ)言 .SQL 語(yǔ)句可以用來(lái)執(zhí)行各種各樣地操作, 例如更新數(shù)據(jù)庫(kù)中地?cái)?shù)據(jù), 從數(shù)據(jù)庫(kù)中提取數(shù)據(jù)等. 目前 , 絕大多數(shù)流行地關(guān)系型數(shù)據(jù)庫(kù)管理系統(tǒng) , 如 Oracle, Sybase, Microsoft SQL Server, Access 等都采用了 SQL語(yǔ)言標(biāo)準(zhǔn).gliSpiue7ASQL語(yǔ)言有以下幾個(gè)優(yōu)點(diǎn)：1非過(guò)程化語(yǔ)言SQL 是一個(gè)非過(guò)程化地語(yǔ)言 , 因?yàn)樗淮翁幚硪粋€(gè)記錄 , 對(duì)數(shù)據(jù)提供自動(dòng)導(dǎo)航 .SQL 允許用戶在高層地?cái)?shù)據(jù)結(jié)構(gòu)上工作, 而不對(duì)單個(gè)記錄進(jìn)行操作, 可操作記錄集，

8、所有SQL語(yǔ)句接受集合作為輸入，返回集合彳為輸出.SQL地集合特性允許一條SQL何地結(jié)果彳為另一條 SQL何地輸入.uEh0U1YfmhSQL 不要求用戶指定對(duì)數(shù)據(jù)地存放方法, 這種特性使用戶更易集中精力于要得到地結(jié)果；所有 SQL語(yǔ)句使用查詢優(yōu)化器，它是RDBMSS一部分，由它決定 對(duì)指定數(shù)據(jù)存取地最快速度地手段, 查詢優(yōu)化器知道存在什么索引 , 在哪兒使用索引合適 , 而用戶則從不需要知道表是否有索引、有什么類型地索引 . IAg9qLsgBX統(tǒng)一地語(yǔ)言SQL可用于所有用戶地DB活動(dòng)模型，包括系統(tǒng)管理員、數(shù)據(jù)庫(kù)管理員、 應(yīng) 用程序員、決策支持系統(tǒng)人員及許多其它類型地終端用戶.基本地SQL命

9、令只需很少時(shí)間就能學(xué)會(huì) , 最高級(jí)地命令在幾天內(nèi)便可掌握. WwghWvVhPE所有關(guān)系數(shù)據(jù)庫(kù)地公共語(yǔ)言由于所有主要地關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)都支持 SQL語(yǔ)言，用戶可將使用SQU4 技能從一個(gè)RDBMS（系數(shù)據(jù)庫(kù)管理系統(tǒng) 轉(zhuǎn)到另一個(gè)，所有用SQL編寫(xiě)地程序都 是可以移植地. asfpsfpi4k2 需求分析系統(tǒng)分析圖書(shū)管理系統(tǒng)是典型地信息管理系統(tǒng) , 其開(kāi)發(fā)主要包括后臺(tái)數(shù)據(jù)庫(kù)地建立和維護(hù)以及前端應(yīng)用程序地開(kāi)發(fā)兩個(gè)方面. 對(duì)于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好地?cái)?shù)據(jù)庫(kù). 而對(duì)于后者則要求應(yīng)用程序功能完備, 易使用等特點(diǎn) . ooeyYZTjj1在數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)開(kāi)發(fā)之前 , 對(duì)開(kāi)發(fā)數(shù)據(jù)庫(kù)

10、地基本概念, 數(shù)據(jù)庫(kù)地結(jié)構(gòu)、開(kāi)發(fā)數(shù)據(jù)庫(kù)應(yīng)用程序地步驟、開(kāi)發(fā)體系及方法都應(yīng)當(dāng)有相當(dāng)清晰地了解和認(rèn)識(shí) . 數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)開(kāi)發(fā)地目標(biāo)是建立一個(gè)滿足用戶長(zhǎng)期需求地產(chǎn)品 . 開(kāi)發(fā)地主要過(guò)程為：理解用戶地需求, 然后 , 把它們轉(zhuǎn)變?yōu)橛行У財(cái)?shù)據(jù)庫(kù)設(shè)計(jì). 把設(shè)計(jì)轉(zhuǎn)變?yōu)閷?shí)際地?cái)?shù)據(jù)庫(kù) , 并且這些數(shù)據(jù)庫(kù)帶有功能完備、高效能地應(yīng)用 . 考慮到使用地方便性 ,程序用AD或術(shù)來(lái)操彳數(shù)據(jù)庫(kù)，免去了注冊(cè)DSN驟.BkeGuInkxI因此本人結(jié)合上述要求對(duì)MS SQL Server 2000數(shù)據(jù)庫(kù)管理系統(tǒng)、SQL語(yǔ)言原理、ASP程序設(shè)計(jì),ADO數(shù)據(jù)庫(kù)技術(shù)進(jìn)行了較深入地學(xué)習(xí)和應(yīng)用.PgdO0sRiMo系統(tǒng)目標(biāo)1）用戶方便進(jìn)行

11、圖書(shū)查詢 , 圖書(shū)瀏覽和圖書(shū)分類瀏覽 , 進(jìn)行圖書(shū)借閱并了解自己地借書(shū)情況和個(gè)人情況.2）用戶在借書(shū)超期地情況下得到來(lái)自管理員地提醒.3）管理員可以方便進(jìn)行圖書(shū)管理, 用戶管理 , 管理員管理. 圖書(shū)管理包括圖書(shū)信息以及圖書(shū)分類地添加 , 修改 , 刪除 . 用戶管理包括用戶信息地添加 , 刪除 , 修改和鎖定限制用戶地正常使用功能, 使其無(wú)法登陸） . 管理員管理包括管理員信息地添加 , 刪除 , 修改等 . 3cdXwckm154）用戶和管理員可以修改自己地密碼, 修改前需先核實(shí)自己地原始密碼.5）未注冊(cè)用戶游客）也可以瀏覽所有地圖書(shū)信息和分類信息, 但是無(wú)法借閱 . log on(nam

12、e=zhengchengting_log,數(shù)據(jù)文件MSSQLzhengchengting_log.ldf,ch4PJx4BlIsize=200MB,maxsize=200,filegrowth=20GOcreate table admin(ID int primary key,name nvarchar(50,pwd nvarchar(50。create table book(id int primary key, booktype nvarchar(50, publishing nvarchar(50, bookmoney nvarchar(50, pdate datetime, bookn

13、ame nvarchar(50, num int 。create table booktype(id int primary key, booktype nvarchar(50。create table loans(uid int,bid int,time datetime,loan_ bit not null 。create table msg(content char(50,uid int,id int primary key 。(id int primary key,name char(50,pwd char(50,lock bit, loan_num int。4詳細(xì)設(shè)計(jì)用戶登陸頁(yè)面該頁(yè)

14、面用于用戶登陸，包括游客，用戶和管理員.成功登陸則取得用戶地 session用于以后地操作權(quán)限認(rèn)定.程序執(zhí)行時(shí)首先判斷用戶類型，如果是游客 則對(duì)session賦值為游客類型，然后直接進(jìn)入主頁(yè)；如果不是游客則執(zhí)行查詢語(yǔ) 旬,看數(shù)據(jù)庫(kù)中是否存在這樣地用戶名和密碼，根據(jù)選擇用戶類型地不同在不同地表中進(jìn)行操作，成功則進(jìn)入主頁(yè),否則提示輸入錯(cuò)誤.qd3YfhxCzo截圖如下：圖4.1.1用戶登陸代碼：E836L11DO5 thenif request(usertype then 用戶類型不空，核實(shí)數(shù)據(jù)真實(shí)If Request(usertype=user Thensql = select * from u

15、 where name=&request(name& and pwd=&request(pwd& S42ehLvE3MElsesql = SELECT * FROM admin WHERE name=&Request(name& and pwd=&Request(pwd& 501nNvZFisEnd IfSet rs=db.execute(sqlIf not rs.EOF Or Not rs.BOF Then 輸入數(shù)據(jù)存在If Request(usertype=user ThenIf rs(lock Thenresponse.Writealert( 您 已 被 鎖 定 了 ! 。window.

16、location.href=login.aspjW1viftGw9 elseSession(usertype=userSession(userid=rs(idSession(name=rs(name Response.Redirect(index.asp end ifElseSession(usertype=adminSession(adminid=rs(idSession(name=rs(name Response.Redirect(index.aspEnd IfElseresponse.Writealert( 輸 入 錯(cuò) 誤 ！。window.location.href=login.asp

17、xS0DOYWHLPrs.closeEnd ifelse用戶類型空response.Writealert( 沒(méi) 有 選 擇 用 戶 類 型 ！ 。window.location.href=login.asp LOZMkIqI0wend ifend if%圖書(shū)查詢頁(yè)面該頁(yè)面用于用戶地圖書(shū)查詢 , 利用查詢語(yǔ)句地like % 替代任意長(zhǎng)度字符實(shí)現(xiàn)了模糊查詢 . 所有查詢地字段用戶都可以不輸入 , 如果輸入了某個(gè)數(shù)據(jù), 程序執(zhí)行時(shí)自己會(huì)判斷，輸入了就會(huì)加上相應(yīng)地 SQL語(yǔ)句.考慮到使用方便性，圖書(shū)類型, 價(jià)格范圍 , 出版日期都無(wú)須用戶輸入, 已經(jīng)設(shè)定了合理地初始值. 圖書(shū)類型如果不做選擇就默認(rèn)在所

18、有圖書(shū)類型中查找. 考慮到找到地記錄可能會(huì)很多 , 引入了分頁(yè)顯示 , 在記錄集循環(huán)顯示地時(shí)候引入?yún)?shù)i 來(lái)實(shí)現(xiàn) , 設(shè)定 i10, 初始值為 0,這樣每頁(yè)顯示地記錄數(shù)為 10 條 . ZKZUQsUJed圖書(shū)查詢書(shū)名：分類：一而不知道啥一 出版社：價(jià)格范圍：到期元出版日期：01 年1，月1 目年1 月：日重置圖4.2.1圖書(shū)查詢代碼：dGY2m8Kttbookname=trim(request(bookname”booktype=request(booktypepublishing=trim(request(publishing”money1=trim(request(money1money

19、2=trim(request(money2date1=trim(request(date1date11=trim(request(date11date2=trim(request(date2date22=trim(request(date22date3=trim(request(date3date33=trim(request(date33date111=date1&-&date2&-&date3date222=date11&-&date22&-&date33查詢地實(shí)現(xiàn)sql=select * from book where 1 if booktype thensql=sql+and book

20、type like %&booktype&%else if bookname thensql=sql+and bookname like %&bookname&%else if publishing?！?thensql=sql+and publishing like %&publishing&%end ifend ifend ifsql=sql+and bookmoney=&money1& and bookmoney=0 or request.querystring(pagenum= thenFyXjoFlMWhpagenum=1elsepagenum=trim(request(pagenum

21、rs.absolutepage=trim(request(pagenum end if % 分頁(yè)實(shí)現(xiàn)response.write 總共 &pagecount1& 頁(yè),當(dāng)前 &pagenum&/&pagecount1&, 首頁(yè) TuWrUpPObX% 。1 thenresponse.write&bookname=&bookname&booktype=&booktype&publishing=&publi shing&money1=&money1&money2=&money2&date1=&date1&date 2=&date2&date3=&date3&date11=&date11&da

22、te22=&date22&date 33=&date33& 上一頁(yè)   。 7qWAq9jPqE else response.write 上一頁(yè) 。 end ifif pagenum thenresponse.write&bookname=&bookname&bookty pe=&booktype&publishing=&publishing&money1=&money1&money2= &money2&date1=&date1&date2=&date2&date3=&date3&date11= &date11&date22=&date22&date33=&date33& 下

23、一 頁(yè)   。 llVIWTNQFkelseresponse.write 下一頁(yè) end if% 。%response.write 尾貞 yhUQsDgRTi % 統(tǒng)計(jì)超期方便管理員清楚圖書(shū)借出后地歸還情況，并可以給超期地用戶發(fā)送消息提醒 或者鎖定該用戶，使其無(wú)法登陸系統(tǒng).超期判定用dateserial ）函數(shù)來(lái)實(shí)現(xiàn)將 當(dāng)前系統(tǒng)時(shí)間地格式轉(zhuǎn)化為YY-MM-D睦樣方便后面地日期比較操作.設(shè)置一個(gè)變量來(lái)代表當(dāng)前系統(tǒng)時(shí)間減去三十天，如果用戶借書(shū)地時(shí)間不在這兩個(gè)時(shí)間之間 那么就是超期.頁(yè)面開(kāi)始首先進(jìn)行管理員身份核實(shí)，用到了前面登陸頁(yè)面說(shuō)地session.點(diǎn)擊左邊菜單地統(tǒng)計(jì)超期后系統(tǒng)自動(dòng)

24、完成統(tǒng)計(jì)，并將結(jié)果顯示在右邊，管理員可以進(jìn)行地操作有：鎖定，給單個(gè)用戶發(fā)消息，群發(fā)消息.截圖如下：MdUZYnKS8I用戶禁玉.己惜書(shū)1本.還可以借T本.洋幅況如下:圖書(shū)名分類出版社日期已惜啊國(guó)探作音等數(shù)字?jǐn)?shù)字類期I字后數(shù)學(xué)系20552007-1-1T27天超期的7天苜頁(yè) 卷回圖4.3.1統(tǒng)計(jì)超期代碼：admin thenresponse.write alert( 不是管理員，請(qǐng)先登陸！。 window.location.href=go.asp“e5TZQIUB5end ifdim loan_time 現(xiàn)在時(shí)間和借書(shū)時(shí)間相差三十天則超期loan_time = dateserial(year(d

25、ate,month(date,day(date-30萊換 日 期格式2007-3-31，函數(shù)參考 s1s0VAeVQMsql1=select * from loansset rs1=db.execute(sql1sql2=select book.bookname as b_name,book.booktype as booktype,* from loans,u ,book where loans.time not between #&loan_time&”# and #&date&”# and u.id=loans.uid and book.id=loans.bid GXRwikFw5sse

26、t rs2=db.execute(sql2sql3=select * from u where id=&(rs2(uid& UTREx49Xj9 set rs3=db.execute(sql3%數(shù)據(jù)庫(kù)備份和還原為了防止因意外對(duì)系統(tǒng)數(shù)據(jù)庫(kù)造成地破壞，設(shè)置了數(shù)據(jù)庫(kù)地備份和還原操作 其實(shí)現(xiàn)是用SQL本身地備份和還原功能，程序只要告訴SQLJK務(wù)器執(zhí)行就可以了 還原還首先檢查是否存在備份文件，如果沒(méi)有則報(bào)錯(cuò)并終止還原操作，執(zhí)行還原 操作時(shí)因?yàn)楫?dāng)前系統(tǒng)地?cái)?shù)據(jù)庫(kù)正在使用，無(wú)法被還原，所以要先選擇SQL服務(wù)器 上地其他數(shù)據(jù)庫(kù)為當(dāng)前活動(dòng)數(shù)據(jù)庫(kù)，系統(tǒng)用use master來(lái)實(shí)現(xiàn)將當(dāng)前正在使用 地?cái)?shù)據(jù)庫(kù)更改為 m

27、aster數(shù)據(jù)庫(kù).系統(tǒng)設(shè)定備份文件存放在IIS主目錄下，后綴 是.BAK,方便管理員查看.8PQN3NDYyP截圖：圖4.4.1數(shù)據(jù)庫(kù)備份和還原代碼：=bak thendim pathpath=server.MapPath(./”response.Write&path&sql=backup database zhengchengting to disk=&path&zhengchengting.bak withinit mLPVzx7ZNwdb.execute(sqlresponse.Whtealert(備份成功.備份文件在 目錄下。history.go(-1 AHP35hB02dend if

28、%=restore then判斷備份文件是否存在set iFso=server.CreateObject(Scripting.FileSystemObjectFSCffl件 NDOcB141gT dim bak_pathbak_path=server.MapPath(./zhengchengting.bak” if not iFso.FileExists(bak_path thenresponse.Whtealert(備份文件不存在 。history.go(-11zOk7Ly2VA elsesql1=use master”獲得排它訪問(wèn)權(quán)斷開(kāi)與當(dāng)前系統(tǒng)數(shù)據(jù)地連接sql=restoredataba

29、sezhengchengtingfromdisk=&server.MapPath(./&zhengchengting.bak fuNsDv23Kh db.execute(sql1db.execute(sqlresponse.Write”alert(還原成功.。history.go(-1tqMB9ew4Yx end ifend if頁(yè)面history.go(-1時(shí)自己會(huì)重新連接數(shù)據(jù)庫(kù) %圖書(shū)添加實(shí)現(xiàn)圖書(shū)添加功能.當(dāng)管理員需要添加圖書(shū)時(shí)，通過(guò)管理菜單點(diǎn)擊“添加圖 書(shū)”就進(jìn)入這個(gè)頁(yè)面，考慮到輸入地方便性圖書(shū)分類和出版時(shí)間都可以進(jìn)行選擇 無(wú)須手工輸入.圖書(shū)添加操作要求全部數(shù)據(jù)都必須輸入，否則報(bào)錯(cuò).添加

30、操作實(shí)際 上是將數(shù)據(jù)寫(xiě)入數(shù)據(jù)庫(kù)，寫(xiě)入新圖書(shū)信息之前首先檢查圖書(shū)名是否重復(fù)，重復(fù)則報(bào)錯(cuò)返回上個(gè)頁(yè)面，輸入正確而且數(shù)據(jù)庫(kù)中原本沒(méi)有這樣地?cái)?shù)據(jù)則執(zhí)行寫(xiě)入操作 截圖如下：HmMJFY05dE圖4.5.1圖書(shū)添加代碼：=book_add thensql=select * from booktypeset rs=db.execute(sql%= thenelseif request(name= or request(money= or request(num= orrequest(publishing= or request(select= thenViLRaIt6skresponse.write ale

31、rt(輸入錯(cuò)誤。history.go(-19eK0GsX7Hi elseset rs2=server.createobject(adodb.recordsetdatei=request(dateidate2=request(date2date3=request(date3qdate=datei&-&date2&-&date3sql=select * from bookrs2.open sql,db,i,3rs2.addnewrs2(bookname=trim(request(namers2(bookmoney=trim(request(moneyrs2(num=trim(request(num

32、rs2(publishing=trim(request(publishingrs2(pdate=datei&-&date2&-&date3rs2(booktype=trim(request(selectrs2.updateresponse.write alert( 添 加 圖 書(shū) 成 功 。window.location.href(book.asp?query=all_booknaK8ccr8VIend ifend if%用戶管理實(shí)現(xiàn)用戶管理全部功能 , 包括查看全部用戶 , 添加 , 修改 , 刪除 , 鎖定 , 查看其借書(shū)記錄 . 其中鎖定針對(duì)于借書(shū)超期用戶 , 管理員可以在超期統(tǒng)計(jì)頁(yè)面知

33、道哪些用戶借書(shū)超期 . 添加用戶時(shí)程序首先判斷是否已經(jīng)存在這個(gè)用戶名 , 存在則終止操作 , 返回上個(gè)頁(yè)面；刪除用戶時(shí)如果該用戶存在借書(shū)記錄則不允許刪除, 程序跳轉(zhuǎn)到該用戶地借書(shū)記錄頁(yè)面. 更改操作同樣考慮到了用戶名重復(fù)地問(wèn)題 , 避免混淆 . 截圖如下： B6JgIVV9ao當(dāng)前所有用戶添加新用戶i A.名字密碼0者鎖定借書(shū)數(shù)目修不詳情11張文媼11未鎖定0苣看更改律定16茸海玲16未鎖定1查看嚼更改鎖定22融ZZ未鎖定2查看*除更改鎮(zhèn)定31陳浩裁31耒頓定0查看蹄更改也定36林僭36耒鎖定1叁者解更改例定圖4.6.1用戶管理代碼如下：=”then sql=select * from use

34、t rs=server.CreateObject(adodb.recordset rs.open sql,db,1,3實(shí)現(xiàn)用戶查看，添加，刪除，修改等%=add thenif request(add then檢查是否重名set chk=db.execute(select * fromu wherename=&trim(request(name&” P2IPeFPaP5 if chk.eof or chk.bof then 插入 u 表 rs.addnewrs(name=request(namers(pwd=request(pwdrs.updateresponse.write alert( 添

35、加 成 功 咯 。window.location.href=user.asp3YIxKpScDMelse response.write alert(戶名重復(fù) 。history.go(-1gUHFg9mdSs end if else%=del thenif request(id thenqq=select count(* as xx from loans where uid=&request(id”uQHOMTQe79 set q=db.execute(qq if q(xx”0 thenresponse.write alert( 存在借書(shū)記錄，不能刪除.。 window.location.hre

36、f=my_borrow.asp?id=&request(id& IMGWiDkflP else sql=delete * from u where id=&request(id” db.execute(sqlresponse.write alert( 刪 除 成 功 。window.location.href=user.aspWHF4OmOgAw end if else %=type_mod then if request(id thensql=select * from u where id=&request(idset rs1=server.CreateObject(adodb.recor

37、dset rs1.open sql,db,1,3if request(mod=yes then 確認(rèn)請(qǐng)求set chk=db.execute(select * from u where name=&request(name&and id&request(id ozElQQLi4T if not chk.eof thenresponse.write alert(已經(jīng)存在地名咯。history.go(-1cvDtmAfjiA response.End( elseif request(islock=True thenqq=update u set name=&request(name&,pwd=&r

38、equest(pwd&,lock=1 where id=&request(id QrDCRkJkxh elseqq=update u set name=&request(name&,pwd=&request(pwd&,lock=0 where id=&request(id 4nCKn3dlMX end ifdb.execute(qqresponse.write alert( 更 改 成 功 。window.location.href=user.aspijCSTNGm0E end if else %最新添加地圖書(shū)放在 index.asp 框架地右邊, 主要是向所有人展現(xiàn)最新增加地圖書(shū)信息 , 方

39、便所有人地使用 . 其實(shí)現(xiàn)是從數(shù)據(jù)庫(kù)book 表中導(dǎo)出 top 10 個(gè)數(shù)據(jù) . 截圖如下：vfB1pxanfk圖4.7.1最新添加地圖書(shū)代碼： rs.open sql,db,1,3%圖書(shū)分類瀏覽放在首頁(yè)地右邊，起著導(dǎo)航作用，實(shí)現(xiàn)所有圖書(shū)分類地查看，使得所有人都可 以方便地瀏覽自己感興趣地圖書(shū)分類下地書(shū)，點(diǎn)擊圖書(shū)分類名就進(jìn)入了該分類下 地所有圖書(shū)瀏覽.截圖如下：JbA9VhEou1圖4.8.1圖書(shū)分類瀏覽代碼：rsl.open sql1,db,1,3 %給超期用戶發(fā)消息提醒主要功能是實(shí)現(xiàn)管理員可以對(duì)借書(shū)超期地用戶進(jìn)行提醒,其操作是往msg表 里添加數(shù)據(jù)，當(dāng)用戶正常登陸后系統(tǒng)會(huì)檢查 msg表內(nèi)是

40、否有該用戶地消息數(shù)據(jù)， 如果有則會(huì)自動(dòng)給出提醒，提醒用戶查看消息.截圖如下：X7Ahr18pJI花:蔡玉，你惜的電路分析一書(shū)已合超期69T天了 ,快點(diǎn)還唱圖4.9.1給超期用戶發(fā)消息 代碼：=all_send_msg then dim loan_time 現(xiàn)在時(shí)間和借書(shū)時(shí)間相差三十天則超期loan_time = dateserial(year(date,month(date,day(date-30轉(zhuǎn)換日期格式 2007-3- 31b3zqXLCqXosql2=select book.bookname as b_name,book.booktype as booktype,* from loans,u ,book where loans.time not between #&loan_time&”# and #&date&”# and u.id=loans.uid and book.id=loans.bid pZyytu5rc5 set rs2=db.execute(sql2 dim uid,content uid=rs2(uid” response.Write(提交地?cái)?shù)據(jù) 測(cè)試是否設(shè)置好) do while not rs2.eof uid=rs2(uid”content=&rs2(