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'錯(cuò)'
          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

          文章來(lái)源:http://www.cnblogs.com/wangdetian168/archive/2008/06/28/1231706.html
          posted on 2010-09-28 11:00 sanmao 閱讀(196) 評(píng)論(0)  編輯  收藏

          只有注冊(cè)用戶登錄后才能發(fā)表評(píng)論。


          網(wǎng)站導(dǎo)航:
           

          常用鏈接

          留言簿(5)

          隨筆分類

          隨筆檔案

          搜索

          •  

          最新評(píng)論

          閱讀排行榜

          評(píng)論排行榜

          主站蜘蛛池模板: 静海县| 阿图什市| 永清县| 泊头市| 鹤庆县| 砀山县| 甘孜县| 阿拉尔市| 罗江县| 瓮安县| 西乌珠穆沁旗| 南开区| 萝北县| 义乌市| 沛县| 柳州市| 南召县| 安达市| 沙河市| 天津市| 宜川县| 无为县| 达尔| 盐津县| 延寿县| 环江| 宜阳县| 龙陵县| 怀来县| 临颍县| 沧源| 云和县| 商丘市| 建水县| 隆尧县| 铁岭市| 诸暨市| 邹城市| 南充市| 祁连县| 错那县|