帝國cms默認的[!--other.link--]標簽調(diào)用相關鏈接時，如果沒有相關鏈接的話，則會顯示“暫無相關鏈接”。對于一些采集站或其他需要增加內(nèi)鏈的網(wǎng)站來說，此時最好能調(diào)用本欄目的其它一些信息填充進來。這里分享一個自己用的函數(shù)，實現(xiàn)這個功能。

當信息有相關信息時，調(diào)用相關信息，如果沒有，則調(diào)用同欄目、當前信息前后100個id之內(nèi)的信息中發(fā)布時間最靠近的，100可以設置成參數(shù)。將此函數(shù)放進 userfun.php 文件中，

function dp_GetKeyboard($num=100){
        global $empire,$public_r,$class_r,$fun_r,$dbtbpre,$class_r,$navinfor;
        $keyid=$navinfor['keyid'];
        $classid=$navinfor['classid'];
        $id=$navinfor['id'];
        $link_num=$class_r[$classid]['link_num'];
        if(!$link_num){
                return $fun_r['NotLinkNews'];
        }
        $tr=$empire->fetch1("select otherlinktemp,otherlinktempsub,otherlinktempdate from ".GetTemptb("enewspubtemp")." limit 1");
        $temp_r=explode("[!--empirenews.listtemp--]",$tr[otherlinktemp]);
        if($keyid){
                $add="id in (".$keyid.")";
        }else{
                $e=$id+$num;
                $s=$id-$num;
                $add=" classid=".$classid." and id>".$s." and id<".$e;
        }
        $key_sql=$empire->query("select id,newstime,title,isurl,titleurl,classid,titlepic from {$dbtbpre}ecms_".$class_r[$classid][tbname]." where ".$add." order by newstime desc limit $link_num");
        while($link_r=$empire->fetch($key_sql)){
                if($link_r['id']==$id){
                        continue;
                }
                $keyboardtext.=RepOtherTemp($temp_r[1],$link_r,$tr);
        }
        if(empty($keyboardtext)){
                return $fun_r['NotLinkNews'];
        }
        $keyboardtext=$temp_r[0].$keyboardtext.$temp_r[2];
        return $keyboardtext;
}

在模板中調(diào)用方法：<!--?=dp_getkeyboard(200)?-->

這個函數(shù)滿足我一個小站的功能，對于其它網(wǎng)站來說，補充調(diào)用信息可能比較簡陋，可以自行修改。