create function fun_getPY(@str nvarchar(4000))returns nvarchar(4000)
          as
          begin
          declare @word nchar(1),@PY nvarchar(4000)
          set @PY=''
          while len(@str)>0
          begin
          set @word=left(@str,1)
          --如果非漢字字符,返回原字符
          set @PY=@PY+(case when unicode(@word) between 19968 and 19968+20901
          then (select top 1 PY from (
          select 'A' as PY,N'驁' as word
          union all select 'B',N'簿'
          union all select 'C',N'錯'
          union all select 'D',N'鵽'
          union all select 'E',N'樲'
          union all select 'F',N'鰒'
          union all select 'G',N'腂'
          union all select 'H',N'夻'
          union all select 'J',N'攈'
          union all select 'K',N'穒'
          union all select 'L',N'鱳'
          union all select 'M',N'旀'
          union all select 'N',N'桛'
          union all select 'O',N'漚'
          union all select 'P',N'曝'
          union all select 'Q',N'囕'
          union all select 'R',N'鶸'
          union all select 'S',N'蜶'
          union all select 'T',N'籜'
          union all select 'W',N'鶩'
          union all select 'X',N'鑂'
          union all select 'Y',N'韻'
          union all select 'Z',N'咗'
          ) T
          where word>=@word collate Chinese_PRC_CS_AS_KS_WS
          order by PY ASC) else @word end)

          set @str=right(@str,len(@str)-1)
          end
          return @PY
          end

          posted on 2009-02-26 09:44 sanmao 閱讀(446) 評論(0)  編輯  收藏

          只有注冊用戶登錄后才能發表評論。


          網站導航:
           

          常用鏈接

          留言簿(5)

          隨筆分類

          隨筆檔案

          搜索

          •  

          最新評論

          閱讀排行榜

          評論排行榜

          主站蜘蛛池模板: 岳阳市| 鄂伦春自治旗| 新泰市| 鲜城| 松原市| 天台县| 栾城县| 大宁县| 进贤县| 鄄城县| 鹿邑县| 浙江省| 平度市| 繁昌县| 镶黄旗| 阳曲县| 汉阴县| 黑水县| 临海市| 凉山| 平远县| 虎林市| 迭部县| 安阳市| 子长县| 屏南县| 天全县| 西丰县| 湘潭市| 河北省| 文登市| 内江市| 武安市| 乌海市| 治县。| 潼南县| 宜章县| 天水市| 顺义区| 泽州县| 恭城|