📄 add_deltree.asp
字号:
<% @language="vbscript" %>
<!--#include file="conn.asp" -->
<%
if session("name")="" or session("dd")="" or int(dd)<>int(mclass) then
response.write "SORRY <br>"
response.write "数据在携带中出现意外！<br>"
response.write "<a href=login.asp>回去重来</a>"
response.end
end if
if session("quanxian")="1" then
response.write "SORRY <br>"
response.write "您的权限不够！请勿尝试非法访问！<br>"
response.end
end if
response.buffer=true
Response.Expires=0
id=Request("id")
dim rs,sql ,temprs,tempsql
set rs=server.createobject("adodb.recordset")
if session("chayue")="0" then
sql="delete from cust_user where id="&id&" and vest_m="&session("dd")
else
sql="delete from cust_user where id="&id&" and kongzhi='"&session("name")&"' and vest_m="&session("dd")
end if
rs.open sql,conn,1,3
set rs=nothing
conn.close
set conn=nothing
%>
<html>
<head>
<title>正在进入管理页面</title>
<meta http-equiv=refresh content="1; url=c_userlist.asp?mclass=<%=session("dd")%>&cust_s=<%=request("cust")%>&sclass=<%=request("sclass")%>">
<BODY bgcolor="#ffffff" text="#000000" link="#000080" alink="#800000" vlink="#2f2f4f" marginheight=0 marginwidth=0 topmargin=10 leftmargin=20 rightmargin=0>
Loading ....
<p align="center">正在返回...</p>
<p align="center">正在加载请稍后......</p>
</body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -