帝国CMS 批量更新标题首字母

<?

$sql=$empire->query("select id,title from {$dbtbpre}ecms_news where id>5000 order by id limit 1000");

while($r=$empire->fetch($sql)){

if($r[title]){

$zm=GetInfoZm($r[title]);

$empire->query("update {$dbtbpre}ecms_news set infozm='$zm' where id=$r[id] limit 1");

}

}

?>