<!-- #include file="conn.asp" -->
<!-- #include file="cls_main.asp" -->
<!-- #include file="cls_regExp.asp" -->
<% dim obj,Mesky
set obj = New default_Down
	obj.AspInit()
set obj = nothing

class default_Down	
	Private Sub Class_Initialize()
		Set Mesky = New Cls_Main
	End Sub
	Private Sub Class_Terminate()
		Set Mesky = Nothing
	End Sub
	Public Sub AspInit()
		
		Dim arrMainPage, tempStr
		Call Mesky.LoadSetting()
		arrMainPage = Split(Mesky.ReadStylePage("Style_Down_Main"), "<!--|||-->")
		tempStr = arrMainPage(0) & arrMainPage(1) & arrMainPage(2) & arrMainPage(3) & arrMainPage(4) & arrMainPage(5)
		tempStr = regExp_showDownRes(tempStr)
		tempStr = regExp_showDownResImages(tempStr)
		tempStr = regExp_showDownResStat(tempStr)
		tempStr = regExp_showNews(tempStr)
		tempStr = Replace(regExp_AdvshowDownRes(tempStr), "../", "")
		
		tempStr = regExp_showCmsRes(tempStr)
		tempStr = regExp_showCmsResImages(tempStr)
		tempStr = regExp_showCmsResStat(tempStr)
		tempStr = Replace(regExp_AdvshowCmsRes(tempStr), "../", "")
		
		tempStr = Replace(tempStr, "{$page_title}", Mesky.Setting(0) & " ¡ª ÏÂÔØÊ×Ò³")
		Response.Write(tempStr)
		
		tempStr = Null
		arrMainPage = Null		
	End Sub
End Class
%>