【導(dǎo)讀】的平臺來實現(xiàn)的網(wǎng)上購物。對于企業(yè)來講，如果能夠?qū)崿F(xiàn)網(wǎng)上交易將大大提高交。易速度節(jié)約交易成本。近幾年，隨著ASP對數(shù)據(jù)庫操作技術(shù)的進一步發(fā)展，使。得這一設(shè)想逐漸成為現(xiàn)實。運用ASP技術(shù)我開發(fā)了一個網(wǎng)上圖書銷售管理系統(tǒng)。根據(jù)各人的喜好購買心儀的書籍。系統(tǒng)會自動為顧客生成訂單，按照顧客所填寫。系統(tǒng)管理員則可以對現(xiàn)有的商品進行添加和編輯，審查。已注冊的客戶并對提交的訂單進行處理。

　　

【正文】 頁面中獲取性別 Gander 存放到表中 // Indenctity=request(Indenctity)//從頁面中獲取身份證號碼 Indenctity 存放//到表中 // cyear=request(cyear)//從頁面中獲取出生年 cyear 存放到表中 // cmonth=request(cmonth)//從頁面中獲取出生月 cmonth 存放到表中 // cday=request(cday)//從頁面中獲取 生日 cday 存放到表中 // Telephone=request(Telephone)//從頁面中獲取電話 Telephone 存放到表中 // Address=trim(request(Address))//從頁面中獲取地址 Address 存放到表中 // Question=trim(request(Question))//從頁面中獲取密碼提問 Question 存放到//表中 // Answer=trim(request(Answer))//從頁面中獲取密碼問題回答 Answer 存到表 // city=trim(request(city))//從頁面中獲取城市 city 存放到表中 // % 圖書展示模塊設(shè)計與實現(xiàn) 圖 主頁中圖書的展示 每周精品推薦 最新推薦圖書頁面 在系統(tǒng)的主頁中就顯示出來了。圖書信息表里以 isBest 作為順 網(wǎng)上圖書銷售管理系統(tǒng)設(shè)計與實現(xiàn) 第 24 頁 共 47 頁 序，用 ASP 語句實現(xiàn)循環(huán)每周推薦的書籍。 //設(shè)置一個變量集 IntroRs 的值為 Cstore 表中字段名為 isBest 的前三項（排序為降序） ORDER BY 是指定以某個欄位做排序， [DESC]是指從大到小排列，若沒有指明，則是從小到 大一個循環(huán)把記錄集中的記錄內(nèi)容全部輸出 （不到結(jié)尾就執(zhí)行） // % Set IntroRs=(select top 3 * from Cstore where isBest0 order by isbest desc)//從商品信息表 Cstore 里循環(huán)讀取出 isBest 不為零的數(shù)據(jù) // do while not % //Cstore中 SmallImage字段名中提取圖片信息，圖片可以鏈接到 ，//并傳遞參數(shù) CStoreID。 // href=?CStoreID=%=IntroRs(CStoreID)%IMG src=/admin/images/%=trim(IntroRs(SmallImage))% //移到下一條記錄，循環(huán)。 // % loop% 每月促銷 % Set IntroRs=(select top 6 * from Cstore where isHave0 order by isbest desc) RowCount=6 %//從商品信息表 Cstore 里循環(huán)讀取出六個 isHave 不為零的數(shù)據(jù) // href=?CStoreID=%=IntroRs(CStoreID)%IMG rc=/admin/images/%=trim(IntroRs(SmallImage))% //從商品信息表 Cstore 里循環(huán)讀取出商品的現(xiàn)價，原價以及圖片名稱信息 // font color=CE0033%=IntroRs(ProductName)%/font font color=CE8400原價： %=formatcurrency(IntroRs(ProductPrice))%現(xiàn)價： span class=style1%=formatcurrency(IntroRs(ProductReducePrice))% %Do While Not AND RowCount0 %//到表尾結(jié)束循環(huán) // % 網(wǎng)上圖書銷售管理系統(tǒng)設(shè)計與實現(xiàn) 第 25 頁 共 47 頁 :if then Exit For next RowCount=RowCount2 39。 % 最新上架 % Set IntroRs=(select top 6 * from Cstore where isHave0 order by isbest desc) RowCount=6 %//從商品信息表 Cstore 里循環(huán)讀取出六個 isHave 不為零的數(shù)據(jù) // href=?CStoreID=%=IntroRs(CStoreID)%IMG rc=/admin/images/%=trim(IntroRs(SmallImage))% //從商品信息表 Cstore 里循環(huán)讀取出商品的現(xiàn)價，原價以及圖片名稱信息 // font color=CE0033%=IntroRs(ProductName)%/font font color=CE8400原價： %=formatcurrency(IntroRs(ProductPrice))%現(xiàn)價： span class=style1 %=formatcurrency(IntroRs(ProductReducePrice))% %Do While Not AND RowCount0 %//到表尾結(jié)束循環(huán) // href=?CStoreID=%=IntroRs(CStoreID)%IMG height=16 alt=加入購物車 //可以直接點擊放入購物車 // % :if then Exit For next RowCount=RowCount2 % 圖書搜索模塊設(shè)計與實現(xiàn) 這個模塊在這個圖書銷售管理系統(tǒng)中是至關(guān)重要的，用戶可以通過這個模塊找到自己需要或喜愛的書，才能決定是否購買，這個模塊也能更好的為用戶展示書籍。模塊的頁面展示也在主頁中顯示出來了。 在主頁中就包含了搜索的功能。 。 網(wǎng)上圖書銷售管理系統(tǒng)設(shè)計與實現(xiàn) 第 26 頁 共 47 頁 !include file=/td 下面是 ，它將用來實現(xiàn)圖書的搜 索功能。 //定義一個函數(shù)判斷搜索的內(nèi)容不能為空。 // //運用到了 JavaScript腳本語言，定義了一個 Juge函數(shù)，有一個 theForm對象，用它來實現(xiàn)對輸入的搜索的關(guān)鍵詞是否為空的判斷。如果為空的話則彈出錯誤信息：搜索條件不能為空！ // script language=JavaScript function Juge(theForm) { if (1) { alert(搜索條件不能為空！ )。 ()。 return (false)。 } } /script 下面是搜索文件 ： //定義搜索的范圍，下拉框中有三個選擇 站內(nèi)搜索、最新推薦、網(wǎng)站贈禮。 點擊搜索跳轉(zhuǎn)到 。首先獲取網(wǎng)頁中寫入的搜索的字段名給變量 schString，然后將搜索的范圍的值給 hsearch變量 。變量 schString為搜索的內(nèi)容，變量 hsearch為搜索的范圍。 schString將作為參數(shù)傳送到顯示書籍詳細內(nèi)容的 。在那個頁面中顯示搜索書籍的相關(guān)詳細信息。 Hsearch將送入圖書信息表 CStore中進行匹配，找到信息相關(guān)的圖書信息。 // % schString=replace(request(schString),39。,39。39。) hsearch=replace(request(hsearch),39。,39。39。) /?catelogName=amp。schString set rs=() if hsearch=0 then sql=select * from CStore where ProductName like 39。%amp。schStringamp。%39。 and isUse=1 and isHave=1//在商品信息表匹配產(chǎn)品名稱相同的信息 // 網(wǎng)上圖書銷售管理系統(tǒng)設(shè)計與實現(xiàn) 第 27 頁 共 47 頁 end if if hsearch=1 then sql=select * from CStore where ProductName like 39。%amp。schStringamp。%39。 and isUse=1 and isHave=1 end if if hsearch=2 then sql=select * from Gift where GiftName like 39。%amp。schStringamp。%39。 and isUse=1 end if % //用 客戶端瀏覽器傳遞給服務(wù)器的值 替換 schString，然后在產(chǎn)品信息表相應(yīng)的字段//名里搜索。然后傳遞 catelogName參數(shù)給 ，顯示產(chǎn)品的詳細信息。 // % if hsearch=1 then if not then do while not % a href=admin/?CStoreID=%=rs(CStoreID)% onclick=return js_callpage()。imgborder=0 src=/admin/images/%=trim(rs(SmallImage)) % alt=點擊看詳細信息 td width=100%原價： font color=greenstrike%=formatcurrency (rs(ProductPrice))% td width=100%現(xiàn)價： font color=red%=formatcurrency(rs(ProductReducePrice ))% td width=100%節(jié)?。?%Reduce rs(ProductPrice),rs(ProductReducePrice)% //reduce用來進行類似累加這樣的操作， 這里的函數(shù)是一個兩個子變量的函數(shù)， //reduce()先對序列的前兩項調(diào)用函數(shù)得到一個結(jié)果，然后對結(jié)果和序列下一項調(diào) //用函數(shù)得到一個新結(jié)果，如此進行到序列尾部。 // 網(wǎng)上圖書銷售管理系統(tǒng)設(shè)計與實現(xiàn) 第 28 頁 共 47 頁 form action= method=post target=_blank input type=hidden name=CStoreID value=%=rs(CStoreID)% input type=hidden name=ProductName value=%=rs(ProductName)% input type=hidden name=ProductPrice value=%=rs(ProductPrice)% input type=hidden name=ProductReducePrice value=%=rs( //ProductReducePrice)% //在商品展示的頁面 ，點擊加入購物車，頁//面將會跳轉(zhuǎn)到購物車的頁面 ，并將傳遞產(chǎn)品名稱的 ID號 CstoreID。//購買的數(shù)量和是否決定購買都將在購物車中修改。 // input type=hidden name=mytype value=insert a href=?CstoreID=%=Rs(CStoreID)% onClick=return js_callpage2()。img src=/images/ alt=加入購物車 border=0 圖 圖書信息展示頁面 //在商品展示的頁面 ，點擊查看詳細信//息鏈接到 ，在顯示圖書的詳細信息的時候，圖書的信息都是運//用 ASP技術(shù)從數(shù)據(jù)表中讀取出來的。其中 ProductContent、 AddDate、 ProductUnit 網(wǎng)上圖書銷售管理系統(tǒng)設(shè)計與實現(xiàn) 第 29 頁 共 47 頁 //和 Forms分別表示產(chǎn)品介紹信息、上架時間、單位、規(guī)格。 // td width=100%產(chǎn)品介紹： br %=replace(rs(ProductContent),vbcrlf,br)%/td td width=100%上架時間： %=datevalue(rs(AddDate))%/td td width=100%單位： %=rs(ProductUnit)%/td td width=100%規(guī)格： %=rs(Forms)%/td td width=25% align=centera href=admin/ ?CStoreID=%=rs(CStoreID)% onclick=return s_callpage()。 title=點擊看詳細信息 %=rs(ProductName)%/a/td % if hsearch=0 then if not then do while not % 購物車管理模塊的設(shè)計與實現(xiàn) 圖 網(wǎng)上圖書銷售管理系統(tǒng)購物車頁面 //進入購物車的首件事就是判斷客戶是否登錄，判斷用戶的登錄名 LoginUsername