我和dedecms
接触dedecms是从2009开始的，以前一直用风讯和科讯（ASP的）这两款，后来从成都到东莞进一公司打工，该公司就是使用的dedecms建站，我也跟着学了，怎么说呢刚开始觉得很强大，到后面用着越来越糟糕，很多地方做的不完善，另外一个让大家很火的地方就是，在dede的论坛提问题基本上官方是不会给你解答的。就拿最近我新改版的跟版网(WWW.GENBAN.ORG)来说，我想调用相关文章，以tag优先调用，如果tag匹配不到或者匹配条数不够再以关键词匹配。
dedecms的相关文章标签（likearticle.lib.php）
新版的dedecms5.7相关文章标签有两个问题
1、相关文章文章调只调用当前栏目的，其他栏目的调用不到
2、只能匹配其他文章的标题（title）,和关键词(keywords)，没有去匹配其他文章tag
修改dedecms(5.7)likearticle.lib.php相关文章标签调用全站相关文章
打开likearticle.lib.php(请事先备份)，
查找：$query = "
在其上方添加：$typeid = ' AND arc.id<>$arcid '; 注意有两处，AND arc.id<>$arcid这个的意思就是限制调用出来的相关文章不包含本文章，记的dedecms7.0之前没有做 这个限制-_-，这样就取消了相关文章匹配栏目的限制了。
dedecms相关文章调用tag、关键词（keywords）、标题（title）相同的文章
dedecms官方的相关文章标签并没有匹配tag相同的文章，他只是获取当前文章的tag和关键词（keywords）去匹配其他文章的标题（title）、关键词（keywords） 请看dede的源码片断
if(!empty($refObj->Fields['keywords']))
{
$keywords = explode(',' , trim($refObj->Fields['keywords']));
$keyword = '';
$n = 1;
foreach($keywords as $k)
{
if($n > 3) break;
if(trim($k)=='') continue;
else $k = addslashes($k);
$keyword .= ($keyword=='' ? " CONCAT(arc.keywords,' ',arc.title) LIKE '%$k%' " : " OR CONCAT(arc.keywords,' ',arc.title) LIKE '%$k%' ");
$n++;
}
}
$arcid = (!empty($refObj->Fields['id']) ? $refObj->Fields['aid'] : 0);
if( empty($arcid) || $byabs==0 )
{
$orderquery = " ORDER BY arc.id desc ";
}
else {
$orderquery = " ORDER BY ABS(arc.id - ".$arcid.") ";
}
if($keyword != '')
{
if(!empty($typeid)) {
$typeid = " AND arc.typeid IN($typeid) AND arc.id<>$arcid ";
}
$query = "SELECT arc.*,tp.typedir,tp.typename,tp.corank,tp.isdefault,tp.defaultname,tp.namerule,
tp.namerule2,tp.ispart,tp.moresite,tp.siteurl,tp.sitepath
FROM `dede_archives` arc LEFT JOIN `dede_arctype` tp ON arc.typeid=tp.id
where arc.arcrank>-1 AND ($keyword) $typeid $orderquery limit 0, $row";
}
else
{
if(!empty($typeid)) {
$typeid = " arc.typeid IN($typeid) AND arc.id<>$arcid ";
}
$query = "SELECT arc.*,tp.typedir,tp.typename,tp.corank,tp.isdefault,tp.defaultname,tp.namerule,
tp.namerule2,tp.ispart,tp.moresite,tp.siteurl,tp.sitepath
FROM `dede_archives` arc LEFT JOIN `dede_arctype` tp ON arc.typeid=tp.id
WHERE arc.arcrank>-1 AND $typeid $orderquery limit 0, $row";
}
注意以上绿色内容就是一部分匹配条件 ，$keyword .= ($keyword=='' ? " CONCAT(arc.keywords,' ',arc.title) LIKE '%$k%' " : " OR CONCAT(arc.keywords,' ',arc.title) LIKE '%$k%' ");可以看出dedecms只CONCAT了keywords和title，没有做tag的处理，这里提供一个方法原创作者不详。
相关文章推荐：
1.dedecms列表页有缩略图显示图文列表没有则文字列表
2.dedecms利用[field:global.autoindex /]打造文章排行榜代码
3.dedecms添加文章提示/templets/plus/win_templet.htm Not Found!
4.给dedecms添加文章下载远程图片失败加个提醒功能
5.dedecms5.7转帝国CMS系统之tag标签导入
#p#副标题#e#<?php
if (!defined('DEDEINC'))
exit('Request Error!');
function lib_likearticle(&$ctag, &$refObj)
{
global $dsql;
$attlist = "row|12,titlelen|28,infolen|150,col|1,tablewidth|100,mytypeid|0,byabs|0,imgwidth|120,imgheight|90";
FillAttsDefault($ctag->CAttribute->Items, $attlist);
extract($ctag->CAttribute->Items, EXTR_SKIP);
$revalue = '';
if (empty($tablewidth))
$tablewidth = 100;
if (empty($col))
$col = 1;
$colWidth = ceil(100 / $col);
$tablewidth = $tablewidth . "%";
$colWidth = $colWidth . "%";
$ids = array();
$tids = array();
$arcid = $refObj->Fields['aid'];
/* if (empty($typeid)) {
if (!empty($refObj->Typelink->TypeInfos['reid'])) {
$typeid = $refObj->Typelink->TypeInfos['reid'];
} else {
if (!empty($refObj->Fields['typeid']))
$typeid = $refObj->Fields['typeid'];
}
}
if (!empty($typeid) && !ereg(',', $typeid)) {
$typeid = GetSonIds($typeid);
}*/
if (!empty($refObj->Fields['tags']) && $eregtype != 'keyword') {
$tags = explode(',', addslashes($refObj->Fields['tags']));
$getsql = " tag like '" . join("' OR tag like '", $tags) . "' ";
$dsql->Execute('me', "Select * From `dede_tagindex` where $getsql ");
while ($arow = $dsql->GetArray('me')) {
$tids[] = $arow['id'];
}
$tid = join(',', $tids);
if ($tid != '') {
$dsql->Execute("me", "Select aid From `dede_taglist` where tid in($tid) And arcrank > -1 group by aid order by aid desc limit 0, $row");
while ($arow = $dsql->GetArray("me")) {
$ids[] = $arow['aid'];
$arcid = $refObj->Fields['aid'];
}
}
}
$typeid = (!empty($mytypeid) ? $mytypeid : ' And arc.id<>'.$arcid.' ');
if ($eregtype == 'tag' && count($ids) == 0) {
return '';
} else {
if (count($ids) > 0) {
/* if (!empty($typeid)) {
$typeid = " And arc.typeid in($typeid) And arc.id<>$arcid ";
}*/
$idsStr = join(',', $ids);
$query = "Select arc.*,tp.typedir,tp.typename,tp.corank,tp.isdefault,tp.defaultname,tp.namerule,
tp.namerule2,tp.ispart,tp.moresite,tp.siteurl,tp.sitepath
from `dede_archives` arc left join `dede_arctype` tp on arc.typeid=tp.id
where arc.id in($idsStr) $typeid order by arc.id desc";
}else{
$limitRow = $row - count($ids);
$keyword = '';
if (!empty($refObj->Fields['keywords'])) {
$keywords = explode(',', trim($refObj->Fields['keywords']));
$keyword = '';
$n = 1;
foreach ($keywords as $k) {
if ($n > 3)
break;
if (trim($k) == '')
continue;
else
$k = addslashes($k);
$keyword .= ($keyword == '' ? " CONCAT(arc.keywords,' ',arc.title) like '%$k%' " : " OR CONCAT(arc.keywords,' ',arc.title) like '%$k%' ");
$n++;
}
}
$arcid = (!empty($refObj->Fields['id']) ? $refObj->Fields['aid'] : 0);
if (empty($arcid) || $byabs == 0) {
$orderquery = " order by arc.id desc ";
} else {
$orderquery = " order by ABS(arc.id - " . $arcid . ") ";
}
if ($keyword != '') {
/* if (!empty($typeid)) {
$typeid = " And arc.typeid in($typeid) And arc.id<>$arcid ";
}*/
$query = "Select arc.*,tp.typedir,tp.typename,tp.corank,tp.isdefault,tp.defaultname,tp.namerule,
tp.namerule2,tp.ispart,tp.moresite,tp.siteurl,tp.sitepath
from `dede_archives` arc left join `dede_arctype` tp on arc.typeid=tp.id
where arc.arcrank>-1 and ($keyword) $typeid $orderquery limit 0, $row";
} else {
/* if (!empty($typeid)) {
$typeid = " arc.typeid in($typeid) And arc.id<>$arcid ";
}*/
$query = "Select arc.*,tp.typedir,tp.typename,tp.corank,tp.isdefault,tp.defaultname,tp.namerule,
tp.namerule2,tp.ispart,tp.moresite,tp.siteurl,tp.sitepath
from `dede_archives` arc left join `dede_arctype` tp on arc.typeid=tp.id
where arc.arcrank>-1 and $typeid $orderquery limit 0, $row";
}
}
}
$innertext = trim($ctag->GetInnerText());
if ($innertext == '')
$innertext = GetSysTemplets('part_arclist.htm');
$dsql->SetQuery($query);
$dsql->Execute('al');
$artlist = '';
if ($col > 1) {
$artlist = "<table width='$tablewidth' border='0' cellspacing='0' cellpadding='0'>rn";
}
$dtp2 = new DedeTagParse();
$dtp2->SetNameSpace('field', '[', ']');
$dtp2->LoadString($innertext);
$GLOBALS['autoindex'] = 0;
$line = $row;
for ($i = 0; $i < $line; $i++) {
if ($col > 1)
$artlist .= "<tr>rn";
for ($j = 0; $j < $col; $j++) {
if ($col > 1)
$artlist .= " <td width='$colWidth'>rn";
if ($row = $dsql->GetArray("al")) {
$ids[] = $row['id'];
$row['info'] = $row['infos'] = cn_substr($row['description'], $infolen);
$row['id'] = $row['id'];
if ($row['corank'] > 0 && $row['arcrank'] == 0) {
$row['arcrank'] = $row['corank'];
}
$row['filename'] = $row['arcurl'] = GetFileUrl($row['id'], $row['typeid'], $row['senddate'], $row['title'], $row['ismake'], $row['arcrank'], $row['namerule'], $row['typedir'], $row['money'], $row['filename'], $row['moresite'], $row['siteurl'], $row['sitepath']);
$row['typeurl'] = GetTypeUrl($row['typeid'], $row['typedir'], $row['isdefault'], $row['defaultname'], $row['ispart'], $row['namerule2'], $row['moresite'], $row['siteurl'], $row['sitepath']);
if ($row['litpic'] == '-' || $row['litpic'] == '') {
$row['litpic'] = $GLOBALS['cfg_cmspath'] . '/images/defaultpic.gif';
}
if (!eregi("^", $row['litpic']) && $GLOBALS['cfg_multi_site'] == 'Y') {
$row['litpic'] = $GLOBALS['cfg_mainsite'] . $row['litpic'];
}
$row['picname'] = $row['litpic'];
$row['stime'] = GetDateMK($row['pubdate']);
$row['typelink'] = "<a href='" . $row['typeurl'] . "'>" . $row['typename'] . "</a>";
$row['image'] = "<img src='" . $row['picname'] . "' border='0' width='$imgwidth' height='$imgheight' alt='" . ereg_replace("['><]", "", $row['title']) . "'>";
$row['imglink'] = "<a href='" . $row['filename'] . "'>" . $row['image'] . "</a>";
$row['fulltitle'] = $row['title'];
$row['title'] = cn_substr($row['title'], $titlelen);
if ($row['color'] != '')
$row['title'] = "<font color='" . $row['color'] . "'>" . $row['title'] . "</font>";
if (ereg('b', $row['flag']))
$row['title'] = "<strong>" . $row['title'] . "</strong>";
$row['textlink'] = "<a href='" . $row['filename'] . "'>" . $row['title'] . "</a>";
$row['plusurl'] = $row['phpurl'] = $GLOBALS['cfg_phpurl'];
$row['memberurl'] = $GLOBALS['cfg_memberurl'];
$row['templeturl'] = $GLOBALS['cfg_templeturl'];
if (is_array($dtp2->CTags)) {
foreach ($dtp2->CTags as $k => $ctag) {
if ($ctag->GetName() == 'array') {
$dtp2->Assign($k, $row);
} else {
if (isset($row[$ctag->GetName()]))
$dtp2->Assign($k, $row[$ctag->GetName()]);
else
$dtp2->Assign($k, '');
}
}
$GLOBALS['autoindex']++;
}
$artlist .= $dtp2->GetResult() . "rn";
} else {
$artlist .= '';
}
if ($col > 1)
$artlist .= " </td>rn";
}
if ($col > 1)
$i += $col - 1;
if ($col > 1)
$artlist .= " </tr>rn";
}
if ($col > 1)
$artlist .= " </table>rn";
$dsql->FreeResult("al");
return $artlist;
}
?>
用以上内容替换likearticle.lib.php的所有内容，这样调用出来的相关文章就相对完美了些，之所以说相对原因是修改后调用相关文章是优先匹配tag，如果tag能匹配到哪怕是匹配到一条就不会再去匹配关键词了，比如我想调用10条，该篇文章tag能匹配到一条，但是关键词能匹配20条，调用出来的效果也只有一条，我现在的做法是用两个标签tag和关键词分别调用5条，这样出来的效果稍微好些。标签调用代码如下：
{dede:likearticle row='5' col=1 titlelen='54' eregtype=tag}
<li><a href="[field:arcurl/]" title="[field:fulltitle/]">[field:title/]</a></li>
{/dede:likearticle}
{dede:likearticle row='5' col=1 titlelen='54' eregtype=keyword}
<li><a href="[field:arcurl/]" title="[field:fulltitle/]">[field:title/]</a></li>
{/dede:likearticle}
不得不说
dedecms还是算不错的了，新手入门速度快，标签简单易懂，我做了好几个站都是用dedecms做的，最后希望dedecms越做越好，越来越完善吧！
相关文章推荐：
1.dedecms列表页有缩略图显示图文列表没有则文字列表
2.dedecms利用[field:global.autoindex /]打造文章排行榜代码
3.dedecms添加文章提示/templets/plus/win_templet.htm Not Found!
4.给dedecms添加文章下载远程图片失败加个提醒功能
5.dedecms5.7转帝国CMS系统之tag标签导入