<% If CurrentPage > 1 Or PE_Cache.CacheIsEmpty(ChannelID & "_HTML_Index") Then MaxPerPage = MaxPerPage_Index SkinID = DefaultSkinID PageTitle = "Ê×Ò³" strPageTitle = strPageTitle & " >> " & PageTitle strNavPath = strNavPath & " " & strNavLink & " " & PageTitle strFileName = ChannelUrl_ASPFile & "/Index.asp" Call PE_Content.GetHTML_Index If CurrentPage = 1 Then PE_Cache.SetValue ChannelID & "_HTML_Index", strHtml Else strHtml = PE_Cache.GetValue(ChannelID & "_HTML_Index") End If Response.Write strHtml Set PE_Content = Nothing Call CloseConn %>