如何用关键词修改DEDECMS相关文章?
DEDE的相关文章完全不相干。朋友根据DEDE官方发布的标签展示相关文章也是非常好的。不幸的是,我总是不能做到这一点后,改变DEDE代码根据那里的文章。也许是我能力有限,当然也可能是代码有问题。
推荐学习:梦想编织cms
现在终于出了解决办法:
inc_functions.php末尾的1?gt;钱家
代码如下:
//查询指定列中包含相应关键字的文章并列出。
//参数说明:$showImg是否显示缩略图,0表示不显示,1表示显示。
// $titleLen标题长度,0表示无限。
// $rowCount输出行数,0表示无穷大。
// $typeID列ID,0表示所有列。
// $keyWord关键字,字符串
函数ShowKeyWordArc($showImg,$titleLen,$rowCount,$typeid,$keyWord){
$ dsql = new dede SQL(false);
$sql = TypeGetSunID($typeid,$ dsql);lt;/pgt;lt;pgt//关键词分割技术
$ks =爆炸(quotquot,$ keyWord);
foreach($ks as $k){
$ k = trim($ k);
如果($k!= quotquot) {
$ kwsqlarr[]= quot;(xkzzz_archives.title喜欢# 39;% $ k % # 39)quot;
//$ kwsqlarr[]= quot;(xkzzz _ archives . keywords like # 39;% $ k % # 39)quot;//如果需要与其他文章相关的关键字,请取消对此行的注释。
}
}
$where =内爆(# 39;或者# 39;,$ kwsqlarr);lt;/pgt;lt;pgt$ sql = quotSelect tp.namerule,tp.typedir,xkzzz_full_search.aid,xkzzz_full_search.url,xkzzz_archives。*从xkzzz_full_search左加入xkzzz _ archives on xkzzz _ full _ search . aid = xkzzz _ archives。ID left join xkzzz _ arctype TP on xkzzz _ archives . typeid = TP。ID其中{$sql}和((xkzzz _ archives.title like # 39% quot。$ keyWord.quot%#39;)或$ where)order by xkzzz _ full _ search . aid desc quot;;
$ dsql -gt;SetQuery($ SQL);
$ dsql -gt;执行();
$ ss = quotquot;
$ I = 0;
while($ row = $ dsql -gt;GetObject()){
$ URL = getfile URL($ row -gt;ID,$ row -gt;typeid,$ row -gt;发送日期,$ row -gt;标题,$ row -gt;ismake,$ row -gt;arcrank,$ row -gt;namerule,$ row -gt;typedir,$ row -gt;钱);
if ($showImg==0){
$ ss = $ ss.quotlt;LIgtlt;a href = # 39quot。$ url.quot#39;target=_blankgt。quot;
if ($titleLen!= 0)$ ss = $ ss . cn _ substr($ row -gt;title,$ title len);
else $ss=$ss。$ row -gt;标题;
$ ss = $ ss.quotlt;/Agt;lt;/LIgt;quot;
}否则{
$ ss = $ ss.quotlt;LIgtlt;span class = # 39sjdqimggl # 39gt;lt;a href = # 39quot。$ url.quot#39;target=_blankgt。quot;lt;/pgt;lt;pgtif($ row -gt;litpic!= quotquot)$ ss = $ ss.quotlt;img src = # 39quot。$ row -gt;litpic.quot#39;alt = # 39quot。$ row -gt;title.quot#39;/gt。quot;
else $ ss = $ ss.quotlt;img src = # 39/images/titl . gif # 39;/gt。quot;
$ ss = $ ss.quotlt;/AGT;lt;/spangt。lt;span class = # 39sjdqtxttl # 39gt;lt;a href = # 39quot。$ url.quot#39;target=_blankgt。quot;
if ($titleLen!= 0)$ ss = $ ss . cn _ substr($ row -gt;title,$ title len);
else $ss=$ss。$ row -gt;标题;
$ ss = $ ss.quotlt;/Agt;lt;/spangt。lt;/LIgt;quot;
}
$ i++;
if (($rowCount!=0)安培;amp($ igt=$rowCount))返回$ ss
}
返回$ ss
}登录后复制
