<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/Function.asp"-->
<%
Call ChkLogin(session("WebAdminsUserName"))
Call ConnectionDataBase(2)
Action = Request("Action")
Select Case Action
	Case "DelClass"
		Call DelClass
End Select

Sub DelClass()
	ID = Request.QueryString("ID")
	Call ChkIsNumber(ID,"参数类型错误!")
	Conn.Execute("DELETE FROM T_Class WHERE AllID like '%|"& ID &"|%'")
	Conn.Execute("DELETE FROM T_Class WHERE ID = " & ID)	
	Call CloseDatabase
	Call Success("记录删除成功!",Request.ServerVariables("HTTP_REFERER"))
End Sub
%>