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

帝国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");  
 }    
}      
?>