帝国cms首页、列表页、内容页调用TAG标签方法

帝国cms由于软件的系统架构原因，所以tag数据表不在内容模型数据库中，所以在列表页面的调用非常麻烦，而在首页和内容页的调用也比较麻烦，无法直接使用灵动标签调用。
下面整理了一个一个方法，通过在帝国cms的userfun.php中自定以一个自定易函数的方法可以，非常方便的实现tag的灵活调用。
function taglinks($aid, $num=5, $tbname='news')
{
        global $public_r,$dbtbpre,$empire,$navinfor,$class_r;
        $qr = $empire->fetch1("select rewritetags from {$dbtbpre}enewspublic limit 1");
        $sr = $empire->fetch1("select stb from {$dbtbpre}ecms_{$tbname} where id=$aid");
        $fr = $empire->fetch1("select infotags from {$dbtbpre}ecms_{$tbname}_data_{$sr[stb]} where id=$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 .= "<a href='$link' target='_blank'>".$tagarr[$i]."</a> ";
                }
        }
        return $tags;
}
?>
参数：文章ID,调用标签数量,表名
灵动标签调用：<!--?=taglinks($bqr[id])? ></p>;
<p>;列表页，勾选list.var使用程序代码，代码<code>示例</code><br ?--> <code>
$listtemp='</code>
<ul>
     <li>
<h3><a href="[!--titleurl--]">[!--title--]</a></h3>
[!--smalltext--]
'.taglinks($r[id]).'</li>
</ul>
';
内容页调用： <!--?=taglinks($navinfor[id])?-->