【叶子函数分享四十四】全角半角转换函数

--(此函数部分思路参考了CSDN上大力的转换函数)

--邹建2005.01(引用请保留此信息)--*/

go

--创建函数

create function SBC2DBC

(

@str nvarchar(4000), --要转换的字符串

@flag bit --转换标志,0转换成半角,1转换成全角

)

returns nvarchar(4000)

as

begin

declare @pat nvarchar(8),@step int,@i int,@spc int

if @flag=0

select @pat=N'%[！-～]%',@step=-65248,@str=replace(@str,N'　',N' ')

else

select @pat=N'%[!-~]%',@step=65248,@str=replace(@str,N' ',N'　')

set @i=patindex(@pat collate latin1_general_bin,@str)

while @i>0

select @str=replace(@str,substring(@str,@i,1),nchar(unicode(substring(@str,@i,1))+@step))

,@i=patindex(@pat collate latin1_general_bin,@str)

return(@str)

end

--测试示例

select dbo.SBC2DBC('~~~~ca!b',1)

--运行结果

/*

～～～～ｃａ！ｂ

*/

--附半角全角表

/*

ASCII 全角字符 Unicode 半角字符 Unicode

0x20 "　"空格U+3000 " "空格U+0020

0x21 ！U+ff01 ! U+0021

0x22 ＂U+ff02 " U+0022

0x23 ＃U+ff03 # U+0023

0x24 ＄U+ff04 $ U+0024

0x25 ％U+ff05 % U+0025

0x26 ＆U+ff06 & U+0026

0x27 ＇U+ff07 ' U+0027

0x28 （U+ff08 ( U+0028

0x29 ）U+ff09 ) U+0029

0x2a ＊U+ff0a * U+002a

0x2b ＋U+ff0b + U+002b

0x2c ，U+ff0c , U+002c

0x2d －U+ff0d - U+002d

0x2e ．U+ff0e . U+002e

0x2f ／U+ff0f / U+002f

0x30 ０U+ff10 0 U+0030

0x31 １U+ff11 1 U+0031

0x32 ２U+ff12 2 U+0032

0x33 ３U+ff13 3 U+0033

0x34 ４U+ff14 4 U+0034

0x35 ５U+ff15 5 U+0035

0x36 ６U+ff16 6 U+0036

0x37 ７U+ff17 7 U+0037

0x38 ８U+ff18 8 U+0038

0x39 ９U+ff19 9 U+0039

0x3a ：U+ff1a : U+003a

0x3b ；U+ff1b ; U+003b

0x3c ＜U+ff1c < U+003c

0x3d ＝U+ff1d = U+003d

0x3e ＞U+ff1e > U+003e

0x3f ？U+ff1f ? U+003f

0x40 ＠U+ff20 @ U+0040

0x41 ＡU+ff21 A U+0041

0x42 ＢU+ff22 B U+0042

0x43 ＣU+ff23 C U+0043

0x44 ＤU+ff24 D U+0044

0x45 ＥU+ff25 E U+0045

0x46 ＦU+ff26 F U+0046

0x47 ＧU+ff27 G U+0047

0x48 ＨU+ff28 H U+0048

0x49 ＩU+ff29 I U+0049

0x4a ＪU+ff2a J U+004a

0x4b ＫU+ff2b K U+004b

0x4c ＬU+ff2c L U+004c

0x4d ＭU+ff2d M U+004d

0x4e ＮU+ff2e N U+004e

0x4f ＯU+ff2f O U+004f

0x50 ＰU+ff30 P U+0050

0x51 ＱU+ff31 Q U+0051

0x52 ＲU+ff32 R U+0052

0x53 ＳU+ff33 S U+0053

0x54 ＴU+ff34 T U+0054

0x55 ＵU+ff35 U U+0055

0x56 ＶU+ff36 V U+0056

0x57 ＷU+ff37 W U+0057

0x58 ＸU+ff38 X U+0058

0x59 ＹU+ff39 Y U+0059

0x5a ＺU+ff3a Z U+005a

0x5b ［U+ff3b [ U+005b

0x5c ＼U+ff3c / U+005c

0x5d ］U+ff3d ] U+005d

0x5e ＾U+ff3e ^ U+005e

0x5f ＿U+ff3f _ U+005f

0x60 ｀U+ff40 ` U+0060

0x61 ａU+ff41 a U+0061

0x62 ｂU+ff42 b U+0062

0x63 ｃU+ff43 c U+0063

0x64 ｄU+ff44 d U+0064

0x65 ｅU+ff45 e U+0065

0x66 ｆU+ff46 f U+0066

0x67 ｇU+ff47 g U+0067

0x68 ｈU+ff48 h U+0068

0x69 ｉU+ff49 i U+0069

0x6a ｊU+ff4a j U+006a

0x6b ｋU+ff4b k U+006b

0x6c ｌU+ff4c l U+006c

0x6d ｍU+ff4d m U+006d

0x6e ｎU+ff4e n U+006e

0x6f ｏU+ff4f o U+006f

0x70 ｐU+ff50 p U+0070

0x71 ｑU+ff51 q U+0071

0x72 ｒU+ff52 r U+0072

0x73 ｓU+ff53 s U+0073

0x74 ｔU+ff54 t U+0074

0x75 ｕU+ff55 u U+0075

0x76 ｖU+ff56 v U+0076

0x77 ｗU+ff57 w U+0077

0x78 ｘU+ff58 x U+0078

0x79 ｙU+ff59 y U+0079

0x7a ｚU+ff5a z U+007a

0x7b ｛U+ff5b { U+007b

0x7c ｜U+ff5c | U+007c

0x7d ｝U+ff5d } U+007d

0x7e ～U+ff5e ~ U+007e

*/