【正文】 DESC, buyNum DESC, ID DESC set rsObj = (strSQL) 39。作 用：顯示最新推薦圖書 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。因為用到了除法，所以要加上對分母不為 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)惠圖書 39。參 數(shù)： 39。關閉集合，但不能關閉連接，因為其他地方可能要用 Set rsObj = Nothing /table end sub % 程序清單 熱賣圖書過程實現(xiàn)代碼 Sub ShowSpecialProduct(strFilter, nCount) dim strSpecialText if strFilter = Hot then strSpecialText = 熱賣圖書 elseif strFilter = Remended then strSpecialText = 推薦圖書 elseif strFilter = Cheap then strSpecialText = 最優(yōu)惠圖書 else strFilter = Hot strSpecialText = 熱賣圖書 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。顯示購買率最高的前 6 本書，需要傳入?yún)?shù) Hot和 6 call ShowSpecialProduct(Hot, 6) % /TD /TR /TBODY /TABLE ! 推薦圖書 ! 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 ! 打折圖書 ! 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。過程名： 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。會員名： /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ù)庫連接 dim connstr 39。通過調(diào)用方法 close 實現(xiàn)關閉，然后再釋放它。以下是創(chuàng)建 方法： Set Record Set=(sqtStr) 這條語句創(chuàng)建并打開了對象 Record Set，其中 Con是先前創(chuàng)建的鏈接對象，rs是一個字串，代表一條標準的 SQL 語句。 以上兩個步驟缺一不可，因為鏈接對象的創(chuàng)建與打開是兩回事，只有打開了才真正可以使用。=amp。如果數(shù)據(jù)庫的平臺變了，比如我們改用了 SQL Server 的數(shù)據(jù)庫，只要其中表的結(jié)構沒變，我們就不用改寫我們的程序，只要重新在系統(tǒng)中配置 DSN 就行了。比如我們系統(tǒng)中有 Access 的 ODBC 驅(qū)動程序，那么即使我們沒有 Access 軟件，也可以在我們的程序中對一個 Access 的 MDB 數(shù)據(jù)庫加、刪、改記錄。在 ASP 中， ADO可以看作是一個服務器組件 (Server Component)，更簡單點說，是一系列的對象，應用這些功能強大的對象，即可輕松完成對數(shù)據(jù)庫復雜的操作。 2． Application 或 Session 的結(jié)束事件 (Endevent)。而 Session 對象僅屬于一位用戶，維持一個用戶端的信息，其他用戶無法訪問，它創(chuàng)建于一個不具 有 Session 的用戶向 Server 請求一個 ASP 文件時，結(jié)束于該 Session 到期（即用戶端超過某時間段沒有向 Server 提出要求或刷新 Web 頁面）或 Abandon 語句的調(diào)用。當 Active Server Pages 做下面兩個動作時， Server便會去讀 文件： Server 啟動之后，一 個應用程序目錄中任一個 ASP 文件被提出第一個 HTTP 請求（ Request）時。 利用 IIS+ASP 技術來集成 Web 前后端所帶來的強大效益可歸結(jié)為以下幾個方面： 1． 減少構建和維護成本 2． 加快聯(lián)機過程 3． 應用軟件 集中在服務器端開發(fā)管理 4． 前端可使用任何瀏覽器（ IE、 Netscape? ..） 5． 后端可存取任何數(shù)據(jù)庫 (SQL、 Access? ..) 6． 可使用任何腳本語言開發(fā) (VBScript、 JavaScript、 PERL? ..) 程序和計算邏輯 前端瀏覽器 ActiveX Server元件 ActiveX Server 元件 后端數(shù)據(jù)庫 數(shù)據(jù)庫服務器 Microsoft IIS + ASP 瀏覽器 圖 ASP 的內(nèi)部特點 ASP 內(nèi)部 6 大對象 ASP 提供了 6 個功能強大的內(nèi)部對象，每個對象具有各自的屬性（ Property）、方法（ Method），有的還擁有數(shù)據(jù)集合（ Collection）與事件（ Event），它們共同完成 Web 中的一 些重要工作。 IIS(Inter Information Server)是微軟推出的 Windows NT Option Pack 的主要成員，作為 Win2021server 的擴展，自推出以來已經(jīng)有了很大發(fā)展，其體系結(jié)構是當今市場上最受關注的 Web服務器之一。 與 HTML相比， ASP 網(wǎng)頁具有以下特點： （ 1）利用 ASP 可以實現(xiàn)突破靜態(tài)網(wǎng)頁的一些功能限制，實現(xiàn)動態(tài)網(wǎng)頁技術； （ 2） ASP 文件是包含在 HTML 代碼所組成的文件中的，易于修改和測試； （ 3） 服務器上的 ASP 解釋程序會在服務器端制定 ASP 程序，并將結(jié)果以 HTML 格式傳送到客戶端瀏覽器上，因此使用各種瀏覽器都可以正常瀏覽 ASP 所產(chǎn)生的網(wǎng)頁； （ 4） ASP 提供了一些內(nèi)置對象，使用這些對象可以使服務器端腳本功能更強。 ASP 的網(wǎng)頁文件的格式是 .asp，現(xiàn)在常用于各種動態(tài)網(wǎng)站中。 主要完成 Web 服務器端的用戶管理、圖書目錄管理、圖書信息錄入管理、書店定單管理、圖書的瀏覽和查找、書店購物結(jié)帳功能模塊的設 計、實現(xiàn)與完善以及整個實驗網(wǎng)站的組織建立和測試工作。本文中數(shù)據(jù)庫服務器端采用了 Microsoft Access數(shù)據(jù)庫作為 ODBC(Open DataBase Connectivity )數(shù)據(jù)源，并以先進的 ADO（ ActiveX Data Objects）技術進行數(shù)據(jù)庫存取等操作，使 Web與數(shù)據(jù)庫緊密聯(lián)系起來。隨著網(wǎng)絡技術的 日益成熟， ASP技術在網(wǎng)絡編程中也變得越來越重要?，F(xiàn)代企業(yè)需要的是一個功能強大的，能提供完善的電子商務服務的動態(tài)商務網(wǎng)站。著重論述了購物車和購書管理 子系統(tǒng) 的具體功能實現(xiàn)、關鍵技術的使用，以及與其他方法的綜合應用。網(wǎng)上書店 目 錄 1 摘要 2 第一章 前言 2 第二章 編程環(huán)境基礎知識 3 開發(fā)技術