📄 payment.asp
字号:
case "txxx2"
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [sh_user] where username='"&request.cookies("shopzhiwang")("username")&"'",conn,1,1
%>
<SCRIPT LANGUAGE="JavaScript">
<!--
function ssxx()
{
if(checkspace(document.shouhuoxx.songhuofangshi.value)) {
document.shouhuoxx.songhuofangshi.focus();
alert("对不起，请选择送货方式！");
return false;
}
}
//-->
</script>
<table width="96%" border="0" cellspacing="0" cellpadding="1" align="center">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td rowspan="2">
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="12v">
<tr>
<td class="12v" >
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" id="AutoNumber3" height="0" width="100%">
<tr>
<td>
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#FFCC00">
<tr bgcolor="#FFF9E6">
<td colspan="2" style='PADDING-LEFT: 20px' height="40" align="center"><b><font color="#0000FF">请正确选择送货方式</font></b></td>
</tr>
<form name="shouhuoxx" method="post" action="payment.asp?action=txxx3">
<tr bgcolor="#FFF9E6">
<td width="199" style='PADDING-LEFT: 20px'><b>送货方式：</b></td>
<td width="771" height="28" style='PADDING-LEFT: 20px'>
<b>
<%
set rs2=server.CreateObject("adodb.recordset")
rs2.Open "select * from sh_youbian where youbian='"&trim(request("youbian"))&"'",conn,1,1
if rs2.recordcount=1 then
shangmen=1
else
shangmen=0
end if
rs2.close
set rs2=nothing
'//////////判断送货方式
set rs3=server.CreateObject("adodb.recordset")
rs3.Open "select * from sh_songhuo where fangshi=0 order by songidorder",conn,1,1
response.Write "<select name=songhuofangshi size="&rs3.recordcount&">"
do while not rs3.EOF
if not(shangmen=0 and trim(rs3("songid"))=3) then ' 是否显示“送货上门”：shangmen=0显示,为1不显示
response.Write "<option value="&rs3("songid")
if int(rs("songhuofangshi"))=int(rs3("songid")) then
response.Write " selected>"
else
response.Write ">"
end if
response.Write trim(rs3("subject"))&"</option>"
end if
rs3.MoveNext
loop
response.Write "</select>"
rs3.Close
set rs3=nothing
%>
</b>
<input name="userzhenshiname" type="hidden" value=<%=trim(request("userzhenshiname"))%>>
<input name="shousex" type="hidden" value=<%=trim(request("shousex"))%>>
<input name="useremail" type="hidden" value=<%=trim(request("useremail"))%>>
<input name="shouhuodizhi" type="hidden" value=<%=trim(request("shouhuodizhi"))%>>
<input name="youbian" type="hidden" value=<%=trim(request("youbian"))%>>
<input name="usertel" type="hidden" value=<%=trim(request("usertel"))%>>
<input name=userid type=hidden value="<%=request("userid")%>" >
</td>
</tr>
<tr bgcolor="#FFF9E6">
<td height="32" colspan="2" align=center>
<input type="button" name="Submit2" value="上一步" onclick="javascript:history.go(-1)">
<input type="submit" name="Submit4" value="下一步" onclick='return ssxx();'>
</td>
</tr>
</form>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<%
rs.close
set rs=nothing
'/////////////////////////////////////////
case "txxx3"
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [sh_user] where username='"&request.cookies("shopzhiwang")("username")&"'",conn,1,1
%>
<SCRIPT LANGUAGE="JavaScript">
<!--
function ssxx()
{
if(checkspace(document.shouhuoxx.zhifufangshi.value)) {
document.shouhuoxx.zhifufangshi.focus();
alert("对不起，请选择货款支付方式！");
return false;
}
}
//-->
</script>
<table width="96%" border="0" cellspacing="0" cellpadding="1" align="center">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td rowspan="2">
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="12v">
<tr>
<td class="12v" >
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" id="AutoNumber3" height="0" width="100%">
<tr>
<td>
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#FFCC00">
<tr bgcolor="#FFF9E6">
<td colspan="2" style='PADDING-LEFT: 20px' height="40" align="center"><b><font color="#0000FF">请正确选择付款方式</font></b></td>
</tr>
<form name="shouhuoxx" method="post" action="payment.asp?action=txxx4">
<tr bgcolor="#FFF9E6">
<td width="199" style='PADDING-LEFT: 20px'><b>付款方式：</b></td>
<td width="771" height="28" style='PADDING-LEFT: 20px'>
<b>
<%
'set rs2=server.CreateObject("adodb.recordset")
'rs2.Open "select * from sh_songhuo where songid="&trim(request("songhuofangshi")),conn,1,1
if cint(request("songhuofangshi"))=3 then
defraymode=1
else
defraymode=0
end if
'rs2.close
'set rs2=nothing
'//////////判断支付方式
set rs3=server.CreateObject("adodb.recordset")
rs3.open "select * from sh_songhuo where fangshi=1 order by songidorder",conn,1,1
response.Write "<select name=zhifufangshi size="&rs3.recordcount&" >"
do while not rs3.eof
if not(defraymode=0 and trim(rs3("songid"))=4) then ' 此条件是：只有defraymode=0和选择“送货上门”才显示“货到付款”
response.Write "<option value="&rs3("songid")
if int(rs("zhifufangshi"))=int(rs3("songid")) then
response.Write " selected>"
else
response.Write ">"
end if
response.Write trim(rs3("subject"))&"</option>"
end if
rs3.movenext
loop
response.Write "</select>"
rs3.close
set rs3=nothing
%>
</b>
<input name="userzhenshiname" type="hidden" value=<%=trim(request("userzhenshiname"))%>>
<input name="shousex" type="hidden" value=<%=trim(request("shousex"))%>>
<input name="useremail" type="hidden" value=<%=trim(request("useremail"))%>>
<input name="shouhuodizhi" type="hidden" value=<%=trim(request("shouhuodizhi"))%>>
<input name="youbian" type="hidden" value=<%=trim(request("youbian"))%>>
<input name="usertel" type="hidden" value=<%=trim(request("usertel"))%>>
<input name="songhuofangshi" type="hidden" value=<%=trim(request("songhuofangshi"))%>>
<input name=userid type=hidden value="<%=request("userid")%>" >
</td>
</tr>
<tr bgcolor="#FFF9E6">
<td height="32" colspan="2" align=center>
<input type="button" name="Submit2" value="上一步" onclick="javascript:history.go(-1)">
<input type="submit" name="Submit4" value="下一步" onclick='return ssxx();'>
</td>
</tr>
</form>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<%
rs.close
set rs=nothing
'/////////////////////////////////////////
case "txxx4"
%>
<table width="96%" border="0" cellspacing="0" cellpadding="1" align="center">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td rowspan="2">
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="12v">
<tr>
<td class="12v" >
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" id="AutoNumber3" height="0" width="100%">
<tr>
<td>
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#FFCC00">
<tr bgcolor="#FFF9E6">
<td align="center" valign="top" height=50 colspan=2>
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select sh_action.actionid,sh_action.bookid,sh_action.bookcount,sh_action.zonger,sh_chanpin.bookname,sh_action.shjiaid,sh_chanpin.anclassid,sh_chanpin.banci,sh_chanpin.shichangjia,sh_chanpin.huiyuanjia,sh_chanpin.vipjia from sh_chanpin inner join sh_action on sh_chanpin.bookid=sh_action.bookid where sh_action.username='"&request.cookies("shopzhiwang")("username")&"' and sh_action.zhuangtai=7 order by sh_chanpin.shjiaid",conn,1,1
%>
<table width=98% border=0 align=center cellpadding=1 cellspacing=1 bgcolor=#FFCC00>
<tr bgcolor="#FFE493">
<td width=25%>
<div align=center><font color="#666666">商品名称</font></div>
</td>
<td width=10%>
<div align=center><font color="#666666">市场价</font></div>
</td>
<td width=15%>
<div align=center><font color="#666666">单价
<%if request.cookies("shopzhiwang")("reglx")=2 then %>
(VIP)
<%else%>
(会员)
<%end if%>
</font></div>
</td>
<td width=15%>
<div align=center><font color="#666666">数量</font></div>
</td>
<td width=10%>
<div align=center><font color="#666666">邮寄浮动<br>
(单价)</font></div>
</td>
<td width=10% bgcolor=#FFE493>
<div align=center><font color="#666666">总价</font></div>
</td>
</tr>
<%shuliang=rs.recordcount
jianshu=0
zongji=0
fudongjia=0
do while not rs.eof
%>
<tr>
<td bgcolor=#FFF9E6 style='PADDING-LEFT: 5px'>
<div align=left><font color=blue><%=rs("bookname")%></font>
<input name=bookid2 type=hidden value="<%=rs("bookid")%>" >
<input name=actionid2 type=hidden value="<%=rs("actionid")%>" >
</div>
</td>
<td bgcolor=#FFF9E6 align="center"><s><%=rs("shichangjia")%></s>
元</td>
<td bgcolor=#FFF9E6>
<div align=center>
<%
if request.Cookies("shopzhiwang")("reglx")=2 then
response.write rs("vipjia")
else
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -