--可支持大字符集20000个汉字!create function f_ch2py(@chn nchar(1))
returns char(1)
as
begin
declare @n int
declare @c char(1)
set @n = 63select @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
'丌' 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 @chn) as a
order by chn COLLATE Chinese_PRC_CI_AS 
) as b
return(@c)
end
goselect dbo.f_ch2py('中')  --Z
select dbo.f_ch2py('国')  --G
select dbo.f_ch2py('人')  --R
select dbo.f_ch2py('镆')  --M
-----------------调用
CREATE FUNCTION F_GetHelpCode (
@cName VARCHAR(20) )
RETURNS VARCHAR(12)
AS
BEGIN
   DECLARE @i SMALLINT, @L SMALLINT , @cHelpCode VARCHAR(12), @e VARCHAR(12), @iAscii SMALLINT
   SELECT @i=1, @L=0 , @cHelpCode=''
   while @L<=12 AND @i<=LEN(@cName) BEGIN
      SELECT @e=LOWER(SUBSTRING(@cname,@i,1))
      SELECT @iAscii=ASCII(@e)
      IF @iAscii>=48 AND @iAscii <=57 OR @iAscii>=97 AND @iAscii <=122 or @iAscii=95 
       SELECT @cHelpCode=@cHelpCode  +@e
      ELSE
      IF @iAscii>=176 AND @iAscii <=247
            SELECT @cHelpCode=@cHelpCode  + dbo.f_ch2py(@e)
        ELSE SELECT @L=@L-1
      SELECT @i=@i+1, @L=@L+1 END 
    RETURN @cHelpCode
END
GO--调用
select dbo.F_GetHelpCode('大力')

解决方案 »

  1.   

    像这样的事,肯定放到客户端去操作。
    在大富翁上找吧,DELPHI对应的代码很多。要不,你就用大力的吧
      

  2.   

    一个函数的:
    --创建取拼音函数
    create function fGetPy(@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)
    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
    '丌' 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 @chn) as a
    order by chn COLLATE Chinese_PRC_CI_AS 
    ) as b
    set @return=@return+@c
    end
    return(@return)
    endgo
    --测试
    select dbo.fgetpy('东莞市') as 东莞市,dbo.fgetpy('中国人') as 中国人--删除拼音函数
    drop function fgetpy
      

  3.   

    谢谢各位.我觉得zjcxc(邹建)的方法不错.