changeshopcheck.asp

来自「. 缓存处理技术」· ASP 代码 · 共 29 行

<!-- #include file="sysconfig.asp" -->
<!--#include file="checkadmin.asp"-->
<%
Call CheckAdminFlag(TempAdminFlag,3)

Dim Uid,Act,Status
uid=Request("id")
act=Request("act")
status=Request("Status")
if Not isNum(Status) then Call AlertInfo("出错了，参数传递有误！请重新尝试","",0)

if Uid="" or act="" or Status="" then
   Call AlertInfo("出错了，参数传递有误！请重新尝试","",0)
else

  if act="shop" then
     sql="update shops set shopcheck="& Status &" where shopid in ("& uid &")"
  else
     response.write"<script language=javascript>alert('店铺审核更新失败！');history.back(-1);</script>"
     response.end
  end if

end if
Conn.execute(sql)

Response.write"<script language=javascript>alert('店铺审核荐更新成功！');this.location.href='"& Cnbbr_comeurl &"';</script>"
Response.End
%>