ordercheck.asp

来自「A Design and Implementation of The Onli」· ASP 代码 · 共 31 行

ASP
31
字号
<!--#include file="../conndb.asp"-->
<!--#include file="isAdmin.asp"-->
<html>
<head>
<title>订单管理</title>
</head>
<body>
<%
'根据提交信息来源判断订单状态:
'表AdminChecked字段:1 - 用户提交;2-管理员已经处理;3-已经发货;4-已经结账

 Dim iflag,id,n
 id = Request.QueryString("id")
 '更新状态值
 iflag = Request.QueryString("flag")
 '如果iflag=5,表示删除
 If iflag=5 Then
   sql = "Delete From Basket Where id="&id
 Else
   sql = "Update Basket Set AdminChecked="&iflag&" Where id="&id
 End If
 Conn.Execute(sql)
 Response.Write "<h2>订单处理完毕!</h2>"
%>
</body>
<script language="javascript">
  // 刷新父级窗口
  opener.location.reload();
  setTimeout("window.close()",800);
</script>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?