www.gusucode.com > 艺帆全站DIV+CSS体育用品公司网站源码 1.7.5源码程序 > i5808/xiugai_orders.asp

    <!--#include file="../Conn.asp" -->
<!--#include file="seeion.asp"-->
<% 
id=request.QueryString("id")
if id="" or not isnumeric(id) then
Response.Write "<script>alert('参数错误!');history.go(-1);</script>" 
Response.End()
end if
exec="select * from [orders] where id="& id 
set rs=server.createobject("adodb.recordset") 
rs.open exec,conn,1,1 
if rs.eof and rs.bof then
Response.Write "<script>alert('参数不正确,ID值不存在!');history.go(-1);</script>" 
Response.End()
end if
ppid=rs("products_id")
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link rel="stylesheet" type="text/css" id="css" href="images/style.css">
<title>查看订单</title>
</head>
<body>
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="1" >
  <tr>
    <td height="30" background="images/bg_list.gif"><div  style="padding-left:10px; font-weight:bold; color:#0075a9">查看订单</div></td>
  </tr>
  <tr>
    <td bgcolor="#FFFFFF"><table width="100%" border="0" align="center" cellpadding="5" cellspacing="0" >
      <tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#F1F5F8'" bgcolor="#F1F5F8" >
        <td height="28" width="16%" class="td">订单编号</td>
        <td width="84%"  class="td"><%=rs("OrderNo")%><input name="id" type="hidden" id="id" value="<%=rs("id")%>" /></td>
      </tr>
      <tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#FFFFFF'" bgcolor="#FFFFFF">
        <td height="25" width="16%" class="td">产品名称</td>
        <td class="td"><%
set rs1=server.createobject("adodb.recordset")
exec="select * from products where id="&ppid
rs1.open exec,conn,1,1 
response.Write("<a href=""../ShowProducts/?"&ppid&"-1.html"" target=""_blank"">"&rs1("title")&"</a>")
rs1.close
set rs1=nothing
%></td>
      </tr>
      <tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#F1F5F8'" bgcolor="#F1F5F8">
        <td height="25" width="16%" class="td">订购数量</td>
        <td class="td"><%=rs("number")%></td>
      </tr>
    <tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#FFFFFF'" bgcolor="#FFFFFF">
        <td height="25" class="td">订购人帐号</td>
        <td class="td">
		<%
set rs2=server.createobject("adodb.recordset")
exec="select * from [user] where id="&rs("userid")&"" 
rs2.open exec,conn,1,1 
if rs2.eof then
response.Write "<div style=""padding:10px"">该用户已被删除!</a>"
response.End()
else
response.Write(""&rs2("useradmin")&"")
rs2.close
set rs2=nothing
end if 
%>
		
	</td>
    </tr>
      <tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#F1F5F8'" bgcolor="#F1F5F8">
        <td height="25" class="td">联系人姓名</td>
        <td class="td"><%=rs("name")%></td>
      </tr>
    <tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#FFFFFF'" bgcolor="#FFFFFF">
        <td height="25" class="td">联系电话</td>
        <td class="td"><%=rs("tel")%></td>
      </tr>
   <tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#F1F5F8'" bgcolor="#F1F5F8">
      <td height="25" class="td">收货地址</td>
      <td class="td"><%=rs("address")%></td>
    </tr>
    <tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#FFFFFF'" bgcolor="#FFFFFF">
      <td height="25" class="td">邮政编码</td>
      <td class="td"><%=rs("code")%></td>
    </tr>
    <tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#F1F5F8'" bgcolor="#F1F5F8">
      <td height="25" class="td">其它说明</td>
      <td class="td"><%=rs("sm")%></td>
    </tr>
    <tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#FFFFFF'" bgcolor="#FFFFFF">
      <td height="25" class="td">提交日期</td>
      <td class="td"><%=rs("data")%></td>
    </tr>
    <tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#F1F5F8'" bgcolor="#F1F5F8">
      <td height="25" class="td">订单状态</td>
      <td class="td"><%
state=rs("state")
if state=1 then
response.Write("<font color=#FF0000>新订单,未处理!</font>")
else
response.Write("<font color=#000000>已经处理!</font>")
end if
%></td>
    </tr>
    <tr onmouseover="style.backgroundColor='#EEEEEE'" onmouseout="style.backgroundColor='#FFFFFF'" bgcolor="#FFFFFF">
      <td height="25" class="td">&nbsp;</td>
      <td class="td"><input type="button" name="Submit3" value="返回订单列表" onclick="window.location.href='admin_orders.asp' "  class="btn"/></td>
    </tr>
    </table>
</td>
  </tr>
</table>
</body>
</html>