帝国CMS函数版首页、列表页、内容页调用TAG标签终级教程

论坛里给的办法都是直接在模板里写一堆代码，收拾下写成函数，调用起来更便利。
将代码添加到userfun.php中

functiontaglinks($aid,$num=5,$tbname='news')
{
global$public_r,$dbtbpre,$empire,$navinfor,$class_r;
$qr=$empire->fetch1("selectrewritetagsfrom{$dbtbpre}enewspubliclimit1");
$sr=$empire->fetch1("selectstbfrom{$dbtbpre}ecms_{$tbname}whereid=$aid");
$fr=$empire->fetch1("selectinfotagsfrom{$dbtbpre}ecms_{$tbname}_data_{$sr[stb]}whereid=$aid");
$tagstr=''.$fr[infotags].'';
$tagarr=explode(",",$tagstr);
for($i=0;$i<count($tagarr)&&$i<$num;$i++)
{
if($tagarr[$i])
{
if($qr[rewritetags]){//敞开伪静态
$link=$public_r[newsurl]."tags-".urlencode($tagarr[$i])."-0.html";
}else{//动态链接
$link=$public_r[newsurl]."e/tags/?tagname=".urlencode($tagarr[$i]);
}
$tags.="<ahref='$link'target='_blank'>".$tagarr[$i]."</a>";
}
}
return$tags;
}
?>

有朋友需求调用tagid方式的，再查次数据库就可以了
以下代码修改下

if($tagarr[$i])
{
if($qr[rewritetags]){//敞开伪静态
$link=$public_r[newsurl]."tags-".urlencode($tagarr[$i])."-0.html";
}else{//动态链接
$link=$public_r[newsurl]."e/tags/?tagname=".urlencode($tagarr[$i]);
}
$tags.="<ahref='$link'target='_blank'>".$tagarr[$i]."</a>";
}

修改后：

if($tagarr[$i])
{
$tr=$empire->fetch1("select*from{$dbtbpre}enewstagswheretagname='".$tagarr[$i]."'");
if($qr[rewritetags]){//敞开伪静态
$link=$public_r[newsurl]."tags-etagid".$tr[tagid]."-0.html";
}else{//动态链接
$link=$public_r[newsurl]."e/tags/?tagid=".$tr[tagid];
}
$tags.="<ahref='$link'target='_blank'>".$tagarr[$i]."</a>";
}

参数：文章ID,调用标签数量,表名
灵动标签调用：<?=taglinks($bqr[id])?>
列表页，勾选list.var运用程序代码，代码示例

$listtemp='
<li>
<h3><ahref="[!--titleurl--]">[!--title--]</a></h3>
<p>[!--smalltext--]</p>
<p>'.taglinks($r[id]).'</p>
</li>
';

内容页调用：<?=taglinks($navinfor[id])?>