取得标题首字母（支持中文、大小写字母、数字）最后更新20121029 帝国cms

帝国论坛 → 帝国网站管理系统交流区 → 帝国CMS使用交流 → 取得标题首字母（支持中文、大小写字母、数字）最后更新20121029

【本版专题贴子】

1/2 1 2 ›› ›|

pkkgu
用户头衔：探花 *

精华贴   ：2
发贴数   ：1941
经验值   ：6842
注册时间：2008-12-17

信息

搜索

好友

发送悄悄话

【精益求精－帝国网站管理系统7.5正式版开源发布】 [第 1 楼]

取得标题首字母（支持中文、大小写字母、数字）最后更新20121029

/*
* -+------------------------------------------------------------------------+-
* | 本代码来源于HZAPI.COM
* -+------------------------------------------------------------------------+-
* | Author : pkkgu （QQ：910111100）
* | Email  : 910111100@qq.com
* | WebSite: http://www.hzapi.com
* | Contact: http://t.qq.com/ly0752
* | LastUpdate: 2012-10-18
* | Copyright @ 2007 - 2013 (hzapi.com)
* -+------------------------------------------------------------------------+-
* -+ 不管是否为商业用途，您必须保留此头部信息并不得修改，尊重版权从现在做起 +
*
* @ 取得标题首字母、首数字、首字母小写转大写符号返回NULL
* $cs 为空时只取第一个，为非空时获取所有表题首字母（不包含符号）
* 支持GB2312和UTF-8
*/
function getFirstLetter($str){
$fchar = ord($str{0});
if($fchar >= ord("A") and $fchar <= ord("z") )return strtoupper($str{0});
$s1 = iconv("UTF-8","gb2312", $str);
$s2 = iconv("gb2312","UTF-8", $s1);
if($s2 == $str){$s = $s1;}
else{$s = $str;}
$asc = ord($s{0}) * 256 + ord($s{1}) - 65536;
if($asc >= -20319 and $asc <= -20284) return "A";
if($asc >= -20283 and $asc <= -19776) return "B";
if($asc >= -19775 and $asc <= -19219) return "C";
if($asc >= -19218 and $asc <= -18711) return "D";
if($asc >= -18710 and $asc <= -18527) return "E";
if($asc >= -18526 and $asc <= -18240) return "F";
if($asc >= -18239 and $asc <= -17923) return "G";
if($asc >= -17922 and $asc <= -17418) return "I";
if($asc >= -17417 and $asc <= -16475) return "J";
if($asc >= -16474 and $asc <= -16213) return "K";
if($asc >= -16212 and $asc <= -15641) return "L";
if($asc >= -15640 and $asc <= -15166) return "M";
if($asc >= -15165 and $asc <= -14923) return "N";
if($asc >= -14922 and $asc <= -14915) return "O";
if($asc >= -14914 and $asc <= -14631) return "P";
if($asc >= -14630 and $asc <= -14150) return "Q";
if($asc >= -14149 and $asc <= -14091) return "R";
if($asc >= -14090 and $asc <= -13319) return "S";
if($asc >= -13318 and $asc <= -12839) return "T";
if($asc >= -12838 and $asc <= -12557) return "W";
if($asc >= -12556 and $asc <= -11848) return "X";
if($asc >= -11847 and $asc <= -11056) return "Y";
if($asc >= -11055 and $asc <= -10247) return "Z";
return 'NULL';
}
function user_pkkgu_getfirstchar($mid,$f,$isadd,$isq,$value,$cs){
$ret = "";
$zh = trim($_POST[title]);
$s1 = iconv("UTF-8","gb2312", $zh);
$s2 = iconv("gb2312","UTF-8", $s1);
if($s2 == $zh){$zh = $s1;}
if(empty($cs)){
$num=1;
}else{
$num=strlen($zh);
}
echo $zh;
for($i = 0; $i < $num; $i++)
{
$s1 = substr($zh,$i,1);
$p = ord($s1);
echo $p;
if($p > 160){
$s2 = substr($zh,$i++,2);
$ret .= getFirstLetter($s2);
}
else if (($p>=65 and $p<=91)or($p>=48 and $p<=57)){
$ret .= $s1;
}else{
if(!$cs){
$ret .= "NULL";
}
}
}
return strtoupper($ret);
}

[该贴被修改 5 次，最后修改时间 2012-10-29 00:00:42 ]

www.hz36.com帝国演示站
www.hz39.com帝国演示站
基于帝国ECMS6.6_公文签收系统
QQ:910111100