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

　　

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