<!--#include file="tgzcm.Conn.asp"-->
<!--#include file="tgzcm.Include/tgzcm.Lable.All.asp"-->
<%
startime=timer()
If tgzcm(17)="html"  Then
	Response.Redirect"index."&Htmlid(6)
Else
    If HtmlId(0)="1" Then
		'===========判断更新缓存条件======
		t1=time()
		t3=dateadd("h",PE_CLng(HtmlId(1)),Application(tgzcm(1)&"time"))'缓存内容超过指定小时则更新数据
		If Application(tgzcm(1)&"time")="" or Application(tgzcm(1)&"index")="" or t1>t3 or Application(tgzcm(1)&"date")<>date Then
			tgzcm_title=tgzcm(0)&"首页"
			Call tgzcm_Lable_Head(tgzcm_Lable_Html(tgzcmPath&"skin/"&tgzcm(12)&"/"&tgzcmId(21)&"tgzcm_Default.html"))
			Call tgzcm_Lable_List(moban)
			Call tgzcm_Lable_News(moban)
			Call tgzcm_Lable_Product(moban)
			Call tgzcm_Lable_All(moban)
			Response.Write(moban)
			Application(tgzcm(1)&"time")=time
			Application(tgzcm(1)&"date")=date
            Application(tgzcm(1)&"index")=moban
		Else
			Response.Write(Application(tgzcm(1)&"index"))
		End if
	Else'不开启缓存
		tgzcm_title=adnim(0)&"首页"
		Call tgzcm_Lable_Head(tgzcm_Lable_Html(tgzcmPath&"skin/"&tgzcm(12)&"/"&tgzcmId(21)&"tgzcm_Default.html"))
		Call tgzcm_Lable_List(moban)
		Call tgzcm_Lable_News(moban)
		Call tgzcm_Lable_Product(moban)
		Call tgzcm_Lable_All(moban)
		Response.Write(moban)
	End If
	Call CloseConn
End If
endtime=timer()
%>