www.gusucode.com > 公寓出租网站整站源码 1.0程序 > admin/Admin_OrderDetail.asp
<!--#include file="conn.asp"--> <!--#include file="admin.asp"--> <% id=request("id") page=request("page") set rs=server.createobject("adodb.recordset") sqltext="select * from OrderList where OrderNum='"&id&"'" rs.open sqltext,conn,1,1 %> <!-- #include file="Inc/Head.asp" --> <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0"> <tr> <td align="center" valign="top"> <strong><br> </strong> <table width="560" border="0" cellpadding="2" cellspacing="1" class="table_southidc"> <tr> <td class="back_southidc" height="25"> <div align="center"><strong><%=rs("OrderNum")%>号处理管理 <br> </strong></div></td> </tr> <tr> <form method='POST' action="Admin_OrderListSave.asp?OrderNum=<%=rs("OrderNum")%>"> <td> <TABLE cellSpacing=1 cellPadding=4 width=562 bgColor=#006699 height="436"> <TBODY> <TR> <TD height="10" colSpan=2 valign="top" bgcolor="#DBDBDB"></TD> </TR> <TR bgColor=#eeeeee> <TD height="32" colSpan=2><font color="#000000">客户订单单详细资料</font></TD> </TR> <TR> <TD width=108 bgColor=#DBDBDB height=25 align="right"><font color="#000000">订单单号:</font></TD> <TD width=433 height=25 bgcolor="#eeeeee"> <%=rs("OrderNum")%></TD> </TR> <tr> <TD width=108 bgColor=#DBDBDB height=25 align="right">公司名称<font color="#000000">:</font></TD> <TD width=433 height=25 bgcolor="#eeeeee"> <%=rs("CompanyName")%></TD> </TR> <tr> <TD width=108 bgColor=#DBDBDB height=25 align="right"><font color="#000000">联系人:</font></TD> <TD width=433 height=25 bgcolor="#eeeeee"> <%=rs("Receiver")%></TD> </tr> <tr> <TD width=108 bgColor=#DBDBDB height=25 align="right"><font color="#000000">收货地址:</font></TD> <TD width=433 height=-2 bgcolor="#eeeeee"> <%=rs("Add")%></TD> </tr> <tr> <TD bgColor=#DBDBDB height=25 align="right"><font color="#000000">联系电话:</font></TD> <TD width=433 height=25 bgcolor="#eeeeee"> <%=rs("Phone")%></TD> </tr> <tr> <TD width=108 bgColor=#DBDBDB height=25 align="right">联系传真<font color="#000000">:</font></TD> <TD width=433 height=25 bgcolor="#eeeeee"> <%=rs("Fax")%></TD> </tr> <tr> <TD width=108 bgColor=#DBDBDB height=25 align="right"><font color="#000000">电子信箱:</font></TD> <TD width=433 height=25 bgcolor="#eeeeee"> <%=rs("EMail")%></TD> </tr> <tr> <TD height=25 align="right" bgColor=#DBDBDB>标题<font color="#000000">:</font></TD> <TD height=25 bgcolor="#eeeeee"> <%=rs("Subject")%></TD> </tr> <tr> <TD width=108 height=25 align="right" bgColor=#DBDBDB><font color="#000000">备注:</font></TD> <TD width=433 height=25 bgcolor="#eeeeee"> <%=rs("Notes")%></TD> </tr> <tr> <TD width=108 bgColor=#DBDBDB height=24 align="right"><font color="#000000">订单日期:</font></TD> <TD width=433 height=24 bgcolor="#eeeeee"> <%=rs("OrderTime")%></TD> </tr> <tr> <TD width=108 bgColor=#DBDBDB height=25 align="right"><font color="#000000">订单是否已经处理:</font></TD> <TD width=433 height=25 bgcolor="#eeeeee"> <%If rs("Flag")="Yes" Then%> 已处理 <%else%> 未处理 <%End If%> </TD> </tr> <TR> <TD height="31" colSpan=2 valign="top" bgcolor="#eeeeee"> <p align="center">订单商品细目</p></TD> </TR> <% set rs2=server.createobject("adodb.recordset") sqltext2 = "select A.OrderNum,A.Product_Id,A.BuyPrice,A.ProductUnit,"&_ "C.Title,C.Price "&_ " from OrderDetail A,Product C"&_ " where A.OrderNum='"&id&"' and A.Product_Id=C.Product_Id" rs2.open sqltext2,conn,1,1 %> <TR> <TD height="15" colSpan=2 valign="top" bgcolor="#eeeeee"> <div align="center"> <table border="1" cellpadding="0" cellspacing="0" width="100%" bordercolorlight="#006699" bordercolordark="#eeeeee" height="67"> <tr> <td width="49%" bgcolor="#DBDBDB" height="21" align="center"><font color="#000000">产品名称</font></td> </tr> <% While Not rs2.EOF '计算总金额%> <tr> <td width="49%" align="center" height="22"><%=rs2("Title")%></td> </tr> <% rs2.MoveNext Wend %> </table> </div></TD> </TR> <center> <TR> <TD height="25" colSpan=2 bgcolor="#eeeeee"> <p align="center"> <%If rs("Flag")="No" Then%> <input type="submit" value="订单处理" name="B1"> <% rs.close rs2.close conn.close End If %> <input type="button" value="返回" name="B4" onclick="javascript:window.history.go(-1)"> </TD> </TR> <TR bgColor=#DBDBDB> <TD height="3" colSpan=2></TD> </TR> </center> </TABLE></td> </form> </tr> </table></td> </tr> </table> <!-- #include file="Inc/Foot.asp" -->