在SQL建
如下：
SQL取漢字拼音首字母
create proc pinyin @var varchar(100)
as
begin
set @var=ltrim(rtrim(@var))
declare @i int,@v varbinary(2),@varchar varchar(100),@pinyin varchar(100)
set @pinyin=''
set @i=1
while @i<=len(@var)
begin
set @v=cast(substring(@var,@i,1) as varbinary)
if @v<0xB0A1 or @v>0xD7FD
begin
print '含有非法字符'
return
end
if @v>=0xB0A1 and @v<=0xB0C4
begin
set @varchar='A'
end
else if @v>=0xB0C5 and @v<=0xB2C0
begin
set @varchar='B'
end
else if @v>=0xB2C1 and @v<=0xB2C0
begin
set @varchar='C'
end
else if @v>=0xB4EE and @v<=0xB6E9
begin
set @varchar='D'
end
else if @v>=0xB6EA and @v<=0xB7A1
begin
set @varchar='E'
end
else if @v>=0xB7A2 and @v<=0xB8C0
begin
set @varchar='F'
end
else if @v>=0xB8C1 and @v<=0xB9FD
begin
set @varchar='G'
end
else if @v>=0xB9EE and @v<=0xBBF6
begin
set @varchar='H'
end
else if @v>=0xBBF7 and @v<=0xBFA5
begin
set @varchar='J'
end
else if @v>=0xBFA6 and @v<=0xC0AB
begin
set @varchar='K'
end
else if @v>=0xC0AC and @v<=0xC2E7
begin
set @varchar='L'
end
else if @v>=0xC2E8 and @v<=0xC4C2
begin
set @varchar='M'
end
else if @v>=0xC4C3 and @v<=0xC5B5
begin
set @varchar='N'
end
else if @v>=0xC5B6 and @v<=0xC5BD
begin
set @varchar='O'
end
else if @v>=0xC5BE and @v<=0xC6D9
begin
set @varchar='P'
end
else if @v>=0xC6DA and @v<=0xC8BA
begin
set @varchar='Q'
end
else if @v>=0xC8BB and @v<=0xC8F5
begin
set @varchar='R'
end
else if @v>=0xC8F6 and @v<=0xCBF9
begin
set @varchar='S'
end
else if @v>=0xCBFA and @v<=0xCDD9
begin
set @varchar='T'
end
else if @v>=0xCDDA and @v<=0xCEF3
begin
set @varchar='W'
end
else if @v>=0xCEF4 and @v<=0xD1B8
begin
set @varchar='X'
end
else if @v>=0xD1B9 and @v<=0xD4D0
begin
set @varchar='Y'
end
else if @v>=0xD4D1 and @v<=0xD7FD
begin
set @varchar='Z'
end
else
begin
print 'error'
return
end
set @pinyin=@pinyin+@varchar
set @i=@i+1
end
print @pinyin
end
--drop proc pinyin
exec pinyin '中國人'