<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%option explicit%>
<!--#include file="../Conn.asp"-->
<!--#include file="../HSK_Cls/HSK.StaticCls.asp"-->
<!--#include file="../HSK_Cls/HSK.Label.CommonCls.asp"-->
<%
Dim KSCls
Set KSCls = New ClassCls
KSCls.HSK_Run()
Set KSCls = Nothing

Class ClassCls
        Private KS
		Private Sub Class_Initialize()
		  Set KS=New PublicCls
		End Sub
        Private Sub Class_Terminate()
		 Call CloseConn()
		 Set KS=Nothing
		End Sub
		Public Sub HSK_Run()
		  IF KS.ChkClng(KS.S("ID"))=1148 Then Response.Redirect("/Task/")
		  IF KS.ChkClng(KS.S("ID"))=1149 Then Response.Redirect("/Task/index.asp?0-0-2-0-0")
		  IF KS.ChkClng(KS.S("ID"))=1150 Then Response.Redirect("/Task/index.asp?0-0-3-0-0")
		  StaticCls.Run()
	    End Sub
End Class
%>

 
