📄 admin_dd.asp
字号:
<!--#Include File="conn.asp"-->
<%
set rsUser=server.createobject("adodb.recordset")
sql="select * from orders where ddbh='"&request("ddbh")&"'"
rsUser.open sql,conn,3,3
if rsUser.eof and rsUser.bof then
response.write "<script language=JavaScript>{window.alert('对不起,没有这样的订单号!');window.history.go(-1)}</script>"
response.end
End If
khbh=rsUser("khbh")
%>
<%
set rs=server.CreateObject("ADODB.recordset")
rs.open "index",conn,3,3
name=rs("name")
rs.close
set rs=nothing
%>
<HTML><HEAD><TITLE><%=name%>购物--管理系统</TITLE>
<META NAME="author" CONTENT="onsystem">
<META NAME="description" CONTENT="<%=name%>销售">
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META name=keywords content="<%=name%>,电脑硬件,网络产品,软件开发,综合布线,办公设备,网站建设,办公耗材,硬件维修,<%=http%>">
<BASE onmouseover=window.status="<%=name%>(<%=http%>)----为您提供最丰富的网络资源!";return true>
<LINK href="../css/style.css" type=text/css rel=stylesheet>
</HEAD>
<BODY vLink=#000000 linsk=#000000 leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%
if request("action")="del" then
set rs=server.createobject("adodb.recordset")
sql="DELETE id from oitems where ddbh='"&request("ddbh")&"'"
rs.open sql,conn,3,3
rs.update
rs.close
set rs=nothing
set rs=server.createobject("adodb.recordset")
sql="DELETE id from orders where ddbh='"&request("ddbh")&"'"
rs.open sql,conn,3,3
rs.update
rs.close
set rs=nothing
response.write "<script language=JavaScript>{window.alert('订单删除成功!');window.close();}</script>"
response.end
end if
%>
<%
if request("action")="sh" then
set rs=server.createobject("adodb.recordset")
sql="select * from orders where ddbh='"&request("ddbh")&"'"
rs.open sql,conn,3,3
if rs.eof and rs.bof then
response.write "<script language=JavaScript>{window.alert('对不起,没有这样的订单号!');window.close();}</script>"
response.end
else
rs("zt")="已付款"
rs.update
response.write "<script language=JavaScript>{window.alert('审核订单成功!');window.location='admin_dd.asp?ddbh="&request("ddbh")&"'}</script>"
response.end
rs.close
set rs=nothing
end if
end if
%>
<%
if request("action")="qxsh" then
set rs=server.createobject("adodb.recordset")
sql="select * from orders where ddbh='"&request("ddbh")&"'"
rs.open sql,conn,3,3
if rs.eof and rs.bof then
response.write "<script language=JavaScript>{window.alert('对不起,没有这样的订单号!');window.close();}</script>"
response.end
else
rs("zt")="未审核"
rs.update
response.write "<script language=JavaScript>{window.alert('取消订单审核成功!');window.location='admin_dd.asp?ddbh="&request("ddbh")&"'}</script>"
response.end
rs.close
set rs=nothing
end if
end if
%>
<div align="center">
<table width="760">
<tr>
<td>
<input type="button" value="打 印" style="CURSOR:hand" onClick="javascript:window.print()">
</td>
</tr>
</table>
<table width="760" border="1" cellpadding="0" height="400" cellspacing="0" bordercolordark="#CCCCCC" bordercolorlight="#FFFFFF">
<tr>
<td valign="top" align="center">
<table width="100%" border="0">
<tr>
<td width="26%"><b><font size="5">AX#<i><%=rsUser("ddbh")%></i></font></b>
</td>
<td colspan="5" align="right" valign="bottom"><%=rsUser("time")%>
</td>
</tr>
<%
set rs1=server.createobject("adodb.recordset")
sqltext="select * from customers where bianhao='"&khbh&"'"
rs1.open sqltext,conn,3,3
%>
<tr bgcolor="#FFBE93">
<td colspan="2"><b>订货人</b></td>
<td colspan="4"><b>收货人</b></td>
</tr>
<tr>
<td width="24%" bgcolor="#E6E6E6">名称</td>
<td width="26%"><%=rs1("name")%></td>
<td width="24%" bgcolor="#E6E6E6">名称</td>
<td width="26%" colspan="3"><%=rsUser("custname")%></td>
</tr>
<tr>
<td width="24%" bgcolor="#E6E6E6">联系人</td>
<td width="26%"><%=rs1("contact")%></td>
<td width="24%" bgcolor="#E6E6E6">联系人</td>
<td width="26%" colspan="3"><%=rsUser("custname")%></td>
</tr>
<tr>
<td width="24%" bgcolor="#E6E6E6">省(自治区,直辖市)</td>
<td width="26%"><%=rs1("prov")%></td>
<td width="24%" bgcolor="#E6E6E6">省(自治区,直辖市)</td>
<td width="26%" colspan="3"><%=rsUser("prov")%></td>
</tr>
<tr>
<td width="24%" bgcolor="#E6E6E6">城市</td>
<td width="26%"><%=rs1("city")%></td>
<td width="24%" bgcolor="#E6E6E6">城市</td>
<td width="26%" colspan="3"><%=rsUser("city")%></td>
</tr>
<tr>
<td width="24%" bgcolor="#E6E6E6">县/区</td>
<td width="26%"><%=rs1("district")%></td>
<td width="24%" bgcolor="#E6E6E6">县/区</td>
<td width="26%" colspan="3"><%=rsUser("district")%></td>
</tr>
<tr>
<td width="24%" bgcolor="#E6E6E6">详细地址</td>
<td width="26%"><%=rs1("address")%></td>
<td width="24%" bgcolor="#E6E6E6">详细地址</td>
<td width="26%" colspan="3"><%=rsUser("address")%></td>
</tr>
<tr>
<td width="24%" bgcolor="#E6E6E6">邮政编码</td>
<td width="26%"><%=rs1("postcode")%></td>
<td width="24%" bgcolor="#E6E6E6">邮政编码</td>
<td width="26%" colspan="3"><%=rsUser("postcode")%></td>
</tr>
<tr>
<td width="24%" bgcolor="#E6E6E6">电话</td>
<td width="26%"><%=rs1("tel")%></td>
<td width="24%" bgcolor="#E6E6E6">电话</td>
<td width="26%" colspan="3"><%=rsUser("tel")%></td>
</tr>
<tr>
<td colspan="6" bgcolor="#FFBE93"><b>其他信息</b></td>
</tr>
<tr>
<td width="24%" bgcolor="#E6E6E6">运输方式</td>
<td width="26%"><%=rsUser("sw_shipvia")%>
</td>
<td width="24%" bgcolor="#E6E6E6">付款方式</td>
<td width="26%" colspan="3"><%=rsUser("sw_term")%></td>
</tr>
<tr>
<td colspan="6" bgcolor="#FFBE93"><b>购买的货品资料</b></td>
</tr>
<tr>
<td colspan="6"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr valign="bottom" height="25">
<td width="14%"><div align="center">商品编号</div></td>
<td width="56%"><div align="center">商品名称</div></td>
<td width="11%"><div align="center">单价</div></td>
<td width="10%"><div align="center">数量</div></td>
<td width="9%"><div align="center">小计</div></td>
</tr>
<tr valign="top">
<td colspan="5" > <hr size=1> </td>
</tr>
<%
set rs=server.createobject("adodb.recordset")
sqltext="select * from oitems where ddbh= '"&request("ddbh")&"'"
rs.open sqltext,conn,3,3
while not rs.eof
%>
<tr>
<td width="14%"><div align="center"><a href="../item.asp?item=<%=rs("item")%>" target=_blank><%=rs("item")%></a></div></td>
<td width="56%"><%=rs("name")%></td>
<td width="11%"><div align="center"><font color="#FF0000">¥<%=rs("jiage")%></font></div></td>
<td width="10%"><div align="center"><%=rs("sl")%></div></td>
<td width="9%"><div align="center"><font color="#FF0000">¥<%=rs("jiage") * rs("sl")%></font></div></td>
</tr>
<%
rs.movenext
wend
%>
</table></td>
</tr>
<tr>
<td colspan="6"><hr size="1"></td>
</tr>
<tr>
<td colspan="6" align="right"><table width="25%" border="0" cellspacing="1">
<tr>
<td width="59%" bgcolor="#FFCC00" height="18">商品总值(含税)</td>
<td width="41%" height="18"><font color="#FF0000" face="宋体">¥<%=rsUser("Sum")%></font></td>
</tr>
<tr>
<td width="59%" bgcolor="#f7A51D">商品总重</td>
<td width="41%"><font face="宋体" color="#FF0000"><%=rsUser("zong")%><b>Kg</b></font></td>
</tr>
<tr>
<td width="59%" bgcolor="#FF9900">运输费用</td>
<td width="41%"><font color="#FF0000" face="宋体">¥<%=rsUser("yun")%></font></td>
</tr>
<tr>
<td width="59%" bgcolor="#FF6600">保险费</td>
<td width="41%"><font color="#FF0000" face="宋体">¥<%=rsUser("bao")%></font></td>
</tr>
<tr>
<td width="59%" bgcolor="#FF0000">总价(已包含折扣)</td>
<td width="41%"><font color="#FF0000" face="宋体">¥<%=rsUser("total")%></font></td>
</tr>
</table></td>
</tr>
<tr>
<td colspan="6"><div align="right"></div></td>
</tr>
</table>
</td>
</tr>
</table>
<table width="760">
<tr>
<td align="center">
<input type="button" style="CURSOR: hand" value="关闭窗口" onclick="javascript:window.close()">
<input type="button" style="CURSOR: hand" value="删除改订单" onclick="window.location='admin_dd.asp?action=del&ddbh=<%=rsUser("ddbh")%>'">
<%if rsUser("zt")="未审核" then%>
<input type="button" style="CURSOR: hand" value="审核改订单" onclick="window.location='admin_dd.asp?action=sh&ddbh=<%=rsUser("ddbh")%>'">
<%end if%>
<%if rsUser("zt")="已付款" then%>
<input type="button" style="CURSOR: hand" value="取消审核" onclick="window.location='admin_dd.asp?action=qxsh&ddbh=<%=rsUser("ddbh")%>'">
<%end if%>
</td>
</tr>
</table>
</div>
</BODY></HTML>
<%
conn.close
set conn=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -