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

Class Display
        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()
			dim Club:set Club=new ClubDisplayCls
			 Club.HSK_Run()
			 Set Club=Nothing
		End Sub
End Class
%>
