admin_admindel.asp

来自「大榕树网络文章管理系统」· ASP 代码 · 共 24 行

<%
Option Explicit
Response.buffer=true
const purviewlevel=1
%>
<!--#include file="admin_PurviewChe.asp" -->
<!--#include file="conn.asp" -->
<%
dim adminid,admindel,sql
adminid=trim(request.querystring("adminid"))
admindel=trim(request("admindel"))
if admindel="del" then
if adminid<>"" then
sql="delete * from admin where adminid="&adminid&""
conn.execute sql
call closeconn()
response.redirect("admin_AdminMan.asp")
else
response.redirect("admin_AdminMan.asp")
end if
else
response.redirect("admin_AdminMan.asp")
end if
%>