KesionCMS x1.5栏目PC启用静态，手机版本列表页出现{PageListStr}标签的修正-领先建站CMS提供服务商我们专注于CMS建站产品的研发

5759 查看	5 回复

主题：[分享]KesionCMS x1.5栏目PC启用静态，手机版本列表页出现{PageListStr}标签的修正 [收藏主题]

转到：

科汛官方当前离线

47268 主题	145 广播	405 粉丝

级别:管理员

用户积分:101604 分
登录次数:7935 次
注册时间:2006/12/7
最后登录:2023/12/14
创始人

科汛官方发表于：2015/11/17 10:30:35 | 只看该作者查看该作者主题楼主

做线上考试培训就选#科汛网校

问题如题：

解决方法

打开ks_cls/kesion.label.functioncls.asp找到1619行，如下代码

   If (FCls.RefreshType = "Folder" And (KS.C_S(FCls.ChannelID,7)="0" or KS.C_S(FCls.ChannelID,7)="2" Or KS.C_C(FCls.RefreshFolderID,3)="2")) Or (FCls.RefreshType = "Special" And KS.Setting(78)="0") Then
   Application(KS.SiteSN&"PageParam")=LabelParamStr:Application("LabelStyle")=LabelStyle : GetPageList="{Tag:Page}": Exit Function
   End If

改成

   If (FCls.RefreshType = "Folder" And (Fcls.CallFrom3g="true" or KS.C_S(FCls.ChannelID,7)="0" or KS.C_S(FCls.ChannelID,7)="2" Or KS.C_C(FCls.RefreshFolderID,3)="2")) Or (FCls.RefreshType = "Special" And KS.Setting(78)="0") Then
   Application(KS.SiteSN&"PageParam")=LabelParamStr:Application("LabelStyle")=LabelStyle : GetPageList="{Tag:Page}": Exit Function
   End If

红色为增加的。

相关问题：

KesionCMS x1.5栏目PC启用静态，手机版本跳到PC版本的修正

解决见：http://bbs.kesion.com/forumthread-1284276.html

KesionCMS,,

做新职业技能培训平台就选#科汛网校