www.gusucode.com > asp+SQLServer网上书店系统设计(源代码+论文) > asp+SQLServer网上书店系统设计(源代码+论文)\网上书店asp+SQLServer\网上书店\admin\order.asp
<%
if session("admin")="" then
Response.redirect "backlogin.asp?msg=对不起你还没有登录,请返回登录!"
end if
%>
<html>
<head>
<title>客户订货单详细信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<STYLE type=text/css>.main {
FONT-SIZE: 12px
}
.main1 {
FONT-SIZE: 14px
}
.main2 {
FONT-SIZE: 16px
}
.main3 {
FONT-SIZE: 7px
}
.main4 {
FONT-SIZE: 10px
}
A:link {
COLOR: #ffffff; TEXT-DECORATION: none
}
A:visited {
COLOR: #ffffff; TEXT-DECORATION: none
}
A:active {
COLOR: #ff0000; TEXT-DECORATION: none
}
A:hover {
COLOR: #aa0000; TEXT-DECORATION: underline
}
</STYLE>
</head>
<!--#include file="conn.asp"-->
<%
id=request("id")
page=request("page")
set rs=server.createobject("adodb.recordset")
sqltext="select * from OrderList where order_id=" & id
rs.open sqltext,cn,1,1
%>
<body text="#000000" bgcolor="#e6e4f1">
<br> <div align="center">
<center>
<form method='POST' action="manage_order.asp?order_id=<%=rs("order_Id")%>">
<TABLE cellSpacing=1 cellPadding=4 width=562 bgColor=#000000 height="159">
<TBODY>
<TR vAlign=top bgColor=#8CAAE7>
<TD class=main1 colSpan=2 width="548" height="10"></TD>
</TR>
<TR vAlign=top bgColor=#BECFF1>
<TD class=main1 colSpan=2 width="548" height="32">客户订货单详细资料--</TD></TR>
<TR bgColor=#BECFF1>
<TD class=main1 width=126 bgColor=#BECFF1 height=25 align="right"><SPAN
class=main1>订货单号：</SPAN></TD>
<TD class=main1 width=410 height=25><%=rs("order_Id")%></TD></TR>
<tr>
<TD class=main1 width=126 bgColor=#BECFF1 height=25 align="right"><SPAN
class=main1>收货人姓名：</SPAN></TD>
<TD class=main1 width=410 height=25 bgcolor="#BECFF1"><%=rs("user_name")%></TD></TR>
<tr>
<TD class=main1 width=126 bgColor=#BECFF1 height=25 align="right"><SPAN
class=main1>收货人联系地址：</SPAN></TD>
<TD class=main1 width=410 height=25 bgcolor="#BECFF1"><%=rs("Address")%></TD>
</tr>
<tr>
<TD class=main1 width=126 bgColor=#BECFF1 height=25 align="right"><SPAN
class=main1>邮政编码：</SPAN></TD>
<TD width=410 height=25 bgcolor="#BECFF1"><%=rs("postcode")%></TD>
</tr>
<tr>
<TD class=main1 width=126 bgColor=#BECFF1 height=25 align="right"><SPAN
class=main1>联系电话：</SPAN></TD>
<TD width=410 height=25 bgcolor="#BECFF1"><%=rs("phone")%></TD>
</tr>
<tr>
<TD class=main1 width=126 bgColor=#BECFF1 height=25 align="right"><SPAN
class=main1>付款方式：</SPAN></TD>
<TD class=main1 width=410 height=25 bgcolor="#BECFF1"><%=rs("pay_method")%></TD>
</tr>
<tr>
<TD class=main1 width=126 bgColor=#BECFF1 height=25 align="right"><SPAN
class=main1>备注：</SPAN></TD>
<TD class=main1 width=410 height=25 bgcolor="#BECFF1"><%=rs("Remark")%></TD>
</tr>
<tr>
<TD class=main1 width=126 bgColor=#BECFF1 height=24 align="right"><SPAN
class=main1>订货日期：</SPAN></TD>
<TD class=main1 width=410 height=24 bgcolor="#BECFF1"><%=rs("order_date")%></TD>
</tr>
<tr>
<TD class=main1 width=126 bgColor=#BECFF1 height=25 align="right"><SPAN
class=main1>订单是否已经处理：</SPAN></TD>
<TD class=main1 width=410 height=25 bgcolor="#BECFF1"><%If rs("Flag")="尚未处理" Then%><font color="#0000FF">尚未处理</font><%else%><font color="#FF0000">已经发货</font><%End If%>
</TD>
</tr>
<TR vAlign=top bgColor=#BECFF1>
<TD class=main1 colSpan=2 width="548" height="31">订单详细目录--</TD></TR>
<%
set rs2=server.createobject("adodb.recordset")
sqltext2="select * from book_sell where order_Id=" & id
rs2.open sqltext2,cn,1,1
%>
<TR vAlign=top bgColor=#BECFF1>
<TD class=main1 colSpan=2 width="548" height="15">
<div align="center">
<table border="1" cellpadding="0" cellspacing="0" width="100%" bordercolorlight="#BECFF1" bordercolordark="#BECFF1" class=main1 height="68">
<tr bgcolor="#8CAAE7">
<td width="16%" height="18" align="center">编号</td>
<td width="33%" height="18" align="center">书名</td>
<td width="21%" height="18" align="center">价格</td>
<td width="12%" height="18" align="center">数量</td>
<td width="18%" height="18" align="center">金额小计</td>
</tr>
<%Sum=0
While Not rs2.EOF%>
<tr bgcolor="#8CAAE7">
<td width="22%" align="center" height="22"><%=rs2("book_Id")%></td>
<td width="33%" align="center" height="22"><%=rs2("book_Name")%></td>
<td width="21%" align="center" height="22"><%=rs2("Price")%></td>
<td width="12%" align="center" height="22"><%=rs2("Num")%></td>
<td width="18%" align="center" height="22"><%=rs2("Price")*rs2("Num")%>元</td>
<%Sum=Sum+rs2("Price")*rs2("num")%>
</tr>
<%
rs2.MoveNext
Wend
%>
</center>
<tr>
<td width="100%" colspan="5" height="22">
<p align="right"><font color="#FF0000">总计金额</font>：<%=Sum%>元</p>
</td>
</tr>
</table>
</div>
</TD></TR>
<center>
<TR bgColor=#BECFF1>
<TD class=main1 colSpan=2 width="548" height="27">
<p align="center">
<%If rs("Flag")="尚未处理" Then%>
<input type="submit" value="订单处理" name="B1">
<%
rs.close
rs2.close
cn.close
End If
%>
<input type="button" value="返回" name="B4" onclick="javascript:window.history.go(-1)">
</TD></TR>
<TR bgColor=#BECFF1>
<TD class=main1 colSpan=2 width="548" height="4" bgcolor="#BECFF1"></TD></TR></TBODY></TABLE>
</center>
</div>
</form>
</body>
</html>