下面大家来看看织梦使用tag调用相关文章的办法，非常适合seo哦。也可以根据关键词+tag调用。

1.把下边代码保存到文章模版的适当位置  

<!-- //相关文章代码开始 -->
<div class="xgwz"> 
     <dl class="tbox"> 
           <dt><strong>相关文章</strong></dt> 
               <dd> 
                  <ul class="c1 ico2"> 
                       {dede:likearticle col='2' row='10' titlelen='42' eregtype=all|tag|keyword} 
                             <li><a href="[field:arcurl/]">[field:title/]</a></li>

2.把下边的php代码替换掉likearticle.lib里的代码  dedecms.com

 
<?php
if(!defined('DEDEINC')) exit('Request Error!');
/*--------------------------------------
按关键词关连文章的标签
eregtype属性 
eregtype = keyword 只匹配关键字
eregtype = tag 只匹配tag
eregtype = all tag优先，不存在tag则匹配关键字
mytypeid='' 栏目ID,多个栏目用,隔开
---------------------------------------*/
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); 内容来自dedecms 
 $tablewidth = $tablewidth."%";
 $colWidth = $colWidth."%";
 
 $ids = array();
 $tids = array();
 
 $typeid = ( !empty($mytypeid) ? $mytypeid : 0 );
 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']));
              

                      {/dede:likearticle} 
                  </ul> 
               </dd> 
     </dl> 
</div>
 <!-- //相关文章代码结束 --> 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 = "<table width='$tablewidth' border='0' cellspacing='0' cellpadding='0'>\r\n";
 }
 $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>\r\n";
  for($j=0; $j < $col; $j++)
  {
   if($col>1) $artlist .= " <td width='$colWidth'>\r\n";
   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'] = "<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()."\r\n";
   }
   //if hasRow
   else
   {
    $artlist .= '';
   }
   if($col>1) $artlist .= " </td>\r\n";
  }
  //Loop Col
  if($col>1) $i += $col - 1;
  if($col>1) $artlist .= " </tr>\r\n"; 
 }
 //loop line
 if($col>1) $artlist .= " </table>\r\n";
 $dsql->FreeResult("al");
 return $artlist;
}
?>
1.用于5.6、5.7的任何版本 
2.可以单用tag来调用相关文章，也可用tag+keyword来调用相关文章（默认tag优先于keyword，可以自己排序），非常适合SEO，经测试效果极佳。