<% Option Explicit %>
<!--#include file="../../Include/Const.asp" -->
<!--#include file="../../Include/Conn1.asp" -->
<!--#include file="../CheckAdmin.asp"-->
<%
dim Result,Selectid
Result=request.QueryString("Result")
SelectID=request.Form("SelectID")
select case Result
  case "Administrators"
    if SelectID<>"" then  conn.execute "delete from Angel_Admin where id in ("&SelectID&") and id<>1"
    response.redirect request.servervariables("http_referer")
  case "LoginLog"
    if SelectID<>"" then  conn.execute "delete from Angel_AdminLog where id in ("&SelectID&")"
    response.redirect request.servervariables("http_referer")
  case else
end select
%>