sql 函数汉字转拼音-白红宇

                            
GO
/****** Object: UserDefinedFunction [dbo].[fn_GetPy] Script 
Date
: 2017/1/4 10:53:49 ******/
SET
ANSI_NULLS 
ON
GO
SET
QUOTED_IDENTIFIER 
ON
GO
ALTER
function
[dbo].[fn_GetPy](@str nvarchar(4000))
returns
nvarchar(4000)
　
--用于加密
--WITH ENCRYPTION
as
begin
declare
@intLen 
int
declare
@strRet nvarchar(4000)
declare
@
temp
nvarchar(100)
set
@intLen = len(@str)
set
@strRet = 
''
while @intLen > 0
begin
set
@
temp
= 
''
select
@
temp
= 
case
when
substring
(@str,@intLen,1) >= 
'帀'
then
'Z'
when
substring
(@str,@intLen,1) >= 
'丫'
then
'Y'
when
substring
(@str,@intLen,1) >= 
'夕'
then
'X'
when
substring
(@str,@intLen,1) >= 
'屲'
then
'W'
when
substring
(@str,@intLen,1) >= 
'他'
then
'T'
when
substring
(@str,@intLen,1) >= 
'仨'
then
'S'
when
substring
(@str,@intLen,1) >= 
'呥'
then
'R'
when
substring
(@str,@intLen,1) >= 
'七'
then
'Q'
when
substring
(@str,@intLen,1) >= 
'妑'
then
'P'
when
substring
(@str,@intLen,1) >= 
'噢'
then
'O'
when
substring
(@str,@intLen,1) >= 
'拏'
then
'N'
when
substring
(@str,@intLen,1) >= 
'嘸'
then
'M'
when
substring
(@str,@intLen,1) >= 
'垃'
then
'L'
when
substring
(@str,@intLen,1) >= 
'咔'
then
'K'
when
substring
(@str,@intLen,1) >= 
'丌'
then
'J'
when
substring
(@str,@intLen,1) >= 
'铪'
then
'H'
when
substring
(@str,@intLen,1) >= 
'旮'
then
'G'
when
substring
(@str,@intLen,1) >= 
'发'
then
'F'
when
substring
(@str,@intLen,1) >= 
'妸'
then
'E'
when
substring
(@str,@intLen,1) >= 
'咑'
then
'D'
when
substring
(@str,@intLen,1) >= 
'嚓'
then
'C'
when
substring
(@str,@intLen,1) >= 
'八'
then
'B'
when
substring
(@str,@intLen,1) >= 
'吖'
then
'A'
else
rtrim(ltrim(
substring
(@str,@intLen,1)))
end
--对于汉字特殊字符，不生成拼音码
if (ascii(@
temp
)>127) 
set
@
temp
= 
''
--对于英文中小括号，不生成拼音码
if @
temp
= 
'('
or
@
temp
= 
')'
set
@
temp
= 
''
select
@strRet = @
temp
+ @strRet
set
@intLen = @intLen - 1
end
return
lower
(@strRet)
end
         
       
　　效果如下：
本文转自左正博客园博客，原文链接：http://www.cnblogs.com/soundcode/p/6247781.html，如需转载请自行联系原作者