SQL Server中，实现二进制与字符类型之间的数据转换

hotnet

　　在工控应用上，返回的数据经常会以二进制的形成存储，而这些二进制数据又是以每4个bit表示一个十六进制的数据内容。解析的时候，往往是一个字节（Byte）占用8个位（bit），高位4bit 表示一个十六进制数据，低位4bit 表示一个十六进制数据。
　　问题描述：在SQL Server 数据库中，如何实现二进制数据与字符串数据之间的直接转换？
　　一定会有人立马反问我：为什么不在程序中使用 C# 或者 JAVA 或者 C++ 来处理这个业务呢？我的回答是：这个我知道，也已经实现了。但在一些特殊的应用环境和业务需求面前（如：对数据的统计、对数据的分析），我必须这么做！
　　SQL Server 数据库中，实现 varbinary 类型转换成 varchar 类型
　　实现的思路是：
　　每次取得 varbinary 中一个字节的数据，然后除以16 获得高位的4bit数据，再模16获得低位的4bit数据；分别从固定字符串中以下标的形式匹配对应的字符，最后累加起来即可。
　　代码如下：
　　

• --==============================================
  
•     --  FUNCTION  varbin2hexstr
  
•     --  将 varbinary 类型的数据转换为 varchar 类型
  
•     --==============================================
  
• 
  
•     IF OBJECT_ID ('dbo.varbin2hexstr') IS NOT NULL
  
•         DROP FUNCTION dbo.varbin2hexstr
  
•     GO
  
• 
  
•     CREATE function varbin2hexstr(
  
•     @bin varbinary(8000)
  
•     )returns varchar(8000)
  
•     as
  
•     begin
  
•         declare @re varchar(8000),@i int
  
•         select @re='',@i=datalength(@bin)
  
•         while @i>0
  
•             select @re=substring('0123456789ABCDEF',substring(@bin,@i,1)/16+1,1)
  
•                     +substring('0123456789ABCDEF',substring(@bin,@i,1)%16+1,1)
  
•                     +@re
  
•                 ,@i=@i-1
  
•        -- return('0x'+@re)
  
•         return @re
  
•     end
  
• 
  
•     GO
  

　　

　　测试示例：
　　

select dbo.varbin2hexstr(0x1432fabcdef1234567890)　　

　　SQL Server 数据库中，实现varchar 类型转换成varbinary 类型
　　一定会有人立马想到：既然已经实现了varbinary 类型转换成 varchar 类型，接下来需要做的，只是将函数逆向反转实现便可。但实现也并非如此！实现的思路是：
　　先将整个字符串按照每两位分组；
　　     为什么不按照每8位或每4位进行分组？是为了考虑到函数的通用性。
　　     如果按照每 8位 或者 每4位 分组，则整个字符串必须是8或者4的倍数，否则将出现字符不足，前面补 0的情况。
　　然后对每个字符进行处理，如：字符“A B C D E F” 对应转换为“10 11 12 13 14 15”；
　　接着对每2个字符进行 16 的幂运算，并求和。如： AB = 10 * 16的一次方 + 11 * 16的零次方；
　　再将这个2个字符的整数和，转换为一个字节（Byte）长度的 varbinary 数据；
　　最后将所有的 varbinary 数据直接相加即可。
　　代码如下：
　　

• --==============================================
  
• --  FUNCTION  hexstr2varbin
  
• --  将 varchar 类型的数据转换为 varbinary 类型
  
• --==============================================
  
• 
  
• IF OBJECT_ID ('dbo.hexstr2varbin') IS NOT NULL
  
•     DROP FUNCTION dbo.hexstr2varbin
  
• GO
  
• 
  
• CREATE function [dbo].[hexstr2varbin](
  
•   @char varchar(8000)
  
• )returns varbinary(8000)
  
• as
  
• begin
  
•     declare @re varbinary(8000), @tempchar varchar(2),
  
•             @getchar varchar(1), @getint int, @n int, @totalint int,
  
•             @i int, @tempint int, @runNum int -- 字符串截取段数
  
• 
  
•      select @tempchar='',@i=datalength(@char), @re=0x;
  
• 
  
•     if( @i>0)
  
•     begin
  
•         if ( @i%2 = 0) set @runNum= @i/2
  
•         else set @runNum= @i/2 + 1
  
• 
  
•         while (@runNum > 0)
  
•         begin
  
•             if(@runNum = 1) set @tempchar = @char
  
•             else set @tempchar = substring(@char, (@runNum-1)*2,2)
  
• 
  
•             select @n=1,@totalint=0;
  
• 
  
•             -- 循环处理截取的每个字符串 (这里的字符串长度为2)
  
•             while @n < ( datalength(@tempchar) + 1 )
  
•             begin
  
•                 set @getchar=substring(@tempchar,@n,1);
  
• 
  
•                 -- 将字符转换为十六进制对应的数字
  
•                 select @getint=case
  
•                        when @getchar='a' then 10
  
•                        when @getchar='b' then 11
  
•                        when @getchar='c' then 12
  
•                        when @getchar='d' then 13
  
•                        when @getchar='e' then 14
  
•                        when @getchar='f' then 15
  
•                        else  convert(int,@getchar) end;
  
• 
  
•                 set @tempint=@getint*power(16,datalength(@tempchar)-@n)
  
•                 set @totalint = @totalint + @tempint
  
•                 set @n=@n+1
  
•             end
  
• 
  
•                set @re=convert(varbinary(1),@totalint) + @re;
  
•                set @runNum=@runNum-1;
  
•         end
  
•     end
  
•    return @re
  
• 
  
• end
  
• GO
  

　　

　　测试示例：
　　

select dbo.hexstr2varbin('ffffff2353f5feefaffae1fff1ffbaf1faffa33333333ff3aaafffffffaaff')　　

　　（完）
　　【2012年度IT博客大赛】我的参赛主页 http://blog.51cto.com/contest2012/404164
　　记得帮我投票哦 ~ 谢谢！http://blog.51cto.com/neweditor/editor/images/smiley/51.gif