說明 : 這些函數是以 PHP4 來處理 big5 字元 任何人都可以自由散佈本程式 寫這些程式是看見 LinuxFab 上討論區上很多人有中文問題才寫的 我不能保證會發生什麼問題 , 若有 bug 請來信討論不要謾罵 時間 : 2003/3/6 版本 : 0.22 PS 1 : 詳細安裝方式與使用方式請參考 readme.html PS 2 : 本版本大幅改用 iconv 來處理字串 , 作者尚未很詳細的測試, 若有問題或 bug 請 Email 給我 PS 3 : PHP 自從 4.3.0 之後已經正式支援big5字串 , 效果不錯 , 本函數集也許不會再做大幅更新了 因為有許多函數可以用 PHP 4.3.0 來做有相同效果 , 不過 PHP 4.3.0 尚未提供 addslashes 處理 雙位元字串...是可惜之處 */ /*時間: 2004.12.06 *更動: 由於舊有的寫法無法在新版的iconv2.0+後使用,故修改big5_func.iconv.php的big5_stripslashes, * big5_addslashes, big5_stripcslashes, big5_addcslashes以符合使用。 *修改人:Eddy Chang (eyesofkids@yahoo.com.tw) */ /*時間: 2004.08.28 *更動: 在big_func.inc中加入gb2big5, big52gb, 以及big5_mysql_like等三個函式。 *修改人:Eddy Chang (eyesofkids@yahoo.com.tw) */ defined( '_VALID_MOS' ) or die( 'Direct Access to this location is not allowed.' ); global $mosConfig_lang; define("BIG5_FILE_DIR" , dirname(__FILE__) ); /* 程式開始 */ # error_reporting(E_ALL); define("BIG5_UNICODE_START" , 0xa140); // 目前中文轉 Unicocde 的 BIG5 字起始值 define("UTF16_FIRST_CHAR" ,chr(0xff).chr(0xfe)); // Big5 error handler function function Big5ErrorHandler ($errno, $errstr, $errfile, $errline) { $debug = debug_backtrace(); switch ($errno) { case E_USER_ERROR: echo "
Error: $errstr in ".$debug[2][file] ." on line " .$debug[2][line] ."
\n"; exit(1); break; case E_USER_WARNING: echo "
Warring: $errstr in ".$debug[2][file] ." on line " .$debug[2][line] ."
\n"; break; case E_USER_NOTICE: echo "
Notice: [$errno] $errstr
\n"; break; default: echo "Unkown error type: [$errno] $errstr
\n"; break; } } //if(function_exists("iconv") && ICONV_VERSION =="1.9") if(function_exists("iconv")){ include_once(BIG5_FILE_DIR . "/big5_func.iconv.php"); //echo "use iconv
"; }else{ include_once(BIG5_FILE_DIR . "/big5_func.default.php"); } function big5_isBig5($c="") { $bc = hexdec(bin2hex($c)); if ( ($bc>=0xa440 && $bc<= 0xc67e) || ($bc>=0xc940 && $bc<= 0xf9fe) || ($bc>=0xa140 && $bc<= 0xa3fe) || ($bc>=0xc6a1 && $bc<= 0xc8fe) ) return true; return false; } // 計算中文字筆劃 function big5_stroke($str="") { $tab=@File(BIG5_FILE_DIR ."/big5_stroke.tab"); if(!$tab) { $error_handler = set_error_handler("Big5ErrorHandler"); trigger_error ("big5_stroke() : Can not open file '" . BIG5_FILE_DIR . "/big5_stroke.tab'", E_USER_ERROR ); restore_error_handler(); } /* 讀取轉換表至陣列 $StrokeMapping */ $i=0; while(list($key,$val)=Each($tab)) { $StrokeMapping[$i] = split(" ",$val); $StrokeMapping[$i][1] = HexDec($StrokeMapping[$i][1]); $StrokeMapping[$i][2] = HexDec($StrokeMapping[$i][2]); $i++; } $s1 = substr($str,0,1); $s2 = substr($str,1,1); $s = Hexdec(Bin2hex($s1.$s2)); if( big5_isBig5($s1.$s2) ) { for($i=0;$i= $s) return $StrokeMapping[$i][0]; } else return false; } function big5_chunk_split($str, $chunklen=76 , $end="\r\n") { $len = big5_strlen($str); $tmp = array(); for($i=0 ; $i<$len ; $i+=$chunklen) $tmp[] = big5_substr($str,$i,$chunklen) ; return implode( $end , $tmp); } function big5_strpos($haystack ,$needle ,$offset=0) { if($offset < 0 || !is_int($offset)) { $error_handler = set_error_handler("Big5ErrorHandler"); trigger_error ("big5_strpos(string haystack,string needle,int offset=0) : offset must >= 0 or ignore", E_USER_WARNING ); restore_error_handler(); return false; } $needle_len = big5_strlen($needle); $len =big5_strlen($haystack); for($i=$offset ; $i<$len ; $i++) { if(big5_substr($haystack,$i,$needle_len) == $needle) return $i; } return false; } function big5_strrpos($haystack , $needle) { $first_char = ""; if( is_int($needle) ) { $hex = dechex($needle); $first_char = chr(hexdec(substr($hex,0,2))); if(strlen($hex)>2) $first_char .= chr(hexdec(substr($hex,2,2))); } else $first_char = big5_substr($needle,0,1); echo $first_char; $len =big5_strlen($haystack); for($i=$len ; $i>-1 ; $i--) { if(big5_substr($haystack,$i,1) == $first_char) return $i; } return false; } /*用於許功蓋等字在作mysql有關like查詢時,需加入三次\\\才會正常執行 *由Eddy Chang 新增。 */ function big5_mysql_like($keyword_str) { $keyword1 = str_replace( chr(92) ,chr(92).chr(92).chr(92).chr(92),$keyword_str); return $keyword1; } /*用於繁簡碼互轉,這個是big5轉gb *由Eddy Chang 新增。 */ function big52gb($Text) { $fp = fopen(BIG5_FILE_DIR."/big5-gb.table", "r"); $max = strlen($Text) - 1; for ($i = 0;$i < $max;$i++) { $h = ord($Text[$i]); if ($h >= 160) { $l = ord($Text[$i + 1]); if ($h == 161 && $l == 64) { $gb = " "; } else { fseek($fp, ($h - 160)*510 + ($l - 1)*2); $gb = fread($fp, 2); } $Text[$i] = $gb[0]; $Text[$i + 1] = $gb[1]; $i++; } } fclose($fp); return $Text; } /*用於繁簡碼互轉,這個是gb2312轉big5 *由Eddy Chang 新增。 */ function gb2big5($Text) { $fp = fopen(BIG5_FILE_DIR."/gb-big5.table", "r"); $max = strlen($Text) - 1; for ($i = 0;$i < $max;$i++) { $h = ord($Text[$i]); if ($h >= 160) { $l = ord($Text[$i + 1]); if ($h == 161 && $l == 64) { $gb = " "; } else { fseek($fp, ($h - 160)*510 + ($l - 1)*2); $gb = fread($fp, 2); } $Text[$i] = $gb[0]; $Text[$i + 1] = $gb[1]; $i++; } } fclose($fp); return $Text; } ?> 正大特殊金屬 - 首頁

站內搜索
請輸入:
2016/08/31, 週三
首頁
歡迎來到正大特殊金屬有限公司~
正大特殊金屬有限公司由創辨人-林德薰先生(1937-1998)於民國五十七年設立從事特殊鋼材之進口販售﹔有感於當時台灣經濟蓬勃發展,產業自主性之重要,遂於民國六十七年購置廠房及生產設備斥資設立【雨德五金股份有限公司】,專事高級鋼材之線,棒精密加工﹔供應模具及機械零件等產業所需.三十餘年來名列經濟部進出口績優廠商.


經營項目繁多,舉列碳鋼、合金鋼、工具鋼、不袗之圓棒、線材、板材、厚薄版、無缝管、型鋼等,一應俱全﹔另有耐熱閥門鋼、電磁軟鋼、粉末治金製品.保持一萬噸上下之庫存販售.


近年來,不斷擴大經營項目,添購新進設備外﹔並導入品管體系及管理制度﹔以顧客的需求為導向的服務精神,更是我們一貫的企業精神.


配合國家經濟政策,產業升級﹔提升產品競爭力及附加價值,進而拓展國際市場將是本公司努力的願景.

主選單
首頁
服務項目
產品介紹
服務據點
聯絡我們
各國規範對照表
郵件網站
誰在線上
我們有 3 位訪客在線上

本網站代管於戰國策