網(wǎng)上購(gòu)物系統(tǒng)結(jié)構(gòu)設(shè)計(jì)-資料下載頁(yè)
2025-06-30 12:39本頁(yè)面
【正文】 le)%/font/bbr /td/tr form action= method=post name=research target=_blanktr td valign=top align=leftwidth=100% %for i=1 to 6 if rs(Selectamp。i) then % input style=border: 0 %if i=1 then%checked%end if% name=Options type=radio value=%=i% %=i%.%=rs(Selectamp。i)%br %end if next% /td /tr tr td width=100% height=30 align=center input type=image border=0 name=submit src=images/ width=59 height=19 style=cursor:hand a href=?stype=view target=_blank img src=images/ width=59 height=19 border=0/a /td /tr/form /table %end if%13商品分類主要代碼%set rs=() if leixing=big then select * from shop_books where anclassid=amp。anclassidamp。 order by adddate desc,conn,1,1 …… else select * from shop_books order by adddate desc,conn,1,1 end if if =0 then %%else%table width=100% border=0 align=center cellpadding=0 cellspacing=0class=tablexia tr % j=0 For i=1 To x % td width=33% align=center class=tablezuotable width=214 border=0 cellspacing=0 cellpadding=0 trtd colspan=2font color=000073strongimg src=newimage/% trim(rs(shopname))%/strong/font/td /tr tr td width=108table width=108 border=0 cellPadding=2 cellSpacing=1 bgColor=e1e1e1 onMouseOver==39。FF4FAE39。 onMouseOut==39。39。 tr td width=102 height=100 bgColor=ffffff align=center%if rs(shoppic)= then div align=centera href=?id=amp。rs(shopid)amp。 img src=newimage/ width=90 height=90 border=0/a/div else%a href=?id=%=rs(shopid)% img src=%=trim(rs(shoppic))% width=90 border=0 height=90/a %end if%/td/tr /table/td td width=110 align=centertable width=95% border=0 cellspacing=0 cellpadding=0 /table/td /tr /table/td % j=j+1% %if j mod 3 =0 then%/tr tr%end if% % next% td width=33%amp。nbsp。/td /tr /table14 商品詳細(xì)展示主要代碼 % set rs=() select * from shop_books where shopid=amp。request(id),conn,1,3 if =0 then % font color=000073商品已不存在/font % else rs(liulancount)=rs(liulancount)+1 if (bjx)(username) then set rs_s=() select * from [user] where username=39。amp。(bjx)(username)amp。39。,conn,1,1 t_userid=rs_s(userid) set rs_s=() select * from shop_his where shopid=amp。request(id)amp。 and username=39。amp。(bjx)(username)amp。39。 and lx=1,conn,2,3 if 0 then rs_s(ltime)=now() rs_s(userid)=t_userid set rs_s=nothing else set rs_s=() select * from shop_his where username=39。amp。(bjx)(username)amp。39。 and lx=1 order by ltime,conn,1,3 if =4 then end if end if end if %15 購(gòu)物車(chē)主要代碼%select case actioncase del delete from shop_action where actionid=amp。(actionid)if (ll)=22 then ?action=shoucangelse ?action=showend ifcase addset rs_1=() select * from shop_books where shopid=amp。shopid,conn,1,1if (bjx)(reglx)=2 then danjia=rs_1(vipjia)else danjia=rs_1(huiyuanjia)end ifkucun=rs_1(kucun)shopname=rs_1(shopname)shjiaid=rs_1(shjiaid)set rs_1=nothingset rs=() select shopid,username,shopcount,zonger from shop_action where username=39。amp。usernameamp。39。 and shopid=amp。shopidamp。 and zhuangtai=7,conn,1,3if =1 thenrs(zonger)=(rs(shopcount)+1)*danjiars(shopcount)=rs(shopcount)+1set rs=nothing ?action=showelse39。//添加購(gòu)物set rs=() select shopid,username,shjiaid,zhuangtai,zonger,shopcount,niming from shop_action,conn,1,3rs(shopid)=shopidrs(username)=usernamers(zhuangtai)=7rs(shopcount)=1rs(shjiaid)=shjiaidrs(zonger)=danjiaif (bjx)(username)= thenrs(niming)=1end ifset rs=nothing ?action=showend ifcase show%16 商品訂單提交主要代碼% case ok 39。修改用戶的送貨信息 set rs=() select * from [user] where username=39。amp。usernameamp。39。,conn,1,3 rs(userzhenshiname)=trim(request(userzhenshiname)) …… set rs=nothing if session(xiadan)minute(now) then dim shijian,dingdan shijian=now() set rs=() select * from shop_action where username=39。amp。usernameamp。39。 and zhuangtai=7,conn,1,3 do while not rs(actiondate)=shijian if request(zhifufangshi)=17 then 39。送貨上門(mén)或預(yù)存款支付，直接改為訂單完成（已收到款） rs(zhuangtai)=3 else rs(zhuangtai)=1 end if rs(dingdan)=dingdan rs(youbian)=clng(request(youbian)) …… 39。新增 rs(feiyong)=request(feiyong) loop set rs=nothing end if %17 商品搜索主要代碼form name=form2 method=post action= tr td width=40% align=right class=style1關(guān) 健 字：/td td width=60% style=paddingleft:10pxinput class=wenbenkuang name=searchkey type=text id=searchkey style=color:000073/td /tr tr td align=right class=style1商品分類：/td td style=paddingleft:10px %set rs=() select * from shop_anclass order by anclassidorder,conn,1,1 % select class=wenbenkuang name=anclassid % loop set rs=nothing% /select/td /tr tr td align=right class=style1價(jià)格范圍：/td td style=paddingleft:10px sele
研究報(bào)告相關(guān)推薦
鄂ICP備17016276號(hào)-1