【正文】 DESC, buyNum DESC, ID DESC set rsObj = (strSQL) 39。作 用：顯示最新推薦圖書(shū) 39。 /a /td/tr i = i+1 if i100 then exit do loop 39。... end if end if a href = ?id= amp。 (font color = red amp。輸出列表，在這里尤其要注意避免字符串拼接 do while not ( or err) trtd height = 23 img src = images/ 39。 ORDER BY memberPrice/marketPrice, id desc else strSQL = SELECT TOP amp。因?yàn)橛玫搅顺?，所以要加上?duì)分母不為 0 的判斷 strSQL = SELECT TOP amp。 ORDER BY buyNum desc,id desc elseif strFilter = Remended then strSQL = SELECT TOP amp。要在排序條件的最后加入以 id 排序， 39。 ID = 39。 cellspacing = 39。檢查 nCount 的合法性 nCount = CInt(nCount) if nCount 20 then nCount = 20 if nCount 1 then nCount = 1 table width = 39。 Cheap: 最優(yōu)惠圖書(shū) 39。參 數(shù)： 39。關(guān)閉集合，但不能關(guān)閉連接，因?yàn)槠渌胤娇赡芤? Set rsObj = Nothing /table end sub % 程序清單 熱賣(mài)圖書(shū)過(guò)程實(shí)現(xiàn)代碼 Sub ShowSpecialProduct(strFilter, nCount) dim strSpecialText if strFilter = Hot then strSpecialText = 熱賣(mài)圖書(shū) elseif strFilter = Remended then strSpecialText = 推薦圖書(shū) elseif strFilter = Cheap then strSpecialText = 最優(yōu)惠圖書(shū) else strFilter = Hot strSpecialText = 熱賣(mài)圖書(shū) end if % TABLE cellSpacing = 0 cellPadding = 0 width = 100% border = 0 ID = Table1 TBODY TR TD height = 20 background = images/ align = centerstrong%=strSpecialText%/strong /TD /TR TR TD height = 5/TD /TR TR TD vAlign = top table width = 95% border = 0 align = center cellpadding = 0 cellspacing = 0 ID = Table2 tr td % call ShowSpecialProductList(strFilter, nCount) % /td /tr /table /TD /TR TR TD height = 5/TD /TR /TBODY /TABLE % end sub 39。 rsObj(ID) amp。039。039。顯示購(gòu)買(mǎi)率最高的前 6 本書(shū)，需要傳入?yún)?shù) Hot和 6 call ShowSpecialProduct(Hot, 6) % /TD /TR /TBODY /TABLE ! 推薦圖書(shū) ! TABLE cellSpacing = 0 borderColorDark = rgb(210,232,255) cellPadding = 0 width = 100% borderColorLight = aaaaaa border = 1 ID = Table6 TBODY TR TD % call ShowSpecialProduct(Remended, 6) % /TD /TR /TBODY /TABLE BR ! 打折圖書(shū) ! TABLE cellSpacing = 0 borderColorDark = rgb(210,232,255) cellPadding = 0 width = 100% borderColorLight = aaaaaa border = 1 ID = Table9 TBODY TR TD % 39。39。39。清除 39。Reset39。039。100%39。過(guò)程名： ShowMemberLogin 39。查看我的資料 /a a href = 39。, 39。a href = 39。 align = 39。 value = 39。 type = 39。 colspan = 39。input type = password name = password size = 10 maxlength = 16 ID = Password2 class = editbox1/td /tr tr align = 39。 align = 39。會(huì)員名： /td td height = 39。 ID = Table3 form action = method = post name = userLogin ID = Form3 TBODY tr td height = 39。 cellspacing = 39。 ================================================= sub ShowUserLogin() dim strLogin If Session(memberID) = Then % table width = 39。 ================================================= 39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。, 39。Data Source = amp。數(shù)據(jù)庫(kù)連接 dim connstr 39。通過(guò)調(diào)用方法 close 實(shí)現(xiàn)關(guān)閉，然后再釋放它。以下是創(chuàng)建 方法： Set Record Set=(sqtStr) 這條語(yǔ)句創(chuàng)建并打開(kāi)了對(duì)象 Record Set，其中 Con是先前創(chuàng)建的鏈接對(duì)象，rs是一個(gè)字串，代表一條標(biāo)準(zhǔn)的 SQL 語(yǔ)句。 以上兩個(gè)步驟缺一不可，因?yàn)殒溄訉?duì)象的創(chuàng)建與打開(kāi)是兩回事，只有打開(kāi)了才真正可以使用。=amp。如果數(shù)據(jù)庫(kù)的平臺(tái)變了，比如我們改用了 SQL Server 的數(shù)據(jù)庫(kù)，只要其中表的結(jié)構(gòu)沒(méi)變，我們就不用改寫(xiě)我們的程序，只要重新在系統(tǒng)中配置 DSN 就行了。比如我們系統(tǒng)中有 Access 的 ODBC 驅(qū)動(dòng)程序，那么即使我們沒(méi)有 Access 軟件，也可以在我們的程序中對(duì)一個(gè) Access 的 MDB 數(shù)據(jù)庫(kù)加、刪、改記錄。在 ASP 中， ADO可以看作是一個(gè)服務(wù)器組件 (Server Component)，更簡(jiǎn)單點(diǎn)說(shuō)，是一系列的對(duì)象，應(yīng)用這些功能強(qiáng)大的對(duì)象，即可輕松完成對(duì)數(shù)據(jù)庫(kù)復(fù)雜的操作。 2． Application 或 Session 的結(jié)束事件 (Endevent)。而 Session 對(duì)象僅屬于一位用戶，維持一個(gè)用戶端的信息，其他用戶無(wú)法訪問(wèn)，它創(chuàng)建于一個(gè)不具 有 Session 的用戶向 Server 請(qǐng)求一個(gè) ASP 文件時(shí)，結(jié)束于該 Session 到期（即用戶端超過(guò)某時(shí)間段沒(méi)有向 Server 提出要求或刷新 Web 頁(yè)面）或 Abandon 語(yǔ)句的調(diào)用。當(dāng) Active Server Pages 做下面兩個(gè)動(dòng)作時(shí)， Server便會(huì)去讀 文件： Server 啟動(dòng)之后，一 個(gè)應(yīng)用程序目錄中任一個(gè) ASP 文件被提出第一個(gè) HTTP 請(qǐng)求（ Request）時(shí)。 利用 IIS+ASP 技術(shù)來(lái)集成 Web 前后端所帶來(lái)的強(qiáng)大效益可歸結(jié)為以下幾個(gè)方面： 1． 減少構(gòu)建和維護(hù)成本 2． 加快聯(lián)機(jī)過(guò)程 3． 應(yīng)用軟件 集中在服務(wù)器端開(kāi)發(fā)管理 4． 前端可使用任何瀏覽器（ IE、 Netscape? ..） 5． 后端可存取任何數(shù)據(jù)庫(kù) (SQL、 Access? ..) 6． 可使用任何腳本語(yǔ)言開(kāi)發(fā) (VBScript、 JavaScript、 PERL? ..) 程序和計(jì)算邏輯 前端瀏覽器 ActiveX Server元件 ActiveX Server 元件 后端數(shù)據(jù)庫(kù) 數(shù)據(jù)庫(kù)服務(wù)器 Microsoft IIS + ASP 瀏覽器 圖 ASP 的內(nèi)部特點(diǎn) ASP 內(nèi)部 6 大對(duì)象 ASP 提供了 6 個(gè)功能強(qiáng)大的內(nèi)部對(duì)象，每個(gè)對(duì)象具有各自的屬性（ Property）、方法（ Method），有的還擁有數(shù)據(jù)集合（ Collection）與事件（ Event），它們共同完成 Web 中的一 些重要工作。 IIS(Inter Information Server)是微軟推出的 Windows NT Option Pack 的主要成員，作為 Win2021server 的擴(kuò)展，自推出以來(lái)已經(jīng)有了很大發(fā)展，其體系結(jié)構(gòu)是當(dāng)今市場(chǎng)上最受關(guān)注的 Web服務(wù)器之一。 與 HTML相比， ASP 網(wǎng)頁(yè)具有以下特點(diǎn)： （ 1）利用 ASP 可以實(shí)現(xiàn)突破靜態(tài)網(wǎng)頁(yè)的一些功能限制，實(shí)現(xiàn)動(dòng)態(tài)網(wǎng)頁(yè)技術(shù)； （ 2） ASP 文件是包含在 HTML 代碼所組成的文件中的，易于修改和測(cè)試； （ 3） 服務(wù)器上的 ASP 解釋程序會(huì)在服務(wù)器端制定 ASP 程序，并將結(jié)果以 HTML 格式傳送到客戶端瀏覽器上，因此使用各種瀏覽器都可以正常瀏覽 ASP 所產(chǎn)生的網(wǎng)頁(yè)； （ 4） ASP 提供了一些內(nèi)置對(duì)象，使用這些對(duì)象可以使服務(wù)器端腳本功能更強(qiáng)。 ASP 的網(wǎng)頁(yè)文件的格式是 .asp，現(xiàn)在常用于各種動(dòng)態(tài)網(wǎng)站中。 主要完成 Web 服務(wù)器端的用戶管理、圖書(shū)目錄管理、圖書(shū)信息錄入管理、書(shū)店定單管理、圖書(shū)的瀏覽和查找、書(shū)店購(gòu)物結(jié)帳功能模塊的設(shè) 計(jì)、實(shí)現(xiàn)與完善以及整個(gè)實(shí)驗(yàn)網(wǎng)站的組織建立和測(cè)試工作。本文中數(shù)據(jù)庫(kù)服務(wù)器端采用了 Microsoft Access數(shù)據(jù)庫(kù)作為 ODBC(Open DataBase Connectivity )數(shù)據(jù)源，并以先進(jìn)的 ADO（ ActiveX Data Objects）技術(shù)進(jìn)行數(shù)據(jù)庫(kù)存取等操作，使 Web與數(shù)據(jù)庫(kù)緊密聯(lián)系起來(lái)。隨著網(wǎng)絡(luò)技術(shù)的 日益成熟， ASP技術(shù)在網(wǎng)絡(luò)編程中也變得越來(lái)越重要?，F(xiàn)代企業(yè)需要的是一個(gè)功能強(qiáng)大的，能提供完善的電子商務(wù)服務(wù)的動(dòng)態(tài)商務(wù)網(wǎng)站。著重論述了購(gòu)物車(chē)和購(gòu)書(shū)管理 子系統(tǒng) 的具體功能實(shí)現(xiàn)、關(guān)鍵技術(shù)的使用，以及與其他方法的綜合應(yīng)用。網(wǎng)上書(shū)店 目 錄 1 摘要 2 第一章 前言 2 第二章 編程環(huán)境基礎(chǔ)知識(shí) 3 開(kāi)發(fā)技術(shù)