【正文】 圖書(shū)管理 管理員可以添加 圖書(shū)數(shù)據(jù) 、 查看圖書(shū)數(shù)據(jù) 、 圖書(shū)搜索 、添加書(shū)籍分類(lèi)以及修改書(shū)籍庫(kù)存信息和刪除書(shū)籍 . 信息管理 主要包括：圖書(shū)訂單管理 、 訂單查詢(xún) 、 查詢(xún)發(fā)貨通知 、 發(fā)布發(fā)貨通知 、 圖書(shū)評(píng)論審核 、 公告管理 、 查看求購(gòu)書(shū)籍 . 用戶(hù)管理 主要包括：書(shū)店會(huì)員管理（全部） 、 書(shū)店會(huì)員管理（ VIP） 、 書(shū)店會(huì)員管理（普通） 、 會(huì)員搜索 、 會(huì)員在線充值 、 會(huì)員在線減值 、 充減值歷等功能 . 數(shù)據(jù)管理 主要包括：數(shù)據(jù)庫(kù)備份 、 網(wǎng)站流量統(tǒng)計(jì) 、 服務(wù)器探針等功能 . 其它設(shè)置 主要包括：后臺(tái)管理 、 修改密碼 、 推出后臺(tái)等功能 . 網(wǎng)站功能模塊圖 圖 51 網(wǎng)站功能模塊圖 基于 B/S 系統(tǒng) 圖書(shū)搜索 訪客計(jì)數(shù) 用戶(hù)注冊(cè)注冊(cè) 用戶(hù)登錄 網(wǎng)站公告 發(fā)貨通知 網(wǎng)上購(gòu)物 管理模塊 圖書(shū) 展示 收藏 購(gòu)買(mǎi) 圖書(shū) 管理 信息 管理 用戶(hù) 管理 數(shù)據(jù) 管理 網(wǎng)站流程圖 成功 失敗 訪客 用戶(hù) 進(jìn)入 訪客計(jì)數(shù) 用戶(hù)注冊(cè) 用戶(hù)登錄 不注冊(cè) 基于 B/S 圖書(shū)搜索 發(fā)貨通知 網(wǎng)站公告 查看書(shū)籍 用戶(hù)信息管理 圖書(shū)展示 放 入 收藏/購(gòu)買(mǎi) 圖書(shū)搜索 驗(yàn) 證 用戶(hù)訂購(gòu) 圖 52 網(wǎng)站流程圖 3 后臺(tái)圖書(shū)管理系統(tǒng) 后臺(tái)管理模塊的實(shí)現(xiàn)是本系統(tǒng)的一個(gè)重點(diǎn)也是一個(gè)難點(diǎn)，不過(guò)總的說(shuō)來(lái)還是對(duì)數(shù)據(jù)庫(kù)進(jìn)行的各項(xiàng)操作，比如插入、查詢(xún)、刪除這三大動(dòng)作。 后臺(tái)界面如圖 64： 圖 64 后臺(tái)界面 后臺(tái)管理系統(tǒng)主要包括 6個(gè)部分： 圖書(shū)管理 、 信息管理 、 用戶(hù)管理 、 數(shù)據(jù)管理 、 其它設(shè)置 。 這里主要敘述圖書(shū)管理（包括圖書(shū)管理和 信息 管理兩個(gè)子系統(tǒng)）的實(shí)現(xiàn)，其余模塊的實(shí)現(xiàn)大體 都是相似的。圖書(shū)管理模塊主要包括查看所有圖書(shū) 、 添加、圖書(shū) 搜索等等 ； 信息 管理主要包括 圖書(shū)訂單管理 、 訂單查詢(xún) 、 查詢(xún)發(fā)貨通知 、 發(fā)布發(fā)貨通知 、 圖書(shū)評(píng)論審核 、 公告管理 、 查看求購(gòu)書(shū)籍等等 。 查看所有圖書(shū) /修改操作， 如圖 65 界面 圖 65 圖書(shū)查看與修改 其核心代碼 如下 ： div align=center table width=90% border=0 cellpadding=0 cellspacing=1 bgcolor=BCD7E0 tr td height=16 background=../images/manage/div align=centerfont color=000000圖書(shū)查看與修改 /font/div/td /tr trform name=form1 method=post action= td height=113 bgcolor=F8FCFDtable width=12 height=7 border=0 cellpadding=0 cellspacing=0 tr td height=7/td /tr /table %39。開(kāi)始分頁(yè) Const MaxPerPage=20 dim totalPut dim CurrentPage dim TotalPages dim j dim sql if Not isempty(request(page)) then currentPage=Cint(request(page)) else currentPage=1 end if set rs=() select case selectm case select bookid,bookname,adddate,bookchuban,kucun,adddate from shop_books order by adddate desc,conn,1,1 case 0 center 請(qǐng) 返 回 選 擇 您 要 查 訊 的 方 式 ！ brbra href=javascript:(1)點(diǎn)擊返回上一頁(yè) /a/center case name select bookid,bookname,adddate,bookchuban,kucun,adddate from shop_books where bookname like 39。%amp。selectkeyamp。%39。 order by adddate desc,conn,1,1 case zuozhe select bookid,bookname,adddate,bookchuban,kucun,adddate from shop_books where bookzz like 39。%amp。selectkeyamp。%39。 order by adddate desc,conn,1,1 case chubanshe select bookid,bookname,adddate,bookchuban,kucun,adddate from shop_books where bookchuban like 39。%amp。selectkeyamp。%39。 order by adddate desc,conn,1,1 case isbn select bookid,bookname,adddate,bookchuban,kucun,adddate from shop_books where isbn like 39。%amp。selectkeyamp。%39。 order by adddate desc,conn,1,1 end select if 0 then 數(shù)據(jù)庫(kù)中無(wú)數(shù)據(jù) end if if And then p align=39。center39。 class=39。contents39。 數(shù)據(jù)庫(kù)中無(wú)數(shù)據(jù)！ /p else totalPut= if currentpage1 then currentpage=1 end if if (currentpage1)*MaxPerPagetotalput then if (totalPut mod MaxPerPage)=0 then currentpage= totalPut \ MaxPerPage else currentpage= totalPut \ MaxPerPage + 1 end if end if if currentPage=1 then showContent showpage totalput,MaxPerPage, else if (currentPage1)*MaxPerPagetotalPut then (currentPage1)*MaxPerPage dim bookmark bookmark= showContent showpage totalput,MaxPerPage, else currentPage=1 showContent showpage totalput,MaxPerPage, end if end if end if sub showContent dim i i=0% div align=center table width=90% border=0 cellpadding=2 cellspacing=1 bgcolor=BCD7E0 tr bgcolor=F8FCFD td align=center width=70div align=centerID/div/td td align=center width=538圖書(shū)名稱(chēng) /td td align=center添加時(shí)間 /td td align=centerdiv align=center庫(kù)存 /div/td td align=center width=64div align=center選 擇 /div/td /tr % do while not % tr bgcolor=F8FCFD td width=70 align=center%=rs(bookid)%/td td width=538div align=lefta href=?id=%=rs(bookid)%%=rs(bookname)%/a/div/td td width=226 align=center%=rs(adddate)%/td td width=34div align=center%=rs(kucun)%/div/td td width=64 div align=center input name=selectbookid type=checkbox id=selectbookid value=%=rs(bookid)% /div/td /tr %i=i+1 if i=MaxPerPage then Exit Do loop set rs=nothing% tr bgcolor=F8FCFD td height=30 colspan=5 div align=right input type=submit name=Submit value=刪 除 onClick=return test()。 /div/td /tr /table/div % End Sub Function showpage(totalnumber,maxperpage,filename) Dim n If totalnumber Mod maxperpage=0 Then n= totalnumber \ maxperpage Else n= total