zoukankan      html  css  js  c++  java
  • 取汉字首字母的两个函数

    Go

    --创建取汉字首字母函数(第一版)

    create function [dbo].[f_getpy_V1] (@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

     

    go

    --创建取汉字首字母函数(第二版)

    create function [dbo].[f_getpy_V2](@Str varchar(500)='')

    returns varchar(500)

    as

    begin

        declare @strlen int,@return varchar(500),@ii int

        declare @n int,@c char(1),@chn nchar(1)

     

        select @strlen=len(@str),@return='',@ii=0

        set @ii=0

        while @ii<@strlen

        begin

           select @ii=@ii+1,@n=63,@chn=substring(@str,@ii,1)

           if @chn>'z'

           select @n = @n +1

           ,@c = case chn when @chn then char(@n) else @c end

           from(

           select top 27 * from (

           select chn = '吖'

           union all select '八'

           union all select '嚓'

           union all select '咑'

           union all select '妸'

           union all select '发'

           union all select '旮'

           union all select '铪'

           union all select '丌' --because have no 'i'

           union all select '丌'

           union all select '咔'

           union all select '垃'

           union all select '嘸'

           union all select '拏'

           union all select '噢'

           union all select '妑'

           union all select '七'

           union all select '呥'

           union all select '仨'

           union all select '他'

           union all select '屲' --no 'u'

           union all select '屲' --no 'v'

           union all select '屲'

           union all select '夕'

           union all select '丫'

           union all select '帀'

           union all select @chn) as a

           order by chn COLLATE Chinese_PRC_CI_AS

           ) as b

           else set @c='a'

           set @return=@return+@c

        end

        return(@return)

    end

     

    --测试示例

    select dbo.[f_getpy_V1]('王立国') as V11

    select dbo.[f_getpy_V2]('王立国') as V21

     

    select dbo.[f_getpy_V1]('重复') as V21

    select dbo.[f_getpy_V2]('重复') as V22

     

    --运行结果

    /*

    V11

    --------

    WLG

     

    V21

    --------

    WLG

     

    V21

    --------

    ZF

     

    V22

    --------

    ZF

    */

     

    --由上我们可以看到,两种方法都没有解决多音字的问题。

     
     
  • 相关阅读:
    csp 通信网络
    从客户端(content="xxxxx")中检测到有潜在危险的 Request.Form 值——较合理解决方案
    HttpUtility.HtmlEncode 方法
    web程序防止攻击的一些资料——整理
    memcached——学习
    VS2015 无法启动IIS Express Web服务器
    文件上传——资料收集
    水晶报表-需要安装软件
    web安全漏洞相关
    javascript一个在网页上画线的库
  • 原文地址:https://www.cnblogs.com/accumulater/p/6244467.html
Copyright © 2011-2022 走看看