?? genjin_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 "數(shù)據(jù)在攜帶中出現(xiàn)意外！<br>"
response.write "<a href=login.asp>回去重來</a>"
response.end
end if
if session("quanxian")="1" then
response.write "SORRY <br>"
response.write "您的權(quán)限不夠！請勿嘗試非法訪問！<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 genjin where id="&id&" and vest_m="&session("dd")
else
sql="delete from genjin 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>?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -