<!--#include file="inc/conn.asp" -->
<%
'软件名称：MacCMS
'开发作者：MagicBlack    官方网站：http://www.maccms.com/
'--------------------------------------------------------
'适用本程序需遵循 CC BY-ND 许可协议
'这不是一个自由软件！您只能在不用于商业目的的前提下对程序代码进行修改和使用；
'不允许对程序代码以任何形式任何目的的再发布。
'--------------------------------------------------------
%>
<%
    If app_install = 0 Then redirect "install/"
    page = be("all", "page")
    If Not isNum(page) Then page = 1 Else page = CInt(page)
    If page < 1 Then page = 1
    If app_vodviewtype < 2 Or app_vodviewtype = 3 Then
        attemptCacheFile "app", "index"&page
        objTemplate.html = getFileByCache("template_index", app_installdir & "template/" & app_templatedir & "/" & app_htmldir & "/index.html")
        appid=10
        cacheName = "vodindex"&page
        If chkCache(cacheName) Then
            objTemplate.html = getCache(cacheName)
        Else
            objTemplate.mark
            objTemplate.vodpagelist
            objTemplate.pageshow
            objTemplate.ifEx
            setCache cacheName, objTemplate.html
        End If
        setCacheFile "app", "index"&page, objTemplate.html
        objTemplate.run
        writeA objTemplate.html
    Else
        redirect objTemplate.getIndexLink()
    End If
    dispseObj()
%>