www.gusucode.com > 凡人网络购物系统 2008源码程序 > cashin.asp
<script language="JavaScript" src="inc/cashin.js"></script>
<%if Request.Cookies("venshop")("user_name")<>"" then
set rs=server.createobject("adodb.recordset")
sql="select * from venshop_user where username='"&Request.Cookies("venshop")("user_name")&"'"
rs.open sql,conn,1,1
if not rs.eof then
usernamec=rs("user_namec")
user_tel=rs("user_tel")
usermail=rs("usermail")
user_adds=rs("user_adds")
user_postcode=rs("user_postcode")
end if
rs.close
set rs=nothing
end if%>
<div align="center">
<table width="100%" cellspacing="0" cellpadding="0"><form method="POST" language="javascript" onsubmit="return subform_onsubmit()" name="subform" action="cashsave.asp?action=subp">
<%if zengt=1 then%>
<tr><td height="26" width="19%" class="cartshowa"></td><td class="cartshowa"><b>
<img border="0" src="Skin/Blue/lb.gif" align="absmiddle"> 选择赠品</b></td></tr>
<tr><td height="26" align="center" colspan="2">
<div class="d10"></div>
<table cellpadding=3 cellspacing=0 width="95%">
<tr><td colspan="4" class="cartshow0"><input type="radio" value="0" name="zp" checked><font color="#FF0000"> 请选择赠品：每个订单只可以选择一个赠品，赠品有限请抓紧机会，赠品不负责退换!</font></td></tr>
<%set rs=server.createobject("adodb.recordset")
rs.open "select * from venshop_zp order by zp_full asc",conn,1,1
i=1
do while not rs.eof
i=-i%>
<tr<%if i=1 then%> class="cartshow0"<%else%> class="cartshow1"<%end if%>>
<td width="180"><input type="radio" value="<%=rs("zp_id")%>" name="zp"<%if totalcash<rs("zp_full") then%> DISABLED<%end if%>>
<%if totalcash<rs("zp_full") then%><font color="#0000FF">只差<%=rs("zp_full")-totalcash%>即可获得此赠品!</font><%end if%></td>
<td width="200"><a style="font-size: 13px; font-weight: bold" href=viewzp.asp?zp_id=<%=rs("zp_id")%> target=_blank><%=rs("zp_name")%></a> (剩余<%=rs("zp_kucun")%>件)</td>
<td width="120">价值 <%=fuhao%><%=trim(rs("zp_price"))%><%=danwei%></td>
<td>满<%=fuhao%><%=trim(rs("zp_full"))%><%=danwei%>送</td></tr>
<%rs.movenext
loop
rs.close
set rs=nothing%></table>
<div class="d10"></div>
</td></tr>
<%else%>
<input type="hidden" value="0" name="zp">
<%end if%>
<tr><td height="26" width="19%" class="cartshowa"></td><td class="cartshowa"><b>
<img border="0" src="Skin/Blue/lb.gif" align="absmiddle"> 请填写订货人的详细信息</b></td></tr>
<tr><td height="26" align="right" width="19%">姓名：</td><td><input type="text" name="sub_from" size="20" class=input value="<%=usernamec%>"></td></tr>
<tr><td height="26" align="right" width="19%">电话：</td><td><input type="text" name="sub_fromtel" size="20" class=input value="<%=user_tel%>"></td></tr>
<tr><td height="26" align="right" width="19%">E-mail：</td><td><input type="text" name="sub_frommail" size="20" class=input value="<%=usermail%>"></td></tr>
<tr><td height="26" align="right" width="19%">地址：</td><td><input style="FONT-SIZE: 12px; WIDTH: 210px" type="text" name="sub_fromadds" size="40" class=input value="<%=user_adds%>"></td></tr>
<tr><td height="26" align="right" width="19%">邮编：</td><td><input type="text" name="sub_frompost" size="10" class=input value="<%=user_postcode%>"></td></tr>
<tr><td height="26" width="19%" class="cartshowa"></td><td class="cartshowa"><b>
<img border="0" src="Skin/Blue/lb.gif" align="absmiddle"> 请填写收货人的详细信息</b> <input name="be_username" type="checkbox" value="beusername" onClick="Fuc_BeUserName(this)">
<font color="#0000FF">复制订货人信息</font></td></tr>
<tr><td height="26" align="right" width="19%"><font color="#FF0000">* </font>客户姓名：</td><td>
<input type="text" name="sub_to" size="20" class=input value="<%=usernamec%>"></td></tr>
<tr><td height="26" align="right" width="19%"><font color="#FF0000">* </font>联系电话：</td><td>
<input type="text" name="sub_tel" size="20" class=input value="<%=user_tel%>"></td></tr>
<tr><td height="26" align="right" width="19%"><font color="#FF0000">* </font>
电子邮箱：</td><td>
<input type="text" name="sub_mail" size="20" class=input value="<%=usermail%>"></td></tr>
<tr><td height="26" align="right" width="19%"><font color="#FF0000">* </font>联系地址：</td><td>
<input style="FONT-SIZE: 12px; WIDTH: 210px" type="text" name="sub_adds" size="40" class=input value="<%=user_adds%>"></td></tr>
<tr><td height="26" align="right" width="19%"> <font color="#FF0000">* </font>
邮政编码：</td><td>
<input type="text" name="sub_post" size="10" class=input value="<%=user_postcode%>"></td></tr>
<tr><td height="26" align="right" valign="top" width="19%"><p style="margin-top: 5px; margin-bottom: 5px"><font color="#FF0000">* </font>到货时间：</td>
<td valign="top"><%set rs=server.createobject("adodb.recordset")
rs.open "select id,totime from venshop_totime",conn,1,1
i=0
do while not rs.eof
i=i+1%>
<input type="radio" value="<%=rs("totime")%>" name="totime"<%if i=1 then response.write " checked"%>><%=rs("totime")%><br>
<%rs.movenext
loop
rs.close
set rs=nothing%></td></tr>
<tr><td height="10" align="right" valign="top"></td><td height="10"></td></tr>
<tr><td height="26" align="right" width="19%" valign="top">
<p style="margin-top: 5px; margin-bottom: 5px"><font color="#FF0000">*
</font>付款方式：</td><td><%set rs=server.createobject("adodb.recordset")
rs.open "select * from venshop_pay",conn,1,1
i=0
do while not rs.eof
i=i+1%><input type="radio" value="<%=rs("pay_id")%>/<%=rs("pay_name")%>" name="pay_id"<%if i=1 then response.write " checked"%>><%=rs("pay_name")%> <u>[<%=rs("pay_content")%>]</u><br>
<%rs.movenext
loop
rs.close
set rs=nothing%>
<%if paymentid<>0 then%>
<p style="margin-top: 5px; margin-bottom: 5px; margin-left:20px"><a href="help.asp?typeid=<%=paymentid%>" target=_blank><font color="#FF0000">关于付款方式的详细说明>></font></a>
<%end if%>
</td></tr>
<tr><td height="10" align="right" valign="top"></td><td height="10"></td></tr>
<tr><td height="26" align="right" width="19%" valign="top">
<p style="margin-top: 5px; margin-bottom: 5px"><font color="#FF0000">*
</font>送货方式：</td><td><%set rs=server.createobject("adodb.recordset")
rs.open "select * from venshop_ps",conn,1,1
i=0
do while not rs.eof
i=i+1%><input type="radio" value="<%=rs("ps_id")%>/<%=rs("ps_name")%>" name="ps_id"<%if i=1 then response.write " checked"%>><%=rs("ps_name")%> <u>[<%=rs("ps_content")%>, 一般<%=rs("ps_time")%>到货, 收费<%=rs("ps_fei")%>元]</u><br>
<%rs.movenext
loop
rs.close
set rs=nothing%>
<%if psid<>0 then%>
<p style="margin-top: 5px; margin-bottom: 5px; margin-left:20px"><a href="help.asp?typeid=<%=psid%>" target=_blank><font color="#FF0000">关于送货方式的详细说明>></font></a>
<%end if%>
</td></tr>
<%if fapiao=1 then%>
<SCRIPT language=javascript1.2 src="inc/menu.js"></SCRIPT>
<tr><td height="26" align="right" width="19%">需要发票：</td><td><input type="radio" name="fapiao" value="1" onclick="menuclick(submenuf3,barf3)" id=barf3 style="cursor:hand;">需要
<input type="radio" name="fapiao" value="0" checked onclick="menuclick(submenuf2,barf2)" id=barf2 style="cursor:hand;">不需要
<u>(开发票需要加收税点<%=shuidian%>%)</u>
</td></tr>
<tr id="submenuf3" style="DISPLAY: none;"><td width="19%" height="26" align="right">发票抬头：</td><td><input style="FONT-SIZE: 12px; WIDTH: 210px" type="text" name="sub_taitou" size="40" class=input></td></tr>
<tr id="submenuf2" style="DISPLAY: none;"><td width="19%" align="right"></td><td></td></tr>
<%end if%>
<tr><td width="19%" height="26" align="right">缺货处理：</td><td><input type="radio" name="quehuo" value="1">等待<input type="radio" name="quehuo" value="0" checked>从订单取消</td></tr>
<tr><td width="19%" height="26" align="right">备注：<br>(50汉字内) </td><td><textarea style="FONT-SIZE: 12px; WIDTH: 250px" name="other" cols="30" rows="3"></textarea></td></tr>
<tr><td width="19%" height="26" align="right"></td>
<td><input type="image" src="img/regbutton.gif" name="submit"></td></tr></form></table></div>