【正文】 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。action=add target=pcartimg src=images/ width=23 height=20 border=0購物車/a /td/tr/table/td%if then td width=39。17%39。/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/tr trtd 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% 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。nbsp。/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){=。 }else{=none。}}/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。nbsp。/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。nbsp。/td/tr% select category,categoryid from category where first=1,conn,1,1do while not %trtd height=23background=images/class=daoonClick=Menu(%=mamp。rsLeft(categoryid)%)%=rsLeft(category)%/td/trtrtd height=23 id=%=mamp。rsLeft(categoryid)% style=display:nonetable width=100% border=0 cellspacing=2 cellpadding=2%dim rsSubLeftset rsSubLeft=() select sorts,sortsid from sorts where categoryid=amp。rsLeft(categoryid)amp。 and first=1 order by sortsorder,conn,1,1do while not %trtd class=daosuba href=?aid=%=rsLeft(categoryid)%amp。nid=%=rsSubLeft(sortsid)%%=rsSubLeft(sorts)%/a/td/tr%loopset rsSubLeft=nothing%/table/td/tr%loop%trtdimg src=images/ width=212 height=32/td/trtrtd height=100 align=center valign=toptable width=100% border=0 cellspacing=2 cellpadding=1% select top 10 id,name,solded from product order by solded desc,conn,1,1if and then 　　對不起， 暫時還沒有商品！39。()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。nbsp。/td/trtrtdamp。nbsp。/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。deliveryid,conn,1,3rs(subject)=trim(request(subject))rs(deliveryidorder)=request(deliveryidorder)rs(fee)=request(fee)rs(methord)=0call MsgBox(成功修改了送貨方式！,GoUrl,?action=delivery)case deliveryadd select * from delivery,conn,1,3rs(subject)=trim(request(subject))rs(deliveryidorder)=request(deliveryidorder)rs(fee)=request(fee)rs(methord)=0call MsgBox(成功添加了新的送貨方式！,GoUrl,?action=delivery)case deliverydel delete from delivery where deliveryid=amp。deliveryid ?action=deliverycase zhifudel delete from delivery where deliveryid=amp。deliveryid ?action=zhifucase zhifusave select * from delivery where deliveryid=amp。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。 charset=gb2312title 網(wǎng)上書店/titlelink href=../ rel=stylesheet type=text/css/headbody!include file=table width