大小搬家，公司工廠，機器，鋼琴金庫，垃圾處理
估價送箱，全省回程，品質保證		防水工程專業通馬桶、抽水肥、清水溝
任何問題一切搞定，七天滿意保證

首頁  •  j2h 論壇 • 程式設計討論     • 

[教學]big5 轉 utf-8 之方法

房東：小胖
發表時間：2010-06-01
[檢舉]


最近因為要寫一個應用程式，他必須把網頁傳送過來的資料轉為 utf-8 再處理，
一般 big5 轉 utf-8 用 iconv 函數就可以處理，但有一種情形，就是如果 big5 字串中如果有 &# 就無法轉換
所以我特別寫了一個轉換程式

function big5_2_utf8($big5_str) {
$sw[\"廖\"]=\"廖\";
$sw[\"碁\"]=\"碁\";
$sw[\"粧\"]=\"粧\";
$sw[\"裏\"]=\"裏\";
$sw[\"墻\"]=\"墻\";
$sw[\"恒\"]=\"恒\";
$sw[\"銹\"]=\"銹\";
$sw[\"嫺\"]=\"嫺\";
$sw[\"╔\"]=\"╔\";
$sw[\"╦\"]=\"╦\";
$sw[\"╗\"]=\"╗\";
$sw[\"╠\"]=\"╠\";
$sw[\"╬\"]=\"╬\";
$sw[\"╣\"]=\"╣\";
$sw[\"╚\"]=\"╚\";
$sw[\"╩\"]=\"╩\";
$sw[\"╝\"]=\"╝\";
$sw[\"╒\"]=\"╒\";
$sw[\"╤\"]=\"╤\";
$sw[\"╕\"]=\"╕\";
$sw[\"╞\"]=\"╞\";
$sw[\"╪\"]=\"╪\";
$sw[\"╡\"]=\"╡\";
$sw[\"╘\"]=\"╘\";
$sw[\"╧\"]=\"╧\";
$sw[\"╛\"]=\"╛\";
$sw[\"╓\"]=\"╓\";
$sw[\"╥\"]=\"╥\";
$sw[\"╖\"]=\"╖\";
$sw[\"╟\"]=\"╟\";
$sw[\"╫\"]=\"╫\";
$sw[\"╢\"]=\"╢\";
$sw[\"╙\"]=\"╙\";
$sw[\"╨\"]=\"╨\";
$sw[\"╜\"]=\"╜\";
$sw[\"║\"]=\"║\";
$sw[\"═\"]=\"═\";
$sw[\"╔\"]=\"╔\";
$sw[\"╗\"]=\"╗\";
$sw[\"╚\"]=\"╚\";
$sw[\"╝\"]=\"╝\";
$sw[\"█\"]=\"█\";
$sw[\"�塿"]=\"�塿";
$sw[\"／\"]=\"／\";

$len=strlen($big5_str);
$un=\'\';
for ($i=0;$i<$len;$i++) {
$s =substr($big5_str,$i,1);
$s1 =substr($big5_str,$i,2);
$sbit=ord($s);
if ($sbit < 0x80) {
$un.=$s;
} else {
$new_word=iconv(\"BIG5\",\"UTF-8\",$s1);
if(!$new_word){
if($sw[$s1]) $new_word=$sw[$s1];
}
if($new_word!=\'\'){
$un.=$new_word;
$i++;
}
}
}
$s=\'\';
while(strlen($un)>0){
$p=strpos($un,\"&#\");
if ($p===false) {
$s.=$un;
return $s;
}
else{
if ($p!=0){
$s.=substr($un,0,$p);
$un=substr($un,$p);
}
$p=strpos($un,\";\");
if ($p===false){
$s.=$un;
return $s;
}
else{
$code=substr($un,2,$p-2);
$un=substr($un,$p+1);
if (strcasecmp($code{0},\"x\")==0){
$code=hexdec(substr($code,1));
}
else{
$code=intval($code);
}
if($code <= 0x7f){
$s.=chr($code);
}
elseif($code <= 0x7ff){
$s.=chr(($code >> 6) | 0xc0);
$s.=chr(($code % 0x40) | 0x80);
}
elseif($code <= 0xffff){
$s.=chr( ($code >> 12) | 0xe0);
$s.=chr((($code >> 6) % 0x40) | 0x80);
$s.=chr( ($code % 0x40) | 0x80);
}
elseif($code <= 0x10ffff){
$s.=chr( ($code >> 18) | 0xf0);
$s.=chr((($code >> 12) % 0x40) | 0x80);
$s.=chr((($code >> 6) % 0x40) | 0x80);
$s.=chr( ($code % 0x40) | 0x80);
}
}
}
}
return $s;
}






  • 贊助網站       

    廣利不動產-板橋在地生根最實在--新板特區指名度最高、值得您信賴的好房仲
    完整房訊，房屋、店面熱門精選物件，廣利不動產 優質仲介，房屋租賃、買賣資訊透明，交易真安心！
    廣利不動產-新板特區指名度最高、值得您信賴的好房仲
    您的托付,廣利用心為您服務

    • 1 樓住戶：小貓
    發表時間：2010-06-01     		[檢舉]

    因為目前論壇的編碼是 Big-5 ，為了跟綠界的便利超商付費機制結合，而不巧，他的編碼是 UTF-8，所以我傳過去的參考全變成亂碼，所以我不得已只好寫一個轉碼頁面，有需求的可以參考使用..

    $pay_sob=iconv('BIG5','UTF-8',$pay_sob);
    $pay_name=iconv('BIG5','UTF-8',$pay_name);
    ?>

    嚙豎會嚙瞇嚙罵嚙豬導您嚙豌便嚙瞋嚙磕嚙諉付嚙瞌嚙箴嚙踝蕭嚙璀嚙請耐嚙賠蛛蕭嚙皚...












    2 嚙諉佗蕭嚙踝蕭G嚙踝蕭嚙稻
    嚙緻嚙踝蕭嚙褕塚蕭嚙瘦2010-06-01     		[嚙踝蕭嚙罵]

    嚙諒迎蕭g嚙緹嚙踝蕭嚙罵嚙諄剁蕭 utf8 嚙踝蕭 big5嚙璀嚙踝蕭嚙諉想嚙踝蕭嚙踝蕭iconv嚙瞇嚙緯嚙瘤

    嚙踝蕭嚙盤嚙誹在嚙誕伐蕭iconv嚙璀嚙瞇utf8嚙踝蕭big5嚙褕就嚙碼嚙緹嚙瑾嚙諉堆蕭嚙瘩嚙璀嚙瞇嚙瞌嚙線嚙緯嚙皚嚙踝蕭utf8嚙踝蕭big5嚙璀嚙磅嚙踝蕭嚙踝蕭嚙踝蕭嚙踝蕭big5嚙碼嚙踝蕭嚙褕候就嚙踝蕭嚙踝蕭嚙緘嚙瘤嚙璀嚙趣本嚙瘡嚙踝蕭嚙瞇嚙踝蕭嚙諉字嚙磅嚙碼嚙緹嚙璀嚙踝蕭嚙瘦嚙瞌嚙踝蕭嚙踝蕭嚙踝蕭嚙踝蕭嚙踝蕭big5嚙碼嚙賦它嚙瞌嚙瘡嚙賦的嚙緬嚙緬嚙踝蕭嚙踝蕭嚙瘤嚙璀嚙踝蕭嚙瞎嚙緻嚙磊嚙締嚙瞇嚙踝蕭嚙踝蕭嚙瘤嚙瘠

    嚙諒恬蕭琤u嚙緯嚙瑾嚙諉字嚙瑾嚙諉字嚙踝蕭A嚙瞎嚙踝蕭J嚙踝蕭S嚙踝蕭嚙踝蕭嚙踝蕭嚙踝蕭嚙碼嚙瞇嚙踝蕭"嚙踝蕭"嚙瞇嚙踝蕭嚙璀嚙踝蕭嚙瞎嚙締嚙踝蕭嚙瘤嚙衝荔蕭A嚙踝蕭嚙瞌嚙緻嚙確嚙瞌嚙瘤嚙踝蕭嚙確嚙褊。

    嚙踝蕭嚙踝蕭悁狾嚙� http://203.68.102.46/online_book/content.php?chapter_sn=173 嚙瞑嚙踝蕭 JENY's

    嚙複製嚙緹嚙踝蕭 //嚙緞嚙緝嚙賞換utf8嚙緝嚙赭為big5
    function utf8_2_big5($utf8_str) {
    $i=0;
    $len = strlen($utf8_str);
    $big5_str="";
    for ($i=0;$i<$len;$i++) {
    $sbit = ord(substr($utf8_str,$i,1));
    if ($sbit < 128) {
    $big5_str.=substr($utf8_str,$i,1);
    } else if($sbit > 191 && $sbit < 224) {
    $new_word=iconv("UTF-8","Big5",substr($utf8_str,$i,2));
    $big5_str.=($new_word=="")?"嚙踝蕭":$new_word;
    $i++;
    } else if($sbit > 223 && $sbit < 240) {
    $new_word=iconv("UTF-8","Big5",substr($utf8_str,$i,3));
    $big5_str.=($new_word=="")?"嚙踝蕭":$new_word;
    $i+=2;
    } else if($sbit > 239 && $sbit < 248) {
    $new_word=iconv("UTF-8","Big5",substr($utf8_str,$i,4));
    $big5_str.=($new_word=="")?"嚙踝蕭":$new_word;
    $i+=3;
    }
    }
    return $big5_str;
    }

    嚙稽嚙踝蕭嚙諉人嚙豎求嚙璀嚙踝蕭 utf-8 嚙踝蕭 big5 嚙褕，嚙踝蕭嚙踝蕭嚙踝蕭嚙趣的嚙緝嚙璀嚙誹想嚙緯嚙踝蕭嚙� $len = strlen($utf8_str);
    $big5_str="";
    for ($i=0;$i<$len;$i++) {
    $s =substr($utf8_str,$i,1);
    $s1=substr($utf8_str,$i+1,1);
    $s2=substr($utf8_str,$i+2,1);
    $s3=substr($utf8_str,$i+3,1);
    $sbit=ord($s);
    if ($sbit < 0x80) {
    $big5_str.=$s;
    } else if($sbit >= 0xc0 && $sbit < 0xe0) {
    $new_word=iconv("UTF-8","Big5",substr($utf8_str,$i,2));
    $big5_str.=$new_word?$new_word:
    '&#'.(((ord($s) & 0x1f) * 0x40) + (ord($s1) & 0x3f)).''
    $i++;
    } else if($sbit >= 0xe0 && $sbit < 0xf0) {
    $new_word=iconv("UTF-8","Big5",substr($utf8_str,$i,3));
    $big5_str.=$new_word?$new_word:
    '&#'.(((ord($s) & 0x0f) * 0x1000) + ((ord($s1) & 0x3f) * 0x40) + (ord($s2) & 0x3f)).''
    $i+=2;
    } else if($sbit >= 0xf0 && $sbit < 0xf8) {
    $new_word=iconv("UTF-8","Big5",substr($utf8_str,$i,4));
    $big5_str.=$new_word?$new_word:
    '&#'.(((ord($s) & 0x07) * 0x40000) + ((ord($s1) & 0x3f) * 0x1000) + ((ord($s2) & 0x3f) * 0x40) + (ord($s3) & 0x3f)).''
    $i+=3;
    }
    }
    return $big5_str;
    }
    [/code]
    [/sell]


    嚙瑾嚙瑾 2 嚙瘡嚙稷嚙踝蕭嚙瑾嚙瑾嚙踝蕭颩嚙踝蕭嚙� 嚙箠嚙踝蕭1 嚙踝蕭嚙篌 

    嚙練嚙磕嚙瘦
    嚙瘦嚙箠嚙踝蕭嚙箴嚙瘦