不修改emlog内核实现博客分页自定义的方法分享

<?php //分页函数
function sheli_fy($count,$perlogs,$page,$url,$anchor=''){
$pnums = @ceil($count / $perlogs);
$page = @min($pnums,$page);
$prepg=$page-1;                 //shuyong.net上一页
$nextpg=($page==$pnums ? 0 : $page+1); //shuyong.net下一页
$urlHome = preg_replace("|[\?&/][^\./\?&=]*page[=/\-]|","",$url);
//开始分页导航内容
$re = "";
if($pnums<=1) return false; //如果只有一页则跳出  
if($page!=1) $re .=" <a href=\"$urlHome$anchor\">首页</a> "; 
if($prepg) $re .=" <a href=\"$url$prepg$anchor\">前页</a> ";
for ($i = $page-2;$i <= $page+2 && $i <= $pnums; $i++){
if ($i > 0){if ($i == $page){$re .= " <span>$i</span> ";
}elseif($i == 1){$re .= " <a href=\"$urlHome$anchor\">$i</a> ";
}else{$re .= " <a href=\"$url$i$anchor\">$i</a> ";}
}}
if($nextpg) $re .=" <a href=\"$url$nextpg$anchor\">后页</a> "; 
if($page!=$pnums) $re.=" <a href=\"$url$pnums$anchor\" title=\"尾页\">尾页</a>";
//下拉跳转列表,循环列出所有页码
$re .="　跳转到第 <select name='topage' size='1' onchange='window.location=\"$url\"+this.value'>\n";
for($i=1;$i<=$pnums;$i++){if($i==$page) $re .="<option value='$i' selected>$i</option>\n";
else $re .="<option value='$i'>$i</option>\n";}
$re .="</select> 页，共 $pnums 页";
return $re;}
?>

<?php echo sheli_fy($lognum,$index_lognum,$page,$pageurl);?>

<?php echo sheli_fy($twnum,Option::get('index_twnum'),$page,BLOG_URL.'t/?page=');?>