转换中文日期的PHP程序

2016-01-29 14:29 49 1 收藏

转换中文日期的PHP程序,转换中文日期的PHP程序

【 tulaoshi.com - PHP 】

  本程序将中文日期输出为2001-12-23,并很好解决了“十”的问题,如“十一”和“二十一”中“十”的处理!稍加修改可改为函数。
<?
$str="二零○一年十二月二十三日";
echo $str."<p";
$flag=0;
$cn=array("一","二","三","四","五","六","七","八","九","十","零","○");
$num=array("1","2","3","4","5","6","7","8","9","","0","0");
$len=strlen($str);
for ($i=0;$i<$len;$i+=2)
{
   $array_str[$i]=substr($str,$i,2);
   $cout=0;
   while($cout<count($cn))
   {
     if ($array_str[$i]==$cn[$cout])
     {
       if ($flag==1)
         echo "-";
       if (($array_str[$i]=="十") and ($flag==1))
       {
         $temp[$cout]="1";
         echo $temp[$cout];
         $flag=2;break;
       }
       $temp[$cout]=$num[$cout];
       echo $temp[$cout];
       $flag=2;
       break;
     }
     else
     {
       if (count($cn)==$cout+1)
          $flag=1;
     }
     $cout++;
   }
}
?  

来源:http://www.tulaoshi.com/n/20160129/1493455.html

延伸阅读
//******************************************************** // 模块:数字转换为中文大写 #include "stdafx.h" static char *unit1[] = { "拾", "佰", "仟" }; static char *unit2[] = { "万", "亿" }; static char *digital[] = { "零", "壹", "贰", "叁", "肆", "伍", "陆", "柒", "捌", "玖" }; //*******************************...
标签: excel
Excel不规范日期格式快速转换为真正日期   Excel不规范日期格式快速转换为真正日期 如何在excel中制作个性相册   如何在excel中制作个性相册 Excel高级筛选随心所欲返回指定列数据 tulaoshi.com  Excel高级筛选随心所欲返回指定Tulaoshi.Com列数据 Excel如何限制录入重复姓名   Excel限制录入...
标签: Web开发
Html转换程序 body{background:#688ABD;margin:2px;}label{color:#fff;}th{font-size:14px;font-family:verdana,宋体;font-weight:bold;color:fc6;text-align:left}#sCode{width:400;height:150px;border:1px solid #1F2F47;margin-top:0px !important;margin-top:-1px;margin-bottom:0px !important;margin-bottom:-1px;}#ReCode{width:40...
标签: ASP
  function new_str(str) if instr(str,chr(34))<0 and str<"" then   str_split=split(str,chr(34))   i=1   str_s=""   for j=0 to ubound(str_split)-1    if i mod 2 then     str_s=str_s&str_split(j)&"“&quo...
标签: Web开发
代码如下: '//转换中文为unicode function URLEncoding(vstrIn)     dim i     dim strReturn,ThisChr,innerCode,Hight8,Low8     strReturn = ""     for i = 1 to Len(vstrIn)   &n...

经验教程

907

收藏

68
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部