基于ASP的筆記本銷售網站的設計與實現摘要ASP是當今流行的Web應用程序開發技術之一。作為一種服務器端腳本編寫環境，它將HTML語言、腳本代碼和服務器組件有機地結合在一起，可以用來創建交互式的動態網頁和具有數據庫訪問功能的Web應用程序。在此簡單介紹它的基本設計方法，并對數據庫的設計思想以及對前臺各部分設計思想進行了詳細的分析。筆記本銷售網站是一種電子商務類網站，能提供一種用戶足不出戶就能選購自己喜歡的筆記本電腦的快捷購物方式。銷售網站一般都需要具有對商品介紹的新聞發布系統和用購物車選購商品以及查詢商品得功能。根據這些銷售網站的這些功能采用的是WindowsXP+ASP+SQLServer2000的技術進行開發，最后比較好的的實現了一個在線購物網站應具備的基本功能，并且界面友好，操作簡單。關鍵詞：筆記本銷售網站；在線購物；ASPAbstractNowadays,ASPisapopulardevelopmenttechnologyofWebapplication.Asascript-programmingtechnologyforserver,itcombinesHTMLlanguage,scriptcodeandserverpackagetogether,anditcanbeusedforestablishingWebapplicationwhichhasinteractivelydynamicwebpage.Itsbasicdesignmethodisintroducedbriefly,andtheideasofthedatabasedesignandtheforegrounddesignareanalyzedindetail.Thenotebook-sellwebsiteisonekindofelectroniccommerceclasswebsite.Itcanprovideaquickshoppingwayforsellingthenotebookcomputerandtheuserscandoshoppingathomeeasily.Thewebsitegenerallycontainsnewspublicationwhichintroducesthecommoditytoissueandtheshoppingcartwhichprovidesselectionandinquiryofcommodity.Accordingtothesefunctions,theWindowsXP+ASP+SQLServer2000technologyareusedinthedevelopment.Finallyaquitegoodon-lineshoppingwebsitehasbeenimplemented.Keywords:Thenotebooksellingthewebsite;On-lineshopping;ASP

目錄1引言 11.1筆記本銷售網站設計的前期準備 11.2開發系統應遵循的原則 21.2.1普通用戶對系統的要求 21.2.2管理員對系統的要求 21.3ASP簡介 22筆記本銷售網站的系統需求分析 32.1筆記本銷售網站的概述 32.1.1筆記本銷售網站簡介 32.1.2系統的開發工具和環境簡介 32.1.3系統開發環境 42.1.4筆記本電腦銷售網站實現的功能 52.2數據庫用戶及權限管理 52.3筆記本銷售網站中模塊劃分 52.3.1管理員功能模塊 52.3.2用戶功能模塊 73數據庫的設計與實現 73.1數據庫的設計 83.2數據庫的連接 94系統主要模塊界面 104.1登錄模塊界面 104.1.1普通用戶登錄界面 104.1.2管理員登錄界面 114.2用戶注冊模塊界面 114.3商品查詢模塊界面 134.4商品添加及修改模塊界面 154.5商品刪除模塊界面 18結論 19參考文獻 20致謝 211引言20世紀末，隨著計算機科學的發展，數據庫技術在Internet中的應用越來越廣泛，為廣大網絡用戶提供了更加周到和人性化的服務。個性化已逐漸成為當今Web應用的潮流。據估計，目前Internet上已有上百萬個Web站點，其內容范圍跨越了教育科研、文化事業、金融、商業、新聞出版、娛樂、體育等各個領域，其用戶群十分龐大，因此，建設一個好的Web站點對于一個機構的發展十分重要。網上筆記本銷售網站是目前Internet上廣泛使用的在線系統之一。網上筆記本銷售網站要實現的功能非常多。首先，為了銷售筆記本電腦，給電腦做廣告是其中一部分，系統必須在醒目的位置給出筆記本電腦的信息，包括筆記本電腦的名稱、編號、價格以及筆記本電腦的圖片介紹，并對瀏覽次數多和訂購數量多的筆記本電腦在醒目位置向用戶進行推薦。同時，筆記本電腦銷售過程中還需要對用戶的購物車進行管理，允許用戶執行如取消訂購，送收銀臺等操作。最后，系統必須完成結帳的功能，從而完成整個購物的流程。其次，因為在線銷售系統中筆記本電腦的種類很多，某個用戶想要找到自己需要的筆記本電腦就比較困難了，所以系統提供了查找的功能，將電腦分類瀏覽，給用戶帶來方便。另外，為了保證數據庫的安全，及電腦交易的順利進行，系統還需要對用戶進行管理，最簡單的一點就是需要用戶注冊，進行身份的驗證。最后，系統特別提供了數據庫管理的功能，允許具有管理權限的人員對系統數據庫進行操作，包括添加、刪除、修改記錄等等。網上筆記本銷售網站主要是用ASP和SQL來完成系統設計的。Microsoft推出的ASP(ActiveServerPages，動態服務器網)技術可以開發出滿足企業、組織和個人需求的各種站點。ASP通過服務器端腳本的方式實現服務器端動態網頁，支持使用ActiveX組件擴展其功能，因此借助ASP，用戶可以開發出功能強大的站點。同時Web已經不再局限于僅僅提供大量的信息服務這是最，Web技術的發展，使得那些具有交互動態頁面、有條理的數據庫查詢、豐富信息內容的網頁成為最吸引人的網頁。數據庫技術為動態網頁的發展提供了功能強大的后臺數據處理，而SQLServer數據庫是目前最流行的關系型數據庫系統之一，由于他對服務器的要求較低，因此也是最適合大眾安裝并上機實踐的完整的數據庫管理系統。數據庫技術與網站的結合是當今Web技術的一個熱點。有了數據庫的支持，可以擴展網頁的功能，可以方便地設計出交互式頁面，可以構造功能更加強大的后臺管理系統，可以為網站的更新、維護提供極大的方便。1.1筆記本銷售網站設計的前期準備（1）安裝WINDOWSXP系統、SQLSERVER2000數據庫，配置IIS.（2）熟悉和掌握SQLSERVER2000中采用企業管理器建庫、建表的方法。（3）能夠靈活地在表中進行添加、修改、刪除數據。（4）能熟悉地運用ASP進行頁面制作,了解ASP中的常用組件對象及服務器控件。（5）對一些簡單代碼有一定地認識。 （6）對做設計的整體流程有基本的計劃和安排。1.2開發系統應遵循的原則1.2.1普通用戶對（1）系統要有友好的界面，并提供商品搜索和商品分類瀏覽，使用戶可以方便而快速地查詢到自己需要的電腦。（2）有健全的售后投訴管理系統，當用戶希望與本站就有關電腦質量問題或者服務問題進行協商時，可以通過客戶投訴將所要協商的內容提交給本站。1.2.2（1）系統能夠提供一個友好的管理員界面，使管理員可以對系統數據庫中的數據進行有效的管理。（2）系統能夠提供一個友好的訂單管理界面，管理員可以對用戶訂單信息進行處理。（3）提供一個友好的新品入庫界面，管理員可以對新品進行添加處理。（4）提供一個友好的商品管理界面，管理員可以對電腦資料進行修改和刪除處理。（5）提供一個友好的用戶管理界面，管理員可以對用戶進行信息查看和刪除管理。（6）提供一個友好的用戶投訴管理界面，管理員可以對用戶的投訴進行處理和提供解決方案。1.3ASP簡介ASP是ActiveServerPage的縮寫，是微軟公司推出的Web應用程序開發技術。ASP可以訪問數據庫，并執行相應的錄入、查詢、刪除和修改的操作；還可以根據服務器的配置讀寫Web服務端的文件；能夠控制和管理用戶的訪問權限，限制用戶在網站的行為。ASP與其他方式開發網絡數據庫的優點在于：ASP是基于MicrosoftWindowsNT和MicrosoftInternetInformationServer的開發式腳本開發環境，它很好的把HTML和腳本開發融合在一起，提高了編程的靈活性，降低了開發難度[1]。ASP中的腳本在Web服務端運行，而不是在客戶端瀏覽器中運行，這一措施使客戶的瀏覽器無須擔心服務器端的網頁是用什么腳本編寫的，ASP都會生成一個符合HTML標準的網頁送到客戶端，ASP還將HTML完全融合在一起，創建簡單，不需要編譯、鏈接，腳本可以在ASP環境下直接運行；ASP直接建立在Web服務器中，并且做為Web一個服務運行，支持多用戶，多線程。ASP具有的優點大致歸納如下：⑴無需編譯：ASP程序直接由Web服務器的動態庫asp.dll解釋執行，無需編譯和連接；⑵獨立于瀏覽器：由于ASP程序在服務器端解釋執行，因此客戶端用戶只要使用系統自帶的瀏覽器，即可瀏覽采用ASP設計的網頁；⑶安全性高：ASP程序在服務端執行，客戶端瀏覽器看到的只是HTML文件，可以避免源程序被泄漏；⑷可擴展性好：ASP具有很強的擴展性，開發人員可以根據需要使用VisualBasic或VisualC等多種語言制作組件供ASP程序調用；⑸執行效率高：ASP提供最優化的多線程環境，可在一個進程中創建多個線程以同時為多個瀏覽者提供服務，既節約了服務器的資源，又提高了程序執行效率。2筆記本銷售網站的系統需求分析2.1筆記本銷售網站的概述2.1.1筆記本銷售網站簡介筆記本銷售網站利用Internet的優勢，使用戶足不出戶就可以買到自己需要的筆記本電腦，從而打破了傳統的電腦城經營模式。筆記本銷售網站的宗旨在于方便用戶購買自己喜愛的電腦，因此筆記本銷售網站應該實現所有方便用戶購買電腦所必需的功能和服務。同時，任何一個銷售網站都需要進行管理，筆記本銷售網站也不例外。本系統是在WindowsXP+SQLServer2000建立WEB服務器，WEB數據庫的解決方案是IIS系列+ASP；以SQLServer2000為數據庫的操作平臺，建立筆記本銷售網站的數據信息表；使用ASP進行網絡編程，實現利用IE瀏覽器為平臺進行在線查找，購買等一系列的操作。2.1.2系統的開發工具和環境簡介筆記本銷售網站是為了給用戶提供一個良好的查詢和購買環境，系統采用了如下軟件工具：MicrosoftSQLServer2000SQLServer2000是一個分布式的關系型數據庫管理系統，具有客戶機、服務器體系結構[2]，采用了一種TRANSACT-SQL的SQL語言，在客戶機和服務器之間傳遞客戶機的請求和服務器的處理結果。用戶可以使用SQL語言在數據庫中執行數據庫的建立、查詢、更新以及各種數據控制。數據庫系統選擇是狹義軟件開發的第一步，選擇數據庫應用中存放數據的數據庫系統此時需要考慮以下因素：應用的并發處理要求。應用是否存在多用戶同時操作的可能？如果需要并發處理能力，我們需要選擇大型的數據庫服務器作為數據存放的倉庫。在一般的桌面應用中，使用單用戶的數據庫系統就足夠了。應用的事務處理量。應該考慮每天、每小時、甚至每分鐘的事務處理數量，在業務量大的情況下，應該選擇穩定性比較強的數據庫系統作為數據庫存放倉庫。應用的數據安全性。數據是否需要高度的安全保證，數據是否涉及商業的經濟命脈？一般只有大型的數據庫服務器才具有數據庫安全保證，比如在銀行的數據庫應用中，安全性是最重要的因素。（2）ASP（ActiveServerPages）它是常用的開發動態頁面的技術，ASP融入了ADO（ActiveXDataObject數據對象）技術，采用了VBScript、C++和JavaScript等多種語言編寫。它還具有更強大的錯誤處理和調試特性、更好的安全管理機制、更多的內部控鍵等。（3）DreamweaverDreamweaverMX2004是建立Web站點和應用程序的專業工具。它將可視布局工具、應用程序開發功能和代碼編輯支持組合為一個功能強大的工具，使每個級別的開發人員和設計人員都可利用它快速創建界面吸引人并且基于標準的站點和應用程序。從對基于CSS的設計提供領先的支持到手動編碼功能，Dreamweaver在一個集成和高效的環境中為專業人員提供了所需的工具。開發人員可以將其選擇的服務器技術與Dreamweaver配合使用，建立將用戶連接到數據庫、Web服務和舊式系統的強大Internet應用程序。2.1.3系統開發環境在WindowsXP中自帶Internet信息服務（ISS）的5.0版和IE5.0所選用的數據庫平臺是SQLServer2000的標準版。對應于上述的軟件需求，硬件方能也有相應的要求。當然，快速的CPU、大容量的內存、足夠的硬盤空間，是保證整個系統正常運行的必要條件。目前服務器的主流配置都能保證該系統正常運行。ASP（ActiveServerPages）是一個基于服務器的腳本運行環境，借助它可以創建動態、交互式的Web服務器應用程序；它可以將Web服務器上的網頁由服務器端翻譯并執行后發送出標準的HTML和客戶端腳本文件給客戶，這樣減輕了客戶端瀏覽器的負擔，大大提高了交互速度[3]。2.1.4筆記本電腦銷售網站實現的功能1）系統的用戶登錄及身份驗證要求A．系統用戶注冊B．驗證用戶的注冊信息。C．系統用戶進入系統的身份驗證。D．系統用戶在不同的頁面瀏覽時的身份驗證。2）筆記本銷售網站系統要求A．允許用戶瀏覽所有商品。B.允許用戶按電腦的種類進行查找。C．允許用戶購買自己選定的筆記本電腦。D．允許用戶對購物車進行管理。E．系統實現訂單的處理。F．系統完成整個購物流程。G.能實現用戶購買后的投訴功能。3）筆記本銷售網站的管理子系統要求。A．對管理員的身份進行驗證。B．對數據庫中的電腦信息進行管理。C．對數據庫中的訂單信息進行管理。D．對數據庫中的投訴信息進行管理。2.2數據庫用戶及權限管理數據庫系統的安全性是非常重要的。數據庫的安全性是指保護數據庫以防止不合法的使用所造成的數據泄漏、更改或者破壞。像SQLServer2000這樣的大型網絡數據庫系統在實現數據上網，共享信息的同時，必然涉及到用戶對數據庫的訪問，因此根據用戶類型的不同來授予他們不同的訪問權限是很有必要的。SQLServer2000雖然自帶一個超級管理員sa，但是它的操作權限很高，直接用它來操作數據庫是非常危險的。所以，設計者一般都不會使用它來直接操作數據庫，以免造成難以估量的損失。考慮到以上因素，在本系統中新建了一個管理員admin。設定以后管理員就可以對網上鞋店的基本信息表進行讀取、添加、插入、更新、刪除等操作。普通用戶只能在登錄成功后對筆記本電腦銷售網站提供的基本信息表進行讀取，而沒有操作權限[4]。2.3筆記本銷售網站中模塊劃分根據系統需求，筆記本銷售網站中可以分為管理員功能模塊和用戶功能模塊。2.3.1管理員功能模塊根據系統的功能分析，它具有的功能主要是管理功能，應該包括用戶管理、商品信息管理（添加商品、修改商品信息、刪除商品）、商品類別管理、訂單管理、對用戶的投訴進行管理等，其功能圖如下。添加管理員添加管理員修改管理員信息刪除管理員查看用戶信息刪除用戶添加商品修改商品價格刪除商品管理員管理普通用戶管理添加類別刪除類別修改類別類別管理管理員功能模塊圖商品管理用戶管理訂單管理投訴處理修改密碼退出登錄圖1管理員功能模塊圖2.3.2用戶功能模塊關鍵字搜索放入購物車關鍵字搜索放入購物車送收銀臺取消訂購繼續購物確認購買取消訂購類別搜索繼續購物搜索商品查看訂單瀏覽商品信息查看購物車修改用戶信息退出登錄修改密碼用戶功能模塊圖去收銀臺客戶投訴圖2用戶功能模塊圖3數據庫的設計與實現 SQLServer2000與FoxBASE、FoxPro、Access等桌面型數據庫不同，它具有一些新特性：(1)全面支持Web功能。(2)高效的可靠性、靈活的可伸縮性、簡單的管理。由于具備上述優勢，因此在做Web應用時可以選擇SQLServer2000作為后臺的數據庫。3.1數據庫的設計根據系統功能設計的要求以及功能模塊的劃分，下面給出筆記本銷售網站的各個組成部分的數據項和數據結構[5]。(1)對于系統用戶信息數據分析，可以列出以下數據項：用戶信息表（Users）：用戶ID(Userid)、用戶姓名(UserName)、性別（Sex）、密碼(Pwd)、郵箱(Email)、用戶地址（address）、用戶聯系電話（Telephone）、用戶手機（Mobile），得出用戶信息表如下。表1用戶信息表（Users）列名數據類型長度允許空UserIdvarchar20不允許空Pwdvarchar20是UserNamevarchar50是Sexbit1是Addressvarchar1000是Emailvarchar50是Telephonevarchar100是Mobilevarchar50是(2)對于系統的商品信息數據分析，可以列出以下數據項：筆記本的記錄信息(Goods)：筆記本的ID(id)、類型ID(Typeid)、筆記本的名稱(Name)、筆記本編號(Sn_Number)、生產公司(Producer)、包裝型號(Package)、銷售價格（SalePrice）、進貨價格（StorePrice）、筆記本簡介（Content）、入庫時間（PostTime）、瀏覽次數（ReadCount）購買次數（BuyCount）、筆記本圖片（ImageFile）表2系統存儲筆記本電腦的表(Goods)列名數據類型長度允許空Idint4不允許空Typeidint4是NameVarchar50是Sn_NumberVarchar50是ProducerVarchar50是PackageVarchar50是SalePriceFloat8是StorePricefloat8是ContentVarchar1000是PostTimedatetime8是ReadCountint4是BuyCountint4是ImageFileVarchar100是2）筆記本的類型信息(Goodstype)：ID、類型名(Type)。表3系統中筆記本的類型表Goodstype列名數據類型長度允許空Idint4不允許空Typevarchar50是3）存儲管理員的信息(Admin)：管理員ID（AdminID）、密碼(passwd)、管理員名（Name）。表4存儲管理員信息表（Admin）列名數據類型長度允許空AdminIdvarchar20不允許空PassWdVarchar20是NameVarchar50是4）筆記本訂單信息(Basket)：交易的ID(ID)、用戶名（UserID）、商品編號（GoodsID）、交易的日期(Ordertime)、選購數量（Ordercount）、商品單價（SalePrice）、訂單號(OrderNumber)、管理員處理訂單的日期（PostTime）。表5系統的訂單表（Basket）列名數據類型長度允許空IDint4不允許空UserIDvarchar20是GoodsIdint4是OrderTimeDatetime8是OrderCountint4是SalePricefloat8是OrderNumbervarchar50是PostTimedatetime8是5)用戶投訴信息（Complain）：投訴ID（Id）、投訴時間（Posttime）、投訴用戶名（Userid）、訂單號（OrderNumber）、投訴內容（Content）、解決方案（Rerult）、當前狀態（Flag）。表6用戶投訴表（Complain）列名數據類型長度允許空Idint4不允許空Posttimedatetime8是UserIdvarchar20是OrderNumbervarchar50是Contentvarchar1000是Resultvarchar1000是Flagbit1是3.2數據庫的連接MicrosoftSQLServer是一種數據庫管理系統，可以用來方便、高效地管理大量的用戶數據。一般情況下，SQLServer數據庫有兩種連接數據庫的方式。一種是采用用戶名和密碼連接數據庫；另一種是采用系統集成驗證連接數據庫，此時不再需要驗證用戶的名稱和密碼，直接采用操作系統登錄用戶的信任連接。我采用的是第一種連接方式，其基本屬性有：DRIVER（），SERVER（服務器）表示數據庫所在機器的名稱，UID（用戶ID），PWD（用戶密碼），Database（數據庫名稱）[6]。連接數據庫的具體代碼如下：<%DimConnDimConnStrSetConnStr="DRIVER={SQLServer};SERVER=.;UID=sa;PWD=sa;Database=Shop"Conn.OpenConnStr%>4系統主要模塊界面4.1登錄模塊界面4.1.1普通用戶登錄界面圖3普通用戶登錄界面<%//isUser用來判斷是否為注冊用戶，如果不是則為False，否則為TrueDimisUserIsUser=FalseUid=Session("user_id")Pwd=Session("user_pwd")Ifuid<>""Andpwd<>""Then//判斷用戶名和密碼是否正確sql="Select*FromUsersWhereUserId='"&uid&"'AndPwd='"&pwd&"'"Setrs=conn.Execute(sql)IfNotrs.EofthenIsUser=True%>4.1.2管理員登錄界面圖4管理員登錄界面<%//根據錄入的用戶信息查詢數密碼AdminId=Request.Form("loginname")AdminPwd=Request.Form("password")IfAdminId<>""Thensql="Select*FromAdminWhereAdminId='"&AdminId&"'AndPasswd='"&AdminPwd&"'"Setrsa=Conn.Execute(sql)//如果用戶存在，則轉向到AdminIndex.aspIfNotrsa.EOFThenResponse.Redirect("AdminIndex.asp")EndIfEndIf%>4.2用戶注冊模塊界面圖5用戶注冊界面<%Dimsql,uidSetrs=Server.CreateObject("ADODB.RECORDSET")IfRequest.Form("isadd")="new"ThenUid=Request("userid")'判斷此用戶是否存在SetrsUser=Conn.Execute("Select*fromUserswhereUserId='"&uid&"'")IfNotrsUser.EofThen%><scriptlanguage="javascript">alert("已經存在此用戶名！");History.Go(-1);</script><%ElseSetrsUser=Nothing'在數據庫表Users中插入新用戶信息sql="Select*FromUsers"rs.Opensql,conn,1,3…EndIfElse'更新用戶信息uid=Request.QueryString("uid")sql="UpdateUsersSetUserName='"&Request("username")&"',Sex='"&Request("sex")&"',"&_"Address='"&Request("address")&"',Telephone='"&Request("telephone")&"',Mobile='"&Request("mobile")&"',Email='"&Request("email")&"'"&_ "WhereUserId='"&uid&"'" Conn.Execute(sql)EndIfResponse.Write"<h2>用戶信息已成功保存！</h2>"%></body><scriptlanguage="javascript">opener.location.reload();SetTimeout("window.close()",800);</script></html>//后臺設計4.3商品查詢模塊界面圖6商品查詢界面<%setrs=server.createobject("adodb.recordset")Dimid,inameid=Request.QueryString("id")sql="Select*FromGoodsWhereid="&Cint(id)SetrsGoods=conn.Execute(sql)IfrsGoods.EofThenResponse.Write"沒有此商品信息"Response.EndElseiname=rsGoods("ImageFile")'更新閱讀次數sql="UpdateGoodsSetReadCount=ReadCount+1Whereid="&Cint(id)conn.Execute(sql)%><%sql="SELECT*FROMGoodsTypeWHEREid="&rsGoods("typeid")rs.Opensql,conn,3,3Ifrs.EOFThen%>沒有類別信息<%ElseResponse.Write(rs("type"))EndIfrs.Close%>圖7商品搜索界面<%'取得查詢條件Dimitype,gname,whereTo,tpidSetrs=Server.CreateObject("ADODB.RECORDSET")tpid=Request.QueryString("tpid")'根據不同情況生成WHERE子句whereToIftpid<>""Then'顯示指定分類的所有商品信息，tpid代表分類編號whereTo="WhereTypeId="&Cint(tpid)itype=iflagElse'在指定分類中，查詢指定商品itype=Request.QueryString("tid")gname=Request.QueryString("gname")IfisNull(gname)OrLen(gname)=0ThenwhereTo="WhereTypeId="&Cint(itype)ElsewhereTo="WhereTypeId="&Cint(itype)&"AndNameLike'%"&gname&"%'"EndIfEndIf%>4.4商品添加及修改模塊界面圖8添加商品界面<%Functionchangechr(str)changechr=Replace(str,""," ")changechr=Replace(changechr,Chr(13),"<br>")EndFunctionDimGNameDimStrAction'得到動作參數，如果為add則表示添加新商品，如果為update則表示更改商品StrAction=Request.QueryString("action")'取得商品題目和內容和提交人用戶名GName=Trim(Request("name"))GName=Replace(GName,"'","‘")rqtContent=changechr(Request("Content"))'替換函數rqtContent=Replace(rqtContent,"'","‘")'替換內容中的單引號Setrs=Server.CreateObject("ADODB.RECORDSET")IfStrAction="add"Then'在數據庫表Goods中插入新商品信息sql="Select*fromGoods"rs.Opensql,Conn,1,3rs.AddNew…rs.UpdateElse'更改此商品信息id=Request.QueryString("id")sql="UpdateGoodsSetTypeId="&CInt(Request.Form("Typeid"))&",Name='"&GName&"',Sn_Number='"&Request("number")&"',Posttime='"&now()&"'"&_",SalePrice="&Request("saleprice")&",StorePrice="&Request("storeprice")&",Producer='"&Request("producer")&"'"&_",Package='"&Request("package")&"',Content='"&rqtContent&"'Whereid="&CInt(id)Conn.Execute(sql)EndIfSetrs=Nothingresponse.write"<h3>商品成功保存</h3>"%>圖9修改商品信息界面<%Functionchangechr(str)changechr=Replace(str,""," ")changechr=Replace(changechr,Chr(13),"<br>")EndFunctionDimGNameDimStrAction'得到動作參數，如果為add則表示添加新商品，如果為update則表示更改商品StrAction=Request.QueryString("action")'取得商品題目和內容和提交人用戶名GName=Trim(Request("name"))GName=Replace(GName,"'","‘")rqtContent=changechr(Request("Content"))'替換函數rqtContent=Replace(rqtContent,"'","‘")'替換內容中的單引號Setrs=Server.CreateObject("ADODB.RECORDSET")IfStrAction="add"Then'在數據庫表Goods中插入新商品信息sql="Select*fromGoods"rs.Opensql,Conn,1,3…Else'更改此商品信息id=Request.QueryString("id")sql="UpdateGoodsSetTypeId="&CInt(Request.Form("Typeid"))&",Name='"&GName&"',Sn_Number='"&Request("number")&"',Posttime='"&now()&"'"&_ ",SalePrice="&Request("saleprice")&",StorePrice="&Request("storeprice")&",Producer='"&Request("producer")&"'"&_ ",Package='"&Request("package")&"',Content='"&rqtContent&"'Whereid="&CInt(