www.gusucode.com > 中网景企业网站源码时尚版 2009.73码程序 > admin/orderdetail.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="opendb.asp" -->
<%
Call CheckAdmin()
'Call CnkAdminRight(1)
dim zhuangtai,orderid,total,OrderState,payway,discount,sendpay,alltotalprice
zhuangtai=request("zhuangtai")
orderid=request("orderid")
payway=request("payway")
discount=Trim(Request.Form("discount"))
sendpay=Trim(Request.Form("sendpay"))
if zhuangtai<>"" then conn.execute("update cnk_orderform set zhuangtai="&zhuangtai&" where orderid='"&orderid&"'")
if request("action")="moditotalprice" then
if discount="" then discount=0
if sendpay="" then sendpay=0
alltotalprice=cdbl(Trim(Request.Form("totalprice")))+cdbl(sendpay)+cdbl(discount)
conn.execute("update cnk_orderform set discount="&discount&",payway='"&payway&"',sendpay="&sendpay&",alltotalprice="&alltotalprice&" where orderid='"&orderid&"'")
end if
%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="Author" content="CNKBBS Powered by websys.cn - Leung">
<link href="admin.css" rel="stylesheet" type="text/css">
<script language="javascript" src="inc/cnkgl.js"></script>
<script language="JavaScript">
<!--
function cform(){
if(!confirm("真的删除吗? 注意,删除后不能恢复"))
return false;
}//-->
</script>
<style type="text/css">
<!--
.style1 {color: #FF0000}
-->
</style>
</head>
<body>
<div class="cnkbox">
<div class="title">订单详细</div>
<% sql="select * from cnk_orderform where orderid='"&orderid&"'"
rs.open sql,conn,1,1
OrderState=rs("zhuangtai")
total=rs("alltotalprice") %>
<br>
<table border="0">
<tr>
<td>改变订单状态：</td>
<td><input name="Submit" type="submit" class="button" value="已下单，待付款" disabled="disabled" onClick="return false;"></td>
<td>→</td>
<form name="form01" method="post" action="orderdetail.asp">
<td>
<input name="submit" type="submit" class="button" value="已付款，未发货"<% If OrderState>=1 Then Response.Write(" disabled=""disabled"" onClick=""return false;""")%>>
<input name="orderid" type="hidden" id="orderid" value="<%= orderid %>">
<input name="zhuangtai" type="hidden" id="zhuangtai" value="1"> </td>
</form>
<td>→</td>
<form name="form02" method="post" action="orderdetail.asp">
<td>
<input name="submit" type="submit" class="button" value="已发货，未确认或调试中"<% If OrderState>=2 Then Response.Write(" disabled=""disabled"" onClick=""return false;""")%>>
<input name="orderid" type="hidden" id="orderid" value="<%= orderid %>">
<input name="zhuangtai" type="hidden" id="zhuangtai" value="2"> </td>
</form>
<td>→</td>
<form name="form03" method="post" action="orderdetail.asp">
<td>
<input name="submit" type="submit" class="button" value="交易完成"<% If OrderState=3 Then Response.Write(" disabled=""disabled"" onClick=""return false;""")%>>
<input name="orderid" type="hidden" id="orderid" value="<%= orderid %>">
<input name="zhuangtai" type="hidden" id="zhuangtai" value="3"> </td>
</form>
<% If OrderState=3 Then %>
<td>→</td>
<td class="red">订单已经完成！</td>
<% End If %>
</tr>
</table>
<form name="form1" method="post" action="orderdetail.asp">
<table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#666666">
<tr>
<td width="16%" bgcolor="#CCCCCC">订单号：</td>
<td width="34%" bgcolor="#FFFFFF"><%= rs("orderid") %> </td>
<td width="18%" bgcolor="#CCCCCC">下单日期：</td>
<td width="32%" bgcolor="#FFFFFF"><%= rs("initime") %> </td>
</tr>
<tr>
<td bgcolor="#CCCCCC">订单状态：</td>
<td bgcolor="#FFFFFF"><%= OrderStateName(rs("zhuangtai")) %></td>
<td bgcolor="#CCCCCC"> </td>
<td bgcolor="#FFFFFF"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC">用户名：</td>
<td bgcolor="#FFFFFF"><%= rs("username") %></td>
<td bgcolor="#CCCCCC">单位(公司)名称：</td>
<td bgcolor="#FFFFFF"><%= rs("company") %></td>
</tr>
<tr>
<td bgcolor="#CCCCCC">地址：</td>
<td bgcolor="#FFFFFF"><%= rs("address") %> </td>
<td bgcolor="#CCCCCC">支付方式：</td>
<td bgcolor="#FFFFFF"><input name="payway" type="text" class="input" id="payway" value="<%= rs("payway") %>" size="15" maxlength="50"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC">电话：</td>
<td bgcolor="#FFFFFF"><%= rs("tel") %> </td>
<td bgcolor="#CCCCCC">商品总额：</td>
<td bgcolor="#FFFFFF"><%= rs("totalprice") %><input name="totalprice" type="hidden" id="totalprice" value="<%= rs("totalprice") %>"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC">即时通讯：</td>
<td bgcolor="#FFFFFF"><%= rs("im") %></td>
<td bgcolor="#CCCCCC">运费：</td>
<td bgcolor="#FFFFFF"><input name="sendpay" type="text" class="input" id="sendpay" value="<%= rs("sendpay") %>" size="15" maxlength="50"></td>
</tr>
<tr>
<td bgcolor="#CCCCCC">E-mail：</td>
<td bgcolor="#FFFFFF"><%= rs("email") %></td>
<td bgcolor="#CCCCCC">卖家折扣：</td>
<td bgcolor="#FFFFFF"><input name="discount" type="text" class="input" id="discount" value="<%= rs("discount") %>" size="15" maxlength="50"> </td>
</tr>
<tr>
<td bgcolor="#CCCCCC">备注说明：</td>
<td bgcolor="#FFFFFF"><%= rs("note") %></td>
<td bgcolor="#CCCCCC">实付总额：</td>
<td bgcolor="#FFFFFF"><%= rs("alltotalprice") %></td>
</tr>
</table>
<div align="center"><br>
<input name="Submit3" type="submit" class="button" value="修改">
<input name="Submit2" type="button" class="button" onClick="window.location.href='order.asp';" value="返回">
<input name="orderid" type="hidden" id="orderid" value="<%= orderid %>">
<input name="action" type="hidden" id="action" value="moditotalprice">
</div>
</form>
<br>
订购产品：
<% rs.close
rs.open "select cnk_orderdetail.*,cnk_products.product_number,cnk_products.product_name from cnk_orderdetail,cnk_products where cnk_orderdetail.pid=cnk_products.id and cnk_orderdetail.orderid='"&orderid&"'",conn,1,1%>
<table width="100%" align="center" cellspacing="1" bgcolor="#666666" >
<tr bgcolor="#CCCCCC">
<td width="16%">产品编号</td>
<td width="34%">产品名称</td>
<td width="15%" align="center">数 量</td>
<td width="16%" align="center">单 价</td>
<td width="19%" align="center">小计</td>
</tr>
<%do while not rs.eof %>
<tr bgcolor="#FFFFFF">
<td><%=rs("product_number")%></td>
<td><%=rs("product_name")%></td>
<td align="center"><% =rs("quantity")%></td>
<td align="center"><% =rs("price")%></td>
<td align="center"><% =rs("quantity")*rs("price")%></td>
</tr>
<%
rs.movenext
loop
rs.close%>
</table>
</div>
</body>
</html>