帝国ecms商业教程 帝国CMS内容页根据TAG匹配相关文章列表代码

功能：

比如说有3个TAG，每个TAG下有4篇文章，现在指定要显示10篇文章，那么每个TAG要拿出4篇，共有12篇文章，最终会打乱这12篇文章，然后取10篇
3个TAG，每个TAG下有3篇文章，现在指定要显示10篇文章，那么每个TAG要拿出3篇文章，共有9篇文章
3个TAG，A有2篇文章，B有5篇文章，C有3篇文章，现在要显示10篇文章，那么A拿出2篇文章，B拿出5篇文章，C拿出3篇文章，共有10篇文章
如果 A、B、C中除了当前文章，还有相同的文章，那么会扣除重复的那篇文章，只取一次。所以指定的数量会有偏差

以下代码放到/e/class/userfun.php里！

<?php
function user_otherlink($limit=5){
global $dbtbpre,$empire,$navinfor,$class_r;
    if($navinfor[infotags]){
     $classid=(int)$classid;
        $limit=(int)$limit;
        $tbname=$class_r[$navinfor[classid]][tbname];
        $tagarr=explode(",",$navinfor[infotags]);
        $arr=array();
        $num=ceil($limit/count($tagarr));
        foreach($tagarr as $k=>$v){
if(count($tagarr)==$k+1){
$num=$limit-count($arr);
}else{
if($i<$num){
$num=ceil(($limit-count($arr))/count($tagarr));
}
}
            $t=$empire->fetch1("select tagid,num from {$dbtbpre}enewstags where tagname='$v'");
if($t[tagid]){
$sql=$empire->query("select id from {$dbtbpre}enewstagsdata where tagid=$t[tagid]");
$i=0;
while($s=$empire->fetch($sql)){
if(in_array($s[id],$arr)||$s[id]==$navinfor[id]){
continue;
}else{
$arr[]=$s[id];
$i++;
}
if($i==$num){
break;
}
if(count($arr)==$limit){
break 2;
}
}
if($t[num]>$num){
$linshi=$t[tagid];
}
} 
        }
        if(count($arr)>0){
$inid=implode(",",$arr);
if(count($arr)<$limit&&$linshi){
$sql=$empire->query("select id from {$dbtbpre}enewstagsdata where tagid=$linshi and id not in($inid)");
while($s=$empire->fetch($sql)){
$arr[]=$s[id];
if(count($arr)==$limit){
break;
}
}
}
$inid=implode(",",$arr);
$str="";
$news=$empire->query("select id,title,titleurl,titlepic from {$dbtbpre}ecms_{$tbname} where id in($inid)");
while($n=$empire->fetch($news)){
$str.='<li><a href="'.$n[titleurl].'">'.$n[title].'</a></li>';
}
}
        return $str;
    }
}
?>

内容页用以下代码调用：5为显示数量 自己改

<?=user_otherlink(5)?>