帝國cms關(guān)鍵字tags相關(guān)文章調(diào)用標(biāo)簽

2024-08-28 12:25:51

字體：大中小

供稿：網(wǎng)友

此代碼有重復(fù)

<?
$taginfo_r=explode(',',$navinfor['infotags']);
if(is_array($taginfo_r)){
foreach($taginfo_r as $tagname){
if($tagname){
$tagr=$empire->fetch1("select tagid from {$dbtbpre}enewstags where tagname='$tagname' limit 1");
if($tagr['tagid']){
$tsql=$empire->query("select * from {$dbtbpre}enewstagsdata where tagid=".$tagr['tagid']."");
while($tr=$empire->fetch($tsql)){
if($tr['id']==$navinfor['id'] && $tr['classid']==$navinfor['classid']){
continue;
}
if(empty($class_r[$tr['classid']]['tbname']))
{
continue;
}
$infor=$empire->fetch1("select id,classid,shopname,shopurl,newspath,filename,groupid,titleurl,title from {$dbtbpre}ecms_".$class_r[$tr['classid']]['tbname']." where id=".$tr[id]." limit 1");
$ti_url=sys_ReturnBqTitleLink($infor);
?>
<div class="listsite">
<ul>
<li><a href="<?=$ti_url?>/" class="webname2" title="<?=$infor['title']?><?=$infor['shopname']?>"><?=$infor['title']?><?=$infor['shopname']?></a></li>
<li class="li3"></li>
</ul>
</div>
<?
}
}
}
}
}
?>

此代碼把當(dāng)前文章也包含了

<?
         $a="$navinfor[infotags]";
         $str=str_replace('，', ',', $a);
         $tag='';
         $t= explode(",", $str);

                  for($i=0;$i<count($t);$i++)
                  {
                        if($t[$i])
                        {
?>
                                 [e:loop={"SELECT tagid FROM phome_enewstags WHERE tagname = '".$t[$i]."'",1,24,0}]

                                 [tagsinfo]$bqr[tagid],10,32,21,0,0[/tagsinfo]

                                 [/e:loop]
<?
                        }
         }
         ?>

根據(jù)Tags 調(diào)用相關(guān)文章，絕對好用！

以下是具體實現(xiàn)過程：
以下代碼放到/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;
   }
}
?>

內(nèi)容頁模板用以下代碼調(diào)用：5為顯示數(shù)量自己改

<?=user_otherlink(5)?>

上一篇：帝國CMS靈動標(biāo)簽調(diào)用多表多模型調(diào)用文章

下一篇：帝國CMS內(nèi)容頁調(diào)用TAG的方法！包括PHP和靈動樣式改造！