📄 viewsub.asp

📁 网络购物
💻 ASP
字号:
<%'=========================================''         凡人网络购物系统V4.0免费版'    FreeDown.Net info@freedown.net '            www.freedown.net'     版权所有·免费版仅供研究测试只用'            商业使用请购买正版''=========================================%>
<%
if session("user_name")="" then
        response.write  "<br>"
	response.write "<center>"
	response.write  "1.您尚未登录!请登录后再查看订单信息!"
        response.write "<br>"
	response.write  "<br>2.第一次来本站，请先<a href=reg.asp target=_blank>注册会员</a>!"
	response.write  "<br>"
    response.end
end if
set rs=server.createobject("adodb.recordset")
%>
<!--#include file="conn.asp"-->
<%


sql="select * from sub where sub_id="&request("sub_id")
rs.open sql,conn,3,3
if rs.eof then
    response.write "没有此订单信息"
else%><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="Content-Language" content="zh-cn">
<link href=css.css rel=STYLESHEET type=text/css>
<title>订单:<%=rs("sub_number")%>详细信息</title>
</head>

<table border="0" width="580" cellspacing="1">
  <tr>
    <td width="100%">
      <table border="0" width="100%" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111">
        <tr>
          <td width="100%"> 
        <img border="0" src="img/promo_list_top.gif" width="100%" height="4"></td>
        </tr>
        <tr>
          <td width="100%" bgcolor="#DBC2B0" height="25"> 
            <p align="center"><font color="#FFFFFF">定单号:<b><%=rs("sub_number")%> 
              <%sub_number=rs("sub_number")%> &nbsp;&nbsp;&nbsp;&nbsp;</b>付款方式：<b><%=rs("qian")%>
            </b>
            </font> 
          </td>
        </tr>
        <tr>
          <td width="100%">
            <table border="0" width="100%" cellspacing="0" cellpadding="0">
              <tr> 
                <td bgcolor="#F5EFE7" colspan="2">订购日期：<b><%=rs("sub_date")%></b></td>
                <td bgcolor="#F5EFE7" colspan="2">订货人：<b><%=rs("user_name")%></b></td>
              </tr>
              <tr> 
                <td bgcolor="#F5EFE7" colspan="2">收货人：<b><%=rs("sub_to")%></b></td>
                <td bgcolor="#F5EFE7" colspan="2">收货地址：<b><%=rs("sub_adds")%></b></td>
              </tr>
              <tr bgcolor="#F7f7f7"> 
                <td colspan="2" bgcolor="#F5EFE7">电话：<b><%=rs("sub_tel")%></b></td>
                <td colspan="2" bgcolor="#F5EFE7">E-mail：<b><%=rs("sub_mail")%></b></td>
              </tr>
              <tr> 
                <td bgcolor="#F5EFE7" colspan="4" height="15">
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td width="16%">备注信息：</td>
                      <td width="84%"><b><%=rs("other")%></b></td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr bgcolor="#f0f0f0"> 
                <td colspan="4"> 
        <img border="0" src="img/promo_list_top.gif" width="100%" height="4"></td>
              </tr>
              <tr bgcolor="#f0f0f0"> 
                <td colspan="4" height="25" bgcolor="#DBC2B0"> 
                  <p align="center"><b><font color="#FFFFFF">订购货物列表</font></b></p>
                </td>
              </tr>
              <tr bgcolor="#f7f7f7"> 
                <td width="29%" bgcolor="#F5EFE7">货物名称</td>
                <td width="12%" bgcolor="#F5EFE7">单价</td>
                <td width="19%" bgcolor="#F5EFE7">数量</td>
                <td width="40%" bgcolor="#F5EFE7">合计</td>
              </tr>
              <%rs.close%>
              <%sql="select * from basket where sub_number='"&sub_number&"'"
              rs.open sql,conn,3,3
              if rs.eof then
                  response.write "没有此订单信息"
                  response.end
              else
                  do while not rs.eof%>
              <tr> 
                <td width="25%" bgcolor="#F5EFE7"><%=rs("hw_name")%></td>
                <td width="25%" bgcolor="#F5EFE7"><%=rs("hw_cash")%>元</td>
                <td width="25%" bgcolor="#F5EFE7"><%=rs("basket_count")%></td>
                <td width="25%" bgcolor="#F5EFE7"><font color=red><%=rs("hw_cash")*rs("basket_count")%></font>元</td>
                <%totalcash=totalcash+rs("hw_cash")*rs("basket_count")%>
              </tr>
              <%rs.movenext
              loop
              %>
              <tr> 
                <td width="75%" bgcolor="#F5EFE7" colspan="3">总计</td>
                <td width="25%" bgcolor="#F5EFE7"><font color=red><%=totalcash%></font>元</td>
              </tr>
              <%end if
              rs.close%>
              <tr> 
                <td width="100%" bgcolor="#F5EFE7" colspan="4"> 　</td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<%
end if
set rs=nothing
conn.close
set conn=nothing
%>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -