如题

改动会很多

给你提醒定义一个标签 比如<<FY>>

修改ks_cls下面 的Kesion.Label.CommonCls.asp

搜索  分页静态化结束

按下面红色部分代码修改

FileStr = ReplaceRA(FileStr, SecondDomain)
      if (TotalPage-I+1>0) Then
       Dim TempFilePath
       If I = 1  Then
       TempFilePath = FilePath & Index
       Else
       TempFilePath = FilePath & Fname & "_" & TotalPage-I+1 & FExt
       End If
                if i>1 then  
       FileStr = Replace(FileStr, "<<FY>>", "第"&I&"页")
       else
        FileStr = Replace(FileStr, "<<FY>>", "")
       end if
       Call FSOSaveFile(FileStr, TempFilePath)

在栏目模板中调用 <<FY>>就可以了

这只是实现功能 如果完美点那你要多多研究啊

以下是演示

伪静态：http://www.maitu.cc/list-1277-6.html

静态：http://www.slearning.cn/web/info/hy/index_28.html

额 动态的暂无演示 不过还是完美支持的

二楼好样的！