📄 orders.asp
字号:
<!--#include file="conn.asp"-->
<%
if session("admin_name")="" then
response.redirect "error.asp?error=001"
end if
%><%on error resume next%>
<%
'开始完成操作
if request("action")="modi" then
id=request("id")
errmsg=replace(request("errmsg"), ">", ">")
errmsg=replace(errmsg, "<", "<")
errmsg=replace(errmsg, "'","’")
conn.execute "update 56770_orders set errmsg='"&errmsg&"' where id="&id
if request("order_zt")="y" then conn.execute "update 56770_orders set order_zt=true where id="&id
if request("order_zt")="" then conn.execute "update 56770_orders set order_zt=false where id="&id
if request("order_zf")="y" then conn.execute "update 56770_orders set order_zf=true where id="&id
if request("order_zf")="" then conn.execute "update 56770_orders set order_zf=false where id="&id
if request("order_cw")="y" then conn.execute "update 56770_orders set order_cw=true where id="&id
if request("order_cw")="" then conn.execute "update 56770_orders set order_cw=false where id="&id
'返回操作页面
url="orders_list.asp"
response.write "订单资料已修改成功，本页面2秒后返回."
response.write "<meta http-equiv=refresh content=2;url=" & url & ">"
response.end
end if
%>
<%
id=request("id")
set rs=server.createobject("adodb.recordset")
sql="select * from 56770_orders where id=" & id
rs.open sql, conn, 1, 1
order_zf=""
order_zt=""
order_cw=""
if rs("order_zf")=True then order_zf="checked"
if rs("order_zt")=True then order_zt="checked"
if rs("order_cw")=True then order_cw="checked"
if rs("errmsg")="" or rs("errmsg")="无" then
errmsg="此订单并非错误订单"
else
errmsg=rs("errmsg")
end if
rs.close
set rs=nothing
%>
<html>
<head>
<title>电子购物程式后台管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css.css" type="text/css">
</head>
<body text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border="0" cellspacing="1" cellpadding="2" bgcolor="#FFFFFF" vspace="0" hspace="0">
<tr bgcolor="#FFCC33">
<td height="27" background="images/admin_bg_1.gif" bgcolor="#FFFFFF">.:: 您可以在这里进行用户订单相关操作</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="50"> </td>
</tr>
</table>
<table border="0" cellspacing="1" cellpadding="4" bgcolor="#FFFFFF" width="450" align="center">
<form action="orders.asp" method="post" name="orders">
<tr bgcolor="#6699CC">
<td width="70">订单状态：</td>
<td>
<input type="checkbox" name="order_zf" value="y" <%=order_zf%>>
已支付
<input type="checkbox" name="order_zt" value="y" <%=order_zt%>>
已发货
<input type="checkbox" name="order_cw" value="y" <%=order_cw%>>
无效订单</td>
</tr>
<tr bgcolor="#B0CBE6">
<td valign="top"><br>
附加信息：</td>
<td bgcolor="#B0CBE6">
<textarea name="errmsg" rows="6" cols="40"><%=errmsg%></textarea>
</td>
</tr>
<tr bgcolor="#B0CBE6">
<td colspan="2">
<div align="center">
<input type="submit" name="Submit" value="修改">
<input type="reset" name="Submit2" value="重填">
<input type="hidden" name="id" value="<%=id%>">
<input type="hidden" name="action" value="modi">
</div>
</td>
</tr>
</form>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -