📄 ad_operate.asp
字号:
<!-- #Include File=../ad_check.asp -->
<!-- #Include File=../sys.asp -->
<!-- #Include File=../sys/inc/prompt.inc -->
<%
dim subid,successmess
action=trim(request("action"))
id=trim(request("id"))
call conned()
select case action
case "pass"
sql="update userinfo set bclass=1 where id="&id
conn.execute(sql)
successmess="会员审核通过!"
case "lock"
sql="update userinfo set bclass=2 where id="&id
conn.execute(sql)
successmess="该会员已经被锁定!"
case "deluser"
sql="delete * from userinfo where id="&id
conn.execute(sql)
successmess="删除成功!"
case "unlock"
sql="update userinfo set bclass=1 where id="&id
conn.execute(sql)
successmess="已经解除对该会员的锁定!"
case "unlock"
sql="delete * from revert where id="&id
'response.write(sql)
conn.execute(sql)
successmess="删除成功!"
end select
conn.close
set conn=nothing
call successclose()
'====================================================
'程序制做:迅捷网络. http://www.soonhost.com
'迅捷主机网 -- 域名注册、主机租用、网站建设、脚本开发
'网址:http://www.soonhost.com
'msn:soonhost@hotmail.com
'请保留以上版权信息,谢谢合作!
'====================================================
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -