function YMWreaderwall($num,$adminemail){
global $zbp;
if($num){
$i = $num;
}else{
$i=6;
}
if($adminemail){
$bozhuemail = $adminemail;
}else{
$bozhuemail='2226524923@qq.com';
}
$dy =date('Y');
$dm =date('m');
$dw =strftime("%U");
$sqly = $zbp->db->sql->Select(
$zbp->table['Comment'],
array('COUNT(comm_ID) AS cnt, comm_Name, comm_HomePage , comm_Email'),
array(
array('=', 'year(from_unixtime(comm_PostTime))', $dy),
array('<>', 'comm_Email', $bozhuemail),
array('=', 'comm_AuthorID', 0),
array('CUSTOM', '1=1 GROUP BY comm_Email')
),
array('cnt' => 'DESC'),
$i,
null
);
$arrayy=$zbp->db->Query($sqly);
$sy="本年评论排行榜 TOP$i
- ";
$sy .="\r\n";
foreach ($arrayy as $commenty) {
$sy .= '
'.$commenty['comm_Name'] .'+'.$commenty['cnt'].''.$commenty['comm_HomePage'] . '';$sy .="\r\n";
}
$sy .="
";$sy .="\r\n";
echo $sy;
$sqlm = $zbp->db->sql->Select(
$zbp->table['Comment'],
array('COUNT(comm_ID) AS cnt, comm_Name, comm_HomePage , comm_Email'),
array(
array('=', 'year(from_unixtime(comm_PostTime))', $dy),
array('=', 'month(from_unixtime(comm_PostTime))', $dm),
array('<>', 'comm_Email', $bozhuemail),
array('=', 'comm_AuthorID', 0),
array('CUSTOM', '1=1 GROUP BY comm_Email')
),
array('cnt' => 'DESC'),
$i,
null
);
$arraym=$zbp->db->Query($sqlm);
$sm="本月评论排行榜 TOP$i
- ";
$sm .="\r\n";
foreach ($arraym as $commentm) {
$sm .= '
'.$commentm['comm_Name'] .'+'.$commentm['cnt'].''.$commentm['comm_HomePage'] . '';$sm .="\r\n";
}
$sm .="
";$sm .="\r\n";
echo $sm;
$sqlw = $zbp->db->sql->Select(
$zbp->table['Comment'],
array('COUNT(comm_ID) AS cnt, comm_Name, comm_HomePage , comm_Email'),
array(
array('=', 'year(from_unixtime(comm_PostTime))', $dy),
array('=', 'week(from_unixtime(comm_PostTime))', $dw),
array('<>', 'comm_Email', $bozhuemail),
array('=', 'comm_AuthorID', 0),
array('CUSTOM', '1=1 GROUP BY comm_Email')
),
array('cnt' => 'DESC'),
$i,
null
);
$arrayw=$zbp->db->Query($sqlw);
$sw="本周评论排行榜 TOP$i
- ";
$sw .="\r\n";
foreach ($arrayw as $commentw) {
$sw .= '
'.$commentw['comm_Name'] .'+'.$commentw['cnt'].''.$commentw['comm_HomePage'] . '';$sw .="\r\n";
}
$sw .="
";$sw .="\r\n";
echo $sw;
}