zblog php调用评论最多的读者列表（读者墙）

/*www.boke8.net*/
function readers($num){
	global $zbp;	
	if($num){
		$i = $num;
	}else{
		$i=10;
	}		
	$sql = $zbp->db->sql->Select(
		$zbp->table['Comment'],
		array('COUNT(comm_ID) AS cnt, comm_Name, comm_HomePage , comm_Email'),
		array(
			array('<>', 'comm_Name', '访客'),
			array('=', 'comm_AuthorID', 0),			
			array('CUSTOM', '1=1 GROUP BY comm_HomePage')
		),
		array('comm_PostTime' => 'DESC'),
		$i,
	null
	);
	$array=$zbp->db->Query($sql);	
	$r ="/r/n";
    foreach ($array as $comment) {
        $r .= '<li><a href="'.$comment['comm_HomePage'].'" title="'.$comment['comm_Name'].'" target="_blank" data-original-title="[' . $comment['comm_Name'] . '] 近期点评' . $comment['cnt'] . '次"><img src="http://cn.gravatar.com/avatar/' .md5(strtolower($comment['comm_Email'])).'&amp;r=X&amp;s=40" alt=""></a></li>';       
    }     
	$r .="/r/n";
	return $r;
}

{readers('20')}