本方法需要修改代码,默认采用的样式为不分页,在后台为style4样式。
修改方法如下:
一、打开Config/Picturelabel.xml,修改
<label name="style4">
<![CDATA[
代码片段
]]>
kesion科讯搜索分页{@search.showpage}样式修改办法
打开KS_Cls/Kesion.CommonCls.asp 文件,查找函数名:ShowPage,大约2199行,针对代码进行修改!注意此处修改分页样式会影响后台分页样式
kesion科讯分页样式pagenumlist修改
打开KS_Cls/Kesion.Label.CommonCls.asp 文件,查找:以下为分页静态化,大约1861行,然后找到1918行,如下代码:
kesion科讯默认的上一篇、下一篇的标签为{$GetNextArticle} {$GetPrevArticle} ,输出的样式仅仅为a href+标题,不能自定义样式,下面我们就通过修改代码来修改样式
打开KS_Cls/Kesion.Label.BaseFunCls.asp 文件,找到 函数名:ReplacePrevNext,大约261行
首先鄙视一下Kesion系统不支持模板判读语句和循环语句,这个在PHPCMS中就完全不是问题,但是无奈PHPCMS需要独立数据库,配置和转移也麻烦,这点上KesionCMS有绝对优势。
关于kesion科讯当前文章高亮是不能用系统函数标签的,因为系统函数标签循环体中无法获取到当前文章ID,所以只能用SQL标签。
解决办法直接看代码:
查询语句: select ID,Tid,Title from KS_Article where Tid='{$Param(0)}' order by id desc
是科讯内容中添加相同标题的文章内容,会提示“该类别已存在此篇文章”,如何取消重复限制? 方法很简单!
KS_Article第912行去掉如下行:
If Title <> "" And Tid <> "" And (Action = "Add") Then
SqlStr = "select * from " & KS.C_S(ChannelID,2) &" where Title='" & Title & "' And Tid='" & Tid & "'"
...使用科讯CMS发布栏目列表时,出现了
ADODB.Stream 错误 '800a0bbc' 写入文件失败。
D:\WEB\ADMIN\INCLUDE\../../KS_Cls/Kesion.Label.CommonCls.asp,行 912
'函数名:FSOSaveFile
'作 用:生成文件
'参 数: Content内容,路径 注意虚拟目录
...
科讯CMS上传图片提示经常提示“系统检查到您上传的文件可能存在危险代码,不允许上传!” ,有的图片可以用PS处理一下继续上传,有的即使处理之后还是不能上传!如下图所示:
...
用DW打开ks_cls/kesion.label.functioncls.asp
看到很多朋友在科讯论坛问标签,其实很多标签系统标签中都有,现在将科讯cms的标签整理出来,方便大家以后建站使用:
KESION标签清单一览表
网站安装目录 {$GetInstallDir}
网站标题 {$GetSiteTitle}
网站名称 {$GetSiteName}
网站Logo地址 {$GetSiteLogo}
...科讯CMS去掉内容去掉图片a href= javascript:; onclick= showimg等代码的方法
打开 KS_Cls\Kesion.Label.CommonCls.asp
找到以下代码,注销
re.Pattern = "<img.*?\ssrc=([^\""\'\s][^\""\'\s>]*).*?>"
...kesionCms内容页生成的时候,文章内容总是自动加上了<DIV id=MyContent>内容</DIV>,我觉得这样有点不太妥,主要是对防采集方面,内容容易被采集,去掉比较好。
使用科讯CMS发布内容后,前台会过滤掉部分关键词,比如“手机”被替换成了“手 ***”,取消过滤关键词的方法很简单,找到ks_cls/Config.Club.asp,清空相关内容即可,如下图:
...
admin文件夹下的KS.Update.asp
'是否允许自动检测最新版本 true 允许 false 不允许
Dim EnabledAutoUpdate:EnabledAutoUpdate=false
我们在使用科讯CMS的系统函数文章列表或终极分页列表时,如果循环体中包含{@photourl},则文章列表只显示有缩略图的文章,那么如果让科讯CMS文章列表显示无图文章呢? 解决方法如下:
打开KS_Cls/Kesion.Label.FunctionCls.asp,找到下面的代码:
If PrintType>=2 Then FieldStr=FieldStr & ",I.fulltitle as fulltitles,I.PhotoUrl,I.Intro" : If PrintType=2 or (instr(LabelStyle,"{@photourl}")>0 and PrintType>2) Then Param = Param & " And I.PicNews=1"
...首先在科讯CMS后台创建SQL函数标签
标签名称: 栏目简介
查询语句: select id,foldername,mid(classbasicinfo,instr(classbasicinfo,"||||")+4) as s,mid(s,1,instr(s,"||||")-1) as 栏目介绍 from ks_class where classid={$Param(0)} order by folderorder
...<< 向左走,向右走 >>