【正文】 deliveryid,conn,1,3rs(subject)=trim(request(subject))rs(deliveryidorder)=request(deliveryidorder)rs(methord)=1call MsgBox(成功修改了支付方式！,GoUrl,?action=zhifu)case zhifuadd select * from delivery,conn,1,3rs(subject)=trim(request(subject))rs(deliveryidorder)=request(deliveryidorder)rs(methord)=1call MsgBox(成功添加了新的支付方式！,GoUrl,?action=zhifu)end selectset rs=nothing%htmlheadmeta equiv=ContentType content=text/html。deliveryid ?action=deliverycase zhifudel delete from delivery where deliveryid=amp。/td /tr/table訂單模塊主要代碼：%LANGUAGE=VBSCRIPT CODEPAGE=936%!include file=inc/!include file=inc/ !include file=inc/ %if session(rank)1 thencall Msgbox(你的權(quán)限不夠！,Back,None)end if%%dim action,deliveryiddeliveryid=(id)action=(action)set rs=()select case actioncase deliverysave select * from delivery where deliveryid=amp。/td/trtrtdamp。()elseii=0do while not %trtd align=lefta href=?id=%=rsLeft(id)% target=_blankimg src=images/ width=18 height=18 border=0%=strvalue(trim(rsLeft(name)),20)%/a(%=rsLeft(solded)%)/td/tr%ii=ii+1if ii=10 then exit doloopset rsLeft=nothingend if%/table/td/trtrtdamp。 and first=1 order by sortsorder,conn,1,1do while not %trtd class=daosuba href=?aid=%=rsLeft(categoryid)%amp。rsLeft(categoryid)% style=display:nonetable width=100% border=0 cellspacing=2 cellpadding=2%dim rsSubLeftset rsSubLeft=() select sorts,sortsid from sorts where categoryid=amp。/td/tr% select category,categoryid from category where first=1,conn,1,1do while not %trtd height=23background=images/class=daoonClick=Menu(%=mamp。/tdtd width=135a href= target=_blank class=whitefont購物車/結(jié)帳/a|a href= target=_parent class=whitefont帳號/a|a href= target=_parent class=whitefont注消/a/td/tr/table/td/trtrtdimg src=images/ width=212 height=23/td/trtrtdamp。}}/scripttable width=212 border=0 align=left cellpadding=0 cellspacing=0trtd align=left valign=topimg src=images/ width=212 height=47/td/trtrtd align=left valign=topimg src=images/ width=212 height=13/td/trtrtd height=188 align=center valign=top background=images/ iframe name=pcart src= width=185 height=188 scrolling=no frameborder=0/iframe/td/trtrtd width=212 height=36 align=center background=images/table width=161 border=0 cellspacing=0 cellpadding=0trtd width=26amp。/td/tr/table/td/trtrtd colspan=4 align=centerimg src=images/ width=568 height=9/td/tr/table/td/tr/table/td/tr/table!include file=/body/html用戶模塊主要代碼：%dim ii,rsLeftset rsLeft=()%script language=javascriptfunction Menu(term){if(==none){=。action=add target=pcartimg src=images/ width=23 height=20 border=0購物車/a /td/tr/table/td% end if %/trtrtd colspan=4 align=centerimg src=images/ width=568 height=9/td/tr%i=i+1if i=5 then exit doif not then loopset rs=nothing%tr align=righttd colspan=4table width=100 border=0 cellspacing=0 cellpadding=2trtd align=lefta href=img src=images/ width=42 height=15 border=0/a/tdtd width=10amp。17%39。end ifi=0do while not %trtd width=17% height=130 align=center valign=middle class=shadowa href=?id=%=trim(rs(id))% target=_blankimg src=%=trim(rs(pic))% width=85 height=125 border=0/a/tdtd width=33% align=left valign=toptable width=100% border=0 cellspacing=1 cellpadding=0trtd colspan=2img src=images/ width=18 height=18span class=booktitle%=strvalue(trim(rs(name)),24)%/span/td/trtrtd height=40 colspan=2 class=bookinfo%=trim(rs(desc))%brbr/td/trtrtd定價:span class=price1%=rs(price1) %/span元/tdtd作者:%=rs(author) %/td/trtrtd優(yōu)惠價:span class=price2%=rs(price2) %/span元/tdtdVIP價:span class=viprice%=rs(vipprice) %/span元/td/trtrtd colspan=2 align=centera href=?id=%=rs(id)%amp。nbsp。/tdtd/tdelse%td width=17% height=130 align=center valign=middle class=shadowa href=?id=%=trim(rs(id))% target=_blankimg src=%=trim(rs(pic))% width=85 height=125 border=0/a/tdtd width=33% align=left valign=toptable width=100% border=0 cellspacing=1 cellpadding=0trtd colspan=2img src=images/ width=18 height=18span class=booktitle%=strvalue(trim(rs(name)),24)%/span/td/trtrtd height=40 colspan=2 class=bookinfo%=trim(rs(desc))%brbr/td/trtrtd定價:span class=price1%=rs(price1) %/span元/tdtd作者:%=rs(author) %/td/trtrtd優(yōu)惠價:span class=price2%=rs(price2) %/span元/tdtdVIP價:span class=viprice%=rs(vipprice) %/span元/td/trtr td colspan=2 align=centera href=?id=%=rs(id)%amp。action=add target=pcartimg src=images/ width=23 height=20 border=0購物車/a /td/tr/table/td%if then td width=39。39。參考文獻(xiàn)[1] [M].北京：清華大學(xué)出版社，2002[2] 楊威 [M].北京:人民郵電出版社，2001[3] 楊冀川jSP動態(tài)網(wǎng)站設(shè)計實戰(zhàn)[M].北京：機械工業(yè)出版社，2000[4] [M].北京：科學(xué)出版社，2001[5] 余雷，[M].北京：清華大學(xué)出版社，2003[6] 高屹，[M].北京：機械工業(yè)出版社，2008：2299.[7] 頁子青jSP網(wǎng)絡(luò)開發(fā)入門與實踐[M].北京：人民郵電出版社，2006：449457.[8] 王華章web 網(wǎng)絡(luò)系統(tǒng)開發(fā)[M].北京：中國鐵道出版社，2006：303331.[9] 王珊，[M].北京：高等教育出版社，2008：1222.[10] 彭雪冬，[M].北京：人民郵電出版社，2005：252258.[11] [M].北京：電子工業(yè)出版社，2006：247300.[12] [M].北京：清華大學(xué)出版社，2006：401501[13] 王文．信息查詢和系統(tǒng)檢索［J］.華僑大學(xué)學(xué)報(自然科學(xué)報).[14] 肖志剛,張維,韓璐 等．jsP動態(tài)網(wǎng)頁設(shè)計應(yīng)用培訓(xùn)教程［M］.西安：[15] 鄧文淵，陳惠貞javaweb開發(fā)教程（第一版）北京：中國鐵道出版社，2003 附錄部分程序代碼：首頁模塊主要代碼：%LANGUAGE=VBSCRIPT CODEPAGE=936%!include file=manage/inc/ !include file=inc/ %dim iset rs=()%htmlheadmeta equiv=ContentType content=text/html。這個系統(tǒng)可以滿足顧客不受地域的限制實現(xiàn)網(wǎng)上購物這一功能，我相信后續(xù)只要在這個