dedecms织梦模板利用tag调用相关文章的教程

dedecms织梦模板利用tag调用相关文章的教程 下面大家来看看织梦使用tag调用相关文章的办法，非常适合seo哦。也可以根据关键词+tag调用。
1.把下边代码保存到文章模版的适当位置 

相关文章

 

rn";
if($row = $dsql->GetArray("al"))
{
$ids[] = $row['id']; dedecms.com 
//处理一些特殊字段
$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("^http://",$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'] = "".$row['typename']."";
$row['image'] = "".ereg_replace("[<]","",$row['title'])."'>";
$row['imglink'] = "".$row['image'].""; 织梦好，好织梦 
$row['fulltitle'] = $row['title'];
$row['title'] = cn_substr($row['title'],$titlelen);
if($row['color']!='') $row['title'] = "".$row['title']."";
if(ereg('b',$row['flag'])) $row['title'] = "".$row['title']."";
$row['textlink'] = "".$row['title']."";
$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";
}
//if hasRow
else
{
$artlist .= '';
}
if($col>1) $artlist .= "

{dede:likearticle col='2' row='10' titlelen='42' eregtype=all|tag|keyword} 
[field:title/]
2.把下边的php代码替换掉likearticle.lib里的代码  dedecms.com
copyright dedecms
$getsql = " tag like '".join("' OR tag like '", $tags)."' ";
$dsql->Execute('me', "Select * From `dedecp_tagindex` where $getsql ");
while($arow = $dsql->GetArray('me')) {
$tids[] = $arow['id'];
}
$tid = join(',', $tids);
if($tid!='')
{
$dsql->Execute("me", "Select aid From `dedecp_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']; 
}
}
}
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 `dedecp_archives` arc left join `dedecp_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 `dedecp_archives` arc left join `dedecp_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 `dedecp_archives` arc left join `dedecp_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 = "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 .= "rn";
for($j=0; $j < $col; $j++)
{
if($col>1) $artlist .= "rn";
}
//Loop Col
if($col>1) $i += $col - 1;
if($col>1) $artlist .= "rn"; 
}
//loop line
if($col>1) $artlist .= "rn";
$dsql->FreeResult("al");
return $artlist;
}
?>

1.用于5.6、5.7的任何版本 
2.可以单用tag来调用相关文章，也可用tag+keyword来调用相关文章（默认tag优先于keyword，可以自己排序），非常适合SEO，经测试效果极佳。