【正文】 薦圖書(shū)和暢銷(xiāo)圖書(shū)三 個(gè) 部分 內(nèi)容的顯示和隱藏效果，我們須先將此三個(gè)部分的內(nèi)容分別封裝在 div id=display1/div、 div id=display2/div和 div id=display3/div三個(gè)元素中。 在頁(yè)面的初始狀態(tài)下， div id=display1/div元素的“顯示”屬性為顯示 ； div id= display2/div和 div id=display3/div兩個(gè)元素的“顯示”屬性為隱藏，即 style=display:none。 其次， 用戶 將鼠標(biāo)移動(dòng)到標(biāo)題上時(shí)，系統(tǒng)通過(guò) JavaScript 函數(shù)改變 div id=display1/div、 div id=display2/div和 div id=display3/div三個(gè)元素的“顯示”屬性。例如， 用戶 將鼠標(biāo)移動(dòng)到“暢銷(xiāo)圖書(shū)”上時(shí)，觸發(fā)了 selectbook()函數(shù)，將 div id=display3/div元素的“顯示”屬性改為顯示，將 div id=display1/div、 div id=display2/div兩個(gè)元素的 “顯示”屬性改為隱藏。 其三， 新品圖書(shū)、推薦圖書(shū)和暢銷(xiāo)圖書(shū)三個(gè)部分的內(nèi)容是通過(guò) VBScript 語(yǔ)句讀取數(shù)據(jù)庫(kù) ，取出數(shù)據(jù) ，然后顯示在頁(yè)面中。 在 圖 1中 ， 我們 可以 看到 每本 書(shū) 的名稱、作者、縮略圖、價(jià)格及簡(jiǎn)單介紹 。 用戶 可以通過(guò)點(diǎn)擊“暫存”將書(shū)本放入收藏夾，或點(diǎn)擊“訂購(gòu)”直接 進(jìn)行購(gòu)買(mǎi)。此外， 用戶 可以 點(diǎn)擊書(shū)本名稱或書(shū)本的縮略圖查看書(shū)本的詳細(xì)信息 。 實(shí)現(xiàn)此功能的核心代碼如下： script type=text/JavaScript function selectbook(j){ for(var i=1。i4。i++){ (display+i).=none。} (display+j).=。 }/script table width=98% cellspacing=0 cellpadding=0 align= center trtd width=89 onMouseOver=selectbook(1)。新品圖書(shū) /td td width=89 onMouseOver=selectbook(2)。推薦圖書(shū) /td td width=89 onMouseOver=selectbook(3)。暢銷(xiāo)圖書(shū) /td td background=img/ /td/tr/table div id=display1 % set rs=(select top 10 * from shop_books order by adddate desc ) if not or not then showbook if i=10 then exit do loop 基于 ASP 的網(wǎng)上書(shū)店 set rs=nothing end if% /div div id=display2 style=display:none。 %set rs=(select top 10 * from shop_books WHERE bestbook=1 order by adddate desc) if not or not then showbook if i=10 then exit do loop set rs=nothing end if% /div div id=display3 style=display:none。 %set rs=(select top 10 * from shop_books order by sellcount desc) if not or not then showbook if i=10 then exit do loop set rs=nothing end if% /div %sub showbook()% a href=?id=%=rs(bookid)% target=_blankIMG height=96 src=%if trim(rs(bookpic))= then images/ else trim(rs(bookpic)) end if% width=65 a a href=?id=%=rs(bookid)% target=_blank%=trim(rs (bookname))%abr 會(huì)員價(jià)： font color=FF0000%=formatnumber(rs(price),2)amp。元 %/font br %if int(rs(storageflag))=0 then a href= onClick=JavaScript: (39。?id =amp。rs(bookid)amp。39。,39。39。,39。width=632,height=450 toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes39。)。return false。img src=images/ align=absmiddle border=0/a else a href= onClick=JavaScript:alert(39?！?amp。trim(rs(bookname)) amp?！窌簳r(shí)沒(méi)有庫(kù)存，請(qǐng)您繼續(xù)關(guān)注！ 39。)。return false。img src=images/ align=absmiddle border=0/a end if% a href= %if int(rs(storageflag))=0 then onClick= JavaScript:(39。?id=amp。rs(bookid)amp。amp。action=add 39。,39。39。,39。width=632,height=450,toolb 19 ar=no, status=no, menubar=no, resizable=yes, scrollbars = yes39。)。return false。 else onClick=JavaScript:alert(39?！?amp。trim(rs(bookname))amp?！窌簳r(shí)沒(méi)有庫(kù)存，請(qǐng)您繼續(xù)關(guān)注！ 39。) end if% img src=images/ align=absmiddle border=0/a %if len(trim(rs(bookcontent)))=35 then font color=blackamp。left(trim (rs(bookcontent)), 35)amp。.. else trim(rs(bookcontent)) end if% a href=?id=%=rs(bookid)% target=_blankfont color=chocolate詳細(xì)介紹 /fonta % end sub % 書(shū)本 查詢 書(shū)本查詢分為簡(jiǎn)單查詢和高級(jí)查詢。 簡(jiǎn)單查詢。 能快速地 搜索到 書(shū)本信息。 用戶選擇一種“查找方式” 后 ，輸入關(guān)鍵字即可 查詢 。查找方式包括：書(shū)名、叢書(shū)、作者、譯者、出版社和 ISBN。 高級(jí)查詢。 能 精確 地 搜索相關(guān)書(shū)本信息 。 用戶 在查找時(shí) 可以 限定書(shū)本價(jià)格范圍、出版日期范圍 、 圖書(shū)類別 及查找方式 ，并選擇以下幾種排序方式： 按出版時(shí)間排序 、 按點(diǎn)擊率排序 、 按價(jià)格降序排序 、 按價(jià)格升序排序 、 按折扣降序排序 、 按折扣升序排序 。 書(shū)本 分類 每位 用戶 都有各自的愛(ài)好或各自從事的工作領(lǐng)域， 他們往往都需要一些相同類別的 書(shū)本 供自己進(jìn)行欣賞、研究或參考。 為此，本系統(tǒng)給所有圖書(shū)進(jìn)行了詳細(xì)分類， 即先將所有書(shū)本 分為幾個(gè)大類別，然后再將所有大類別又各自分為幾個(gè)小類別。這樣的話， 用戶 就 能很方便地找到自己所需的相同類別的 書(shū) 本 。 書(shū)本 分類模塊放在首頁(yè)的左側(cè) 。 用戶 瀏覽到自己所需書(shū)本的大的類別后，點(diǎn)擊該類別的名稱，即可查看該大類別下的所有小類別。 之后， 用戶 點(diǎn)擊小類別的名稱，即可進(jìn)入相應(yīng)頁(yè)面瀏覽該小類別里的所有圖書(shū)；點(diǎn)擊“全部”，則進(jìn)入相應(yīng)頁(yè)面瀏覽大類別中的所有圖書(shū)。實(shí)現(xiàn)該功能的核心代碼如下： 和 中 所 包含的 頁(yè)面 核心代碼 ： !include file= script type=text/JavaScript function showsubmenu(sid){ if((submenu+sid).==none){ (submenu+sid).=。 } else{ (submenu+sid).=none。 } } /script table width=100% align=right cellpadding=0 cellspacing=0 border=0 基于 ASP 的網(wǎng)上書(shū)店 trtd width=190 valign=top table width=190 align=center cellpadding=0 cellspacing=0 border=0 % set rs1=() select anclassid,anclass from shop_anclass,conn,1,1 do while not % trtd valign=top onClick=showsubmenu(%=rs1(anclassid)%) p style=marginleft:30pximg id=%=imageamp。rs1(anclassid) % src=img/fol align=absmiddle border=0 font size=2 face=宋體 %=rs1(anclass)%/font/td/tr tr id=%=submenuamp。rs1(anclassid)% style=display:nonetd height=40 valign=top table width=190 height=37 trtd colspan=2 style=paddingleft:35pxa href=?aid= %= rs1(anclassid)%font color=FF6600[全 部 ]/font/a /td/tr %set rs2=() select nclassid,nclass,anclassid from shop_nclass where anclassid=amp。rs1(anclassid)amp。 ,conn,1,1 i=1 do while not % trtd width=50 align=righti%=i%/i./td td align=center width=140p align=leftfont size=2a href=?aid=%=rs2(anclassid)%amp。nid=%=rs2(nclassid)%%=rs2(nclass)%/a/font/p/td/tr % i=i+1 loop set rs2=nothing% /table /td/tr % loop set rs1=nothing% /table /td/tr/table 購(gòu)買(mǎi) 書(shū)本 當(dāng) 用戶 對(duì) 某本書(shū)感興趣時(shí)，可以把此商品放入收藏夾 。 如果 用戶 已經(jīng)收藏了該書(shū) ,則不能再收藏 。 用戶 將書(shū)本 放入 收藏夾 后， 如果不滿意即可刪除 ，收藏夾頁(yè)面顯示如 圖 ： 21 圖 我的收藏夾界面 如果 用戶 決定購(gòu)買(mǎi)了，就可以直接訂購(gòu)即生成一個(gè)訂單如圖 ： 圖 訂單界面 在購(gòu)物過(guò)程中，實(shí)現(xiàn)將書(shū)本放入收藏夾以及生成訂單的核心代碼如下： 收藏夾頁(yè)面 ： !include file= centerdiv style=width:80%” align=center收藏夾 /div/center %if session(username)= then end if action=(action) username=session(username) if (id)= then bookid=request(bookid) else bookid=replace((id),39。,) end if 基于 ASP 的網(wǎng)上書(shū)店 select case action case del 39。//刪除收藏 delete from shop_action where actionid=amp。 (actionid) ?action=show case delall 39。//全部 刪除 delete * from shop_action where username=39。 amp。session (username)amp。39。 and zhuangtai=0 scriptalert(39。您的收藏架已完全清空！ 39。)。(39。shouca?action=show39。)/script case add 39。//加入收藏 39。//收藏，判斷是否存在 if bookid= then 您沒(méi)有