首页 | 开发 系统 安全 | 生活 娱乐 旅游 游戏 文学 数码 | 社区 博客 | 交易 商城 | 会员区
开发首页 | PHP专栏 | ASP专栏 | JAVA专栏 | .NET专栏 | PERL专栏 | C/C++专栏 | 数据库专栏
PHP专栏 >> 安装配置 | 基础应用 | 函数资料 | 高手进阶 | 高级应用 | 数据库应用 | 常见问题
您的位置: 首页 > PHP专栏 > 函数资料 > 正文
中搜新闻 新闻自助餐  软件资讯尽在太平洋
简体中文转换为繁体中文的PHP函数
http://dev.isyi.com 实易开发 (2005-09-09 12:11:40)  文章来源:www.phpe.net
感谢网友Keyes提供移植用的Delphi源代码。其调用方式为$txt=gbtobig5($txt)。
(注:源代码中的include "data_gb.php";这个文件在就是一个数组,在http://caocao.oso.com.cn/data_gb.zip,请编辑下载到oso上,做一个链接,因为这个文件我过几天就要删除了。)

/***********************************************************************
Written by caocao
caocao@eastday.com
http://caocao.oso.com.cn

With the help of Keyes
Keyes2000@263.net
http://my-wjl.scu.edu.cn/~Keyes
***********************************************************************/
function isgb($code)
{
if (strlen($code)>=2)
{
$code=strtok($code,"");
if ((ord($code[0]) < 161)||(ord($code[0]) >= 247))
{
return (0);
}
else
{
if ((ord($code[1]) <= 161)||(ord($code[1]) >= 254))
{
return (0);
}
else
{
return (1);
}
}
}
else
{
return (1);
}
}
function gboffset($code)
{
if (strlen($code) >= 2)
{
$code=strtok($code,"");
return ((ord($code[0]) - 161) * 94 + (ord($code[1]) - 161));
}
else
{
return(-1);
}
}
function wordtostring($code)
{
return (chr(hexdec(substr($code,0,2))).chr(hexdec(substr($code,2,2))));
}
function gbtobig5($code)
{
include "data_gb.php";
$output="";
$length=strlen($code);
$code=strtok($code,"");
$idx=0;
while ($idx < $length)
{
$tmpStr=$code[$idx].$code[$idx+1];

if (isgb($tmpStr))
{
$offset=gboffset($tmpStr);
if (($offset >= 0)||($offset <= 8177))
{
$output.=wordtostring($gborder[$offset]);
$idx++;
}
else
{
$output.= $code[$idx];
}
}
else
{
$output.= $code[$idx];
}
$idx++;
}
return ($output);
};
?>




【责任编辑:】
评论】【内容指正】·【 】【打印】·【顶部】【关闭窗口
· php4的彩蛋 2005-09-09 13:00:19
· PHP,21世纪的霸主(一) 2005-09-09 13:00:15
· PHP,21世纪的霸主(二) 2005-09-09 12:59:56
· PHP,21世纪的霸主(三) 2005-09-09 12:59:52
· PHP,21世纪的霸主(四) 2005-09-09 12:59:51
 焦点关注
 动态专题
精彩推荐
网易科技 | 中国软件 | 博客中国 | 写作社区 | IT世界 | 逐浪网 | pconline | 幻剑书盟 | 52pk.net | 更多友情链接
实易简介 | 业务合作 | 广告服务 | 招聘信息 | 在线服务 | 提交建议
Copyright © 2002-2005 实易. All rights Reserved