在工控應(yīng)用上，返回的數(shù)據(jù)經(jīng)常會(huì)以二進(jìn)制的形成存儲(chǔ)，而這些二進(jìn)制數(shù)據(jù)又是以每4個(gè)bit表示一個(gè)十六進(jìn)制的數(shù)據(jù)內(nèi)容。解析的時(shí)候，往往是一個(gè)字節(jié)（Byte）占用8個(gè)位（bit），高位4bit 表示一個(gè)十六進(jìn)制數(shù)據(jù)，低位4bit 表示一個(gè)十六進(jìn)制數(shù)據(jù)。
問題描述：在SQL Server 數(shù)據(jù)庫中，如何實(shí)現(xiàn)二進(jìn)制數(shù)據(jù)與字符串?dāng)?shù)據(jù)之間的直接轉(zhuǎn)換？
一定會(huì)有人立馬反問我：為什么不在程序中使用 C# 或者 JAVA 或者 C++ 來處理這個(gè)業(yè)務(wù)呢？我的回答是：這個(gè)我知道，也已經(jīng)實(shí)現(xiàn)了。但在一些特殊的應(yīng)用環(huán)境和業(yè)務(wù)需求面前（如：對(duì)數(shù)據(jù)的統(tǒng)計(jì)、對(duì)數(shù)據(jù)的分析），我必須這么做！
SQL Server 數(shù)據(jù)庫中，實(shí)現(xiàn) varbinary 類型轉(zhuǎn)換成 varchar 類型
實(shí)現(xiàn)的思路是：
每次取得 varbinary 中一個(gè)字節(jié)的數(shù)據(jù)，然后除以16 獲得高位的4bit數(shù)據(jù)，再模16獲得低位的4bit數(shù)據(jù)；分別從固定字符串中以下標(biāo)的形式匹配對(duì)應(yīng)的字符，最后累加起來即可。
代碼如下：
復(fù)制代碼 代碼如下:
--==============================================
-- FUNCTION varbin2hexstr
-- 將 varbinary 類型的數(shù)據(jù)轉(zhuǎn)換為 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
測(cè)試示例：
select dbo.varbin2hexstr(0x1432fabcdef1234567890)
SQL Server 數(shù)據(jù)庫中，實(shí)現(xiàn) varchar 類型轉(zhuǎn)換成 varbinary 類型
一定會(huì)有人立馬想到：既然已經(jīng)實(shí)現(xiàn)了varbinary 類型轉(zhuǎn)換成 varchar 類型，接下來需要做的，只是將函數(shù)逆向反轉(zhuǎn)實(shí)現(xiàn)便可。但實(shí)現(xiàn)也并非如此！實(shí)現(xiàn)的思路是：
先將整個(gè)字符串按照每兩位分組；
為什么不按照每8位或每4位進(jìn)行分組？是為了考慮到函數(shù)的通用性。
如果按照每 8位 或者 每4位 分組，則整個(gè)字符串必須是8或者4的倍數(shù)，否則將出現(xiàn)字符不足，前面補(bǔ) 0的情況。
然后對(duì)每個(gè)字符進(jìn)行處理，如：字符“A B C D E F” 對(duì)應(yīng)轉(zhuǎn)換為“10 11 12 13 14 15”；
接著對(duì)每2個(gè)字符進(jìn)行 16 的冪運(yùn)算，并求和。如： AB = 10 * 16的一次方 + 11 * 16的零次方；
再將這個(gè)2個(gè)字符的整數(shù)和，轉(zhuǎn)換為一個(gè)字節(jié)（Byte）長度的 varbinary 數(shù)據(jù)；
最后將所有的 varbinary 數(shù)據(jù)直接相加即可。
代碼如下：
復(fù)制代碼 代碼如下:
--==============================================
-- FUNCTION hexstr2varbin
-- 將 varchar 類型的數(shù)據(jù)轉(zhuǎn)換為 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 -- 字符串截取段數(shù)
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;
-- 循環(huán)處理截取的每個(gè)字符串 (這里的字符串長度為2)
while @n ( datalength(@tempchar) + 1 )
begin
set @getchar=substring(@tempchar,@n,1);
-- 將字符轉(zhuǎn)換為十六進(jìn)制對(duì)應(yīng)的數(shù)字
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
測(cè)試示例：
復(fù)制代碼 代碼如下:
select dbo.hexstr2varbin('ffffff2353f5feefaffae1fff1ffbaf1faffa33333333ff3aaafffffffaaff')
（完）
本文出自 “xugang” 博客，請(qǐng)務(wù)必保留此出處http://guangrou.blog.51cto.com/404164/1040606
