www.gusucode.com > 运动用品商城网站系统源代码程序 > cashsavej.asp
<!--#include file="conn.asp"--> <!--#include file="IncAsp/venshop_top.asp"--> <!--#include file="IncAsp/venshop_email.asp"--> <!--#include file="IncAsp/venshop_md5.asp"--> <!--#include file="IncAsp/all_pay.asp"--> <div align="center"> <table cellpadding="0" cellspacing="0" class="all_t1"> <tr><td class="all_l_td" valign="top"> <!--#include file="IncAsp/venshop_log.asp"--><div class="d5"></div> </td> <td valign="top" class="all_c_td"> <%if Request.Cookies("venshop")("user_name")="" and Request.Cookies("venshop")("guest")="" then response.redirect "buyj.asp" response.end end if if Request.Cookies("venshop")("user_name")<>"" then user_name=Request.Cookies("venshop")("user_name") elseif Request.Cookies("venshop")("guest")<>"" then user_name=Request.Cookies("venshop")("guest") end if if isvalidemail(trim(request("sub_mail")))=false then showerr "e7" else user_mail=trim(request("sub_mail")) end if venshopcom="iptu>mdbtf)sfrvftu/tfswfswbsjbcmft)#IUUQ`IPTU#**||tfu!st>tfswfs/dsfbufpckfdu)#bepec/sfdpsetfu#*|trm>#tfmfdu!ix`obnf-cbtlfu`difdl-tvc`ovncfs-ix`je-cbtlfu`dpvou-ix`xfjhiu-ix`zvogfj-ix`qsjdf!gspn!wfotipq`cbtlfu!xifsf!vtfs`obnf>(#'vtfs`obnf'#(!boe!cbtlfu`difdl>1#|st/pqfo!trm-dpoo-2-4|jg!st/fpg!uifo|tipxfss!#f7#|st/dmptf|tfu!st>opuijoh|foe!jg|tvc`ovncfs>sjhiu)zfbs)ebuf)**-3*'npoui)ebuf)**'ebz)ebuf)**'ipvs)opx)**'njovuf)opx)**'tfdpoe)opx)**|tvc`ovncfs>sfqmbdf)tvc`ovncfs-#.#-##*|tvc`ovncfs>sfqmbdf)tvc`ovncfs-#!#-##*|tvc`ovncfs>sfqmbdf)tvc`ovncfs-#;#-##*|ep!xijmf!opu!st/fpg|st)#cbtlfu`difdl#*>2|st)#tvc`ovncfs#*>tvc`ovncfs|ix`je>st)#ix`je#*|tfu!st2>dpoo/fyfdvuf)#vqebuf!wfotipq`ix!tfu!ix`cvzt>ix`cvzt,2!xifsf!ix`je>#'ix`je'##*|upubmdbti>upubmdbti,)st)#cbtlfu`dpvou#*+usjn)st)#ix`qsjdf#***|upubmx>upubmx,)st)#cbtlfu`dpvou#*+usjn)st)#ix`xfjhiu#***|upubmz>upubmz,)st)#cbtlfu`dpvou#*+usjn)st)#ix`zvogfj#***|upubmd>upubmd,st)#cbtlfu`dpvou#*|tipxcbtlfu>tipxcbtlfu'#=q!!tuzmf>##nbshjo;!6qy##?#'st)#ix`obnf#*'#!#'gvibp'st)#ix`qsjdf#*'eboxfj'#!#'st)#cbtlfu`dpvou#*'#?#|st/vqebuf|st/npwfofyu|mppq|st/dmptf|tfu!st>opuijoh|jg!sfrvftu)#{q#*=?1!uifo|tfu!stq>tfswfs/dsfbufpckfdu)#bepec/sfdpsetfu#*|stq/pqfo!#tfmfdu!+!gspn!wfotipq`{q!xifsf!{q`je>#'sfrvftu)#{q#*'#!boe!{q`lvdvo?1#-dpoo-2-2|jg!opu!stq/fpg!uifo|{q`gvmm>stq)#{q`gvmm#*|jg!{q`gvmm=>upubmdbti!uifo|{q`je>stq)#{q`je#*|{q`obnf>stq)#{q`obnf#*|{q`qsjdf>stq)#{q`qsjdf#*|{q`gvmm>stq)#{q`gvmm#*|fmtf|{q`je>1|{q`obnf>##|{q`qsjdf>1|{q`gvmm>1|foe!jg|fmtf|{q`je>1|{q`obnf>##|{q`qsjdf>1|{q`gvmm>1|foe!jg|stq/dmptf|tfu!stq>opuijoh|fmtf|{q`je>1|{q`obnf>##|{q`qsjdf>1|{q`gvmm>1|foe!jg|tfu!st>tfswfs/dsfbufpckfdu)#bepec/sfdpsetfu#*|trm>#tfmfdu!+!gspn!wfotipq`tvc#|st/pqfo!trm-dpoo-2-4|st/beeofx|st)#tvc`obnf#*>vtfs`obnf|st)#tvc`ovncfs#*>tvc`ovncfs|st)#tvc`ebuf#*>opx)*|st)#tvc`{u#*>2|qt>tqmju)sfrvftu)#qt`je#*-#0#*|qbz>tqmju)sfrvftu)#qbz`je#*-#0#*|st)#tvc`qt#*>qt)1*|st)#tvc`qbz#*>qbz)1*|st)#tvc`qtobnf#*>qt)2*|st)#tvc`qbzobnf#*>qbz)2*|st)#tvc`upujnf#*>sfrvftu)#upujnf#*|st)#tvc`zvogfj#*>dpvougff)jou)qt)1**-zvogfj-upubmz-upubmx-upubmd-jou)upubmdbti*-jou)njbo**|jg!gbqjbp>2!uifo|st)#tvc`gbqjbp#*>sfrvftu)#gbqjbp#*|jg!sfrvftu)#tvc`ubjupv#*=?##!uifo|st)#tvc`ubjupv#*>EfmTus)sfrvftu)#tvc`ubjupv#**|foe!jg|fmtf|st)#tvc`gbqjbp#*>1|st)#tvc`ubjupv#*>#OP#|foe!jg|st)#tvc`rvfivp#*>sfrvftu)#rvfivp#*|st)#tvc`puifs#*>EfmTus)sfrvftu)#puifs#**|st)#tvc`up#*>EfmTus)sfrvftu)#tvc`up#**|st)#tvc`nbjm#*>EfmTus)sfrvftu)#tvc`nbjm#**|st)#tvc`ufm#*>EfmTus)sfrvftu)#tvc`ufm#**|st)#tvc`beet#*>EfmTus)sfrvftu)#tvc`beet#**|st)#tvc`qptu#*>EfmTus)sfrvftu)#tvc`qptu#**|jg!sfrvftu)#tvc`gspn#*=?##!uifo!st)#tvc`gspn#*>EfmTus)sfrvftu)#tvc`gspn#**|jg!sfrvftu)#tvc`gspnnbjm#*=?##!uifo!st)#tvc`gspnnbjm#*>EfmTus)sfrvftu)#tvc`gspnnbjm#**|jg!sfrvftu)#tvc`gspnufm#*=?##!uifo!st)#tvc`gspnufm#*>EfmTus)sfrvftu)#tvc`gspnufm#**|jg!sfrvftu)#tvc`gspnbeet#*=?##!uifo!st)#tvc`gspnbeet#*>EfmTus)sfrvftu)#tvc`gspnbeet#**|jg!sfrvftu)#tvc`gspnqptu#*=?##!boe!jtOvnfsjd)sfrvftu)#tvc`gspnqptu#**!uifo!st)#tvc`gspnqptu#*>EfmTus)sfrvftu)#tvc`gspnqptu#**|st)#tvc`l#*>1|st)#tvc`i#*>1|st)#{q`je#*>{q`je|st)#{q`obnf#*>{q`obnf|st)#{q`qsjdf#*>{q`qsjdf|st)#{q`gvmm#*>{q`gvmm|st/vqebuf|st/dmptf|tfu!st>opuijoh|vtfs`nbjm>sfrvftu)#tvc`nbjm#*|upubmdbti>1|upubmx>1|upubmz>1|upubmd>1" execute(vencode(venshopcom)) %> <table width="99%" border="0" cellpadding="0" cellspacing="0"> <tr><td class="sort"> <IMG src="Skin/<%=venshop_skin%>/home.gif" border=0 align="absmiddle"> 您的位置: <a href="index.asp">首页</a> >> 定购成功,订单号<%=sub_number%>:</td></tr> </table> <table border="0" cellpadding="0" cellspacing="0" class="useri"> <tr><td height="150"> <table border="0" cellpadding="0" cellspacing="0" width="100%"> <tr> <td align="center" class="cartshowa">商品名称</td> <td align="center" class="cartshowa">所需积分</td> <td align="center" class="cartshowa">数量</td> <td align="center" class="cartshowa">备注</td> <td align="center" class="cartshowa">合计</td> </tr> <%set rs=server.createobject("adodb.recordset") sql="select * from venshop_jf where user_name='"&user_name&"' and sub_number='"&sub_number&"' and basket_check=1" rs.open sql,conn,1,1 if rs.eof then%> <tr><td height="50" colspan="5" align="center"><%=sub_number%><%=user_name%>你没有选择任何积分礼品</td></tr> <% rs.close set rs=nothing else i=0 do while not rs.eof i=i+1 %> <tr> <td align="center" class="cartshow<%=(i mod 2)%>"><a target="_blank" href="viewsj.asp?hw_id=<%=rs("hw_id")%>"><%=rs("hw_name")%></a></td> <td align="center" class="cartshow<%=(i mod 2)%>"><%=-trim(rs("hw_jifen"))%></td> <td align="center" class="cartshow<%=(i mod 2)%>"><%=rs("basket_count")%></td> <td align="center" class="cartshow<%=(i mod 2)%>"><%=rs("kxa")%> <%=rs("kxb")%></td> <td align="center" class="cartshow<%=(i mod 2)%>"><%=-rs("basket_count")*trim(rs("hw_jifen"))%></td> </tr> <%totalcash=totalcash+rs("basket_count")*trim(rs("hw_price")) totaljifen=totaljifen+rs("basket_count")*rs("hw_jifen") totalw=totalw+(rs("basket_count")*trim(rs("hw_weight"))) totaly=totaly+(rs("basket_count")*trim(rs("hw_yunfei"))) totalc=totalc+rs("basket_count") rs.movenext loop rs.close set rs=nothing%> <%if request("zp")<>0 then i=i+1%> <tr> <td align="center" class="cartshow<%=(i mod 2)%>"><a target=_blank href="viewzp.asp?zp_id=<%=request("zp")%>"><%=zp_name%></a></td> <td align="center" class="cartshow<%=(i mod 2)%>"><%=fuhao%> 0 <%=danwei%></td> <td align="center" class="cartshow<%=(i mod 2)%>">1</td> <td align="center" class="cartshow<%=(i mod 2)%>">赠品</td> <td align="center" class="cartshow<%=(i mod 2)%>"><%=fuhao%> 0 <%=danwei%></td> </tr> <%end if%> </table> <table border="0" cellpadding="0" cellspacing="0" width="100%"> <tr><td height="26" align="right"> <%if Request.Cookies("venshop")("user_type")="" then zhekou=100 usertype_name="未登录用户" zhekouyu="不享受折扣价" else user_type=Request.Cookies("venshop")("user_type") set rs=server.createobject("adodb.recordset") sql="select * from venshop_usertype where usertype_id="&user_type&"" rs.open sql,conn,1,1 if rs.eof then zhekou=100 usertype_name="一般用户" zhekouyu="不享受折扣价" else zhekou=rs("usertype_zhekou") usertype_name=rs("usertype_name") zhekouyu="享受原价"&zhekou&"%的折扣价" end if rs.close set rs=nothing end if set rs=server.createobject("adodb.recordset") sql="select * from venshop_subj where sub_name='"&user_name&"' and sub_number='"&sub_number&"'" rs.open sql,conn,1,1 if not rs.eof then%> <p style="line-height: 200%; margin-left:5px; margin-right:15px; margin-top:5px; margin-bottom:5px"> 共 <span class="price"><%=totalc%></span> 件商品 <%showbasket=showbasket&"<p style=""line-height: 150%; margin: 5px"">价格总计:"&fuhao&" "&totalcash&" "&danwei%> 您是:<font color="#0000FF"><%=usertype_name%></font> 需要积分:<%=-totalisbn%><br> <%showbasket=showbasket&" 您是:"&usertype_name&" "&zhekouyu%> 收货方式:<%=rs("sub_psname")%> 附加费用:<%=rs("sub_yunfei")%><br> <%showbasket=showbasket&" 送货费用:"&fuhao&" "&rs("sub_yunfei")&" "&danwei%> 折后总计:<%totalcash=checkshui(totalcash*zhekou/100+rs("sub_yunfei"),shuidian,rs("sub_fapiao"))%> <%showbasket=showbasket&"<br><b>折后总计:<font color=red>"&fuhao&" "&FormatNum(totalcash)&" "&danwei&"</font></b>"%> <span class="price"><%=fuhao%> <%=FormatNum(totalcash)%> <%=danwei%></span> <%if rs("sub_fapiao")=1 then%> <%showbasket=showbasket&" (索要发票需要加收"&shuidian&"%的税点)"%> (索要发票需要加收<%=shuidian%>%的税点) <%end if%> 获得积分:<%=totaljifen%> <% showf="<p style=""line-height: 150%; margin: 5px"">" showf=showf&"订货人: "&DelStr(request("sub_from"))&"<br>" showf=showf&"订货人电话: "&DelStr(request("sub_fromtel"))&"<br>" showf=showf&"订货人邮箱: "&DelStr(request("sub_frommail"))&"<br>" showf=showf&"订货人地址: "&DelStr(request("sub_fromadds"))&"<br>" showf=showf&"订货人邮编: "&DelStr(request("sub_frompost"))&"<br>" showr=showr&"收货人: "&DelStr(request("sub_to"))&"" showr=showr&"<p style=""line-height: 150%; margin: 5px"">" showr=showr&"收货人电话: "&DelStr(request("sub_tel"))&"<br>" showr=showr&"收货人邮箱: "&DelStr(request("sub_mail"))&"<br>" showr=showr&"收货人地址: "&DelStr(request("sub_adds"))&"<br>" showr=showr&"收货人邮编: "&DelStr(request("sub_post"))&"<br>" mail_orders=replace(replace(replace(replace(replace(replace(mail_orders,"#U",user_name),"#M",user_mail),"#S",sub_number),"#BASKET",showbasket),"#F",showf),"#R",showr) mail_orderc=replace(replace(replace(replace(replace(replace(mail_orderc,"#U",user_name),"#M",user_mail),"#S",sub_number),"#BASKET",showbasket),"#F",showf),"#R",showr) if E_SendManType=1 then SendEmail ""&user_mail&"",""&mail_orders&"",""&mail_orderc&"","Jmail" elseif E_SendManType=2 then SendEmail ""&user_mail&"",""&mail_orders&"",""&mail_orderc&"","ObjCDOMail" elseif E_SendManType=3 then SendEmail ""&user_mail&"",""&mail_orders&"",""&mail_orderc&"","Aspemail" end if %> <!--#include file="IncAsp/venshop_inpay.asp"--> </td></tr><%end if%> </table> <table border="0" cellpadding="0" cellspacing="0" width="99%"> <tr><td height="26" align="right" class="cartshow0"><b>订货人: </b> </td><td height="26" class="cartshow0"> <b><%=rs("sub_from")%></b> <a href="subchange.asp?sub_id=<%=rs("sub_id")%>">修改订货人信息</a></td></tr> <tr><td height="26" align="right" width="19%">电话: </td><td height="26"><%=rs("sub_fromtel")%></td></tr> <tr><td height="26" align="right" width="19%">Email:</td><td height="26"><%=rs("sub_frommail")%></td></tr> <tr><td height="26" align="right" width="19%">地址:</td><td height="26"><%=rs("sub_fromadds")%></td></tr> <tr><td height="26" align="right" width="19%">邮编:</td><td height="26"><%=rs("sub_frompost")%></td></tr> <tr><td height="26" align="right" width="19%" class="cartshow0"><b>收货人: </b></td><td height="26" class="cartshow0"> <b><%=rs("sub_to")%></b> <a href="subchange.asp?sub_id=<%=rs("sub_id")%>">修改订货人信息</a></td></tr> <tr><td height="26" align="right" width="19%">电话: </td><td height="26"><%=rs("sub_tel")%></td></tr> <tr><td height="26" align="right" width="19%">Email:</td><td height="26"><%=rs("sub_mail")%></td></tr> <tr><td height="26" align="right" width="19%">地址:</td><td height="26"><%=rs("sub_adds")%></td></tr> <tr><td height="26" align="right" width="19%">邮编:</td><td height="26"><%=rs("sub_post")%></td></tr> <tr><td height="26" align="right" width="19%">到货时间:</td><td><%=rs("sub_totime")%></td></tr> <tr><td height="26" align="right" width="19%" valign="top">付款方式:</td> <td valign="top"><%=rs("sub_payname")%> <%if paymentid<>0 then%> <p style="margin-top: 5px; margin-bottom: 5px;"><a href="help.asp?typeid=<%=paymentid%>" target=_blank><font color="#FF0000">关于付款方式的详细说明>></font></a> <%end if%></td></tr> <tr><td height="26" align="right" width="19%" valign="top">送货方式:</td> <td valign="top"><%=rs("sub_psname")%><%if psid<>0 then%> <p style="margin-top: 5px; margin-bottom: 5px;"><a href="help.asp?typeid=<%=psid%>" target=_blank><font color="#FF0000">关于送货方式的详细说明>></font></a> <%end if%></td></tr> <%if fapiao=1 then%> <tr><td height="26" align="right" width="19%">需要发票:</td><td height="26"><%if rs("sub_fapiao")=1 then%>需要(抬头:<%=rs("sub_taitou")%>)<%else%>不需要<%end if%></td></tr> <%end if%> <tr><td height="26" align="right" width="19%">缺货处理:</td><td height="26"><%if rs("sub_quehuo")=1 then%>等待到货<%else%>从订单取消<%end if%></td></tr> <tr><td height="26" align="right" width="19%">其它说明:</td><td height="26"><%=rs("sub_other")%></td></tr> </table> <%end if rs.close set rs=nothing%> </td></tr></table> </td></tr></table></div><!--#include file="IncAsp/venshop_copy.asp"-->