织梦DedeCMS通过Tag标签获取相关文章

织梦的相关文章是根据tag和文章关键词来的，不过效果不是特别的好，获取文章的数量是比较少的。对织梦系统自带的相关文章标签感兴趣的朋友，可以去看likearticle|织梦相关文章标签一文。

今天给大家分享的是只根据文章的Tag标签来调用相关文章的自定义标签，在手动填写Tag标签的情况下，效果还是非常不错的。先说一下如何给织梦系统增加自定义标签，只需要把自定义标签文件上传到includetaglib目录即可。下面是根据Tag标签获取相关文章的自定义dede:arctag标签代码：

<?phpif(!defined('DEDEINC'))exit('Request Error!');functionlib_arctag(&$ctag,&$refObj){global$dsql;$ar="row|10";FillAttsDefault($ctag->CAttribute->Items);extract($ctag->CAttribute->Items);$innertext=$ctag->GetInnerText();$tcp=newDedeTagParse();$tcp->SetNameSpace("field","[","]");$tcp->LoadSource($innertext);$aid=$refObj->Fields['id'];$revalue='';if($aid){$ids=array();$tag=array();$dsql->Execute("f","select tag from dede_taglist where aid = '$aid'");while($re=$dsql->GetArray("f")){$tag[] =$re['tag'];}if($tag){foreach($tagas$tk){$dsql->Execute("f1","select aid from dede_taglist where tag = '$tk'");while($re1=$dsql->GetArray("f1")){$ids[] =$re1['aid'];}}}if($ids){$ids=array_unique($ids);$sqa="(".join(",",$ids).")";$query= "SELECT se.*,tp.typedir,tp.typename,tp.isdefault,tp.defaultname,tp.namerule,tp.namerule2,tp.ispart,tp.moresite,tp.siteurl,tp.sitepathFROM `dede_archives` se LEFT JOIN `dede_arctype` tp ON se.typeid=tp.id WHERE se.id in$sqalimit$row";$dsql->Execute("f2",$query);while($row1=$dsql->GetArray("f2")){$row1['arcurl'] = GetFileUrl($row1['id'],$row1['typeid'],$row1['senddate'],$row1['title'],$row1['ismake'],$row1['arcrank'],$row1['namerule'],$row1['typedir'],$row1['money'],$row1['filename'],$row1['moresite'],$row1['siteurl'],$row1['sitepath']);$row1['title'] = cn_substr($row1['title'],10);foreach($tcp->CTagsas$tid=>$tt){$tcp->Assign($tid,$row1[$tt->GetName()]);}$revalue.=$tcp->GetResult();}}}return$revalue;}

复制以上的代码，使用Dreamweaver等专业软件保存为arctag.lib.php文件，注意和你使用的织梦DedeCMS系统编码一致。dede:arctag标签在织梦模板中的用法如下：

{dede:arctag id=10}<ahref="[field:arcurl/]">[field:title/]</a>{/dede:arctag}

你可以根据自己的需要，对标签进行自我拓展。