SQL 将URL编码转汉字！

原文: SQL 将URL编码转汉字！

-- =============================================

-- 作    者: ruijc

-- 描    述: 将Url编码转明文字符串

-- =============================================

CREATE FUNCTION FN_URLDecode

(

 @Str VARCHAR(8000)--已经编码的字符串

)

RETURNS VARCHAR(8000)

AS

BEGIN

  DECLARE @Position  INT;          --'%'字符所在位置

  DECLARE @Chr       CHAR(16);     --字符常量

  DECLARE @Pattern   CHAR(21);

  DECLARE @ParseStr  VARCHAR(8000);--解码后的字符串

  DECLARE @Hex		 UNIQUEIDENTIFIER;--定义16进制模板,因为GUID方便转为BYTE

  DECLARE @CurrWord	 INT		;--当前字

  DECLARE @BitsCount INT        ;--当前解码位数

  DECLARE @HightByte TINYINT;--高位字节

  DECLARE @LowByte   TINYINT;--低位字节

  

  /****************变量初始化***********************/

  SET     @Chr = '0123456789abcdef';

  SET     @Pattern = '%[%][a-f0-9][a-f0-9]%';

  SET     @ParseStr=@Str;

  SET     @Hex= '00000000-0000-0000-0000-000000000000';

  SET     @CurrWord=0;

  SET     @BitsCount=0;

  SET     @HightByte=0;

  SET     @LowByte=0;

  

  IF (@Str IS NOT NULL OR @Str<>'')

   BEGIN

     SET    @Position = PATINDEX(@Pattern, @ParseStr);--取得第一个'%'所在的位置

     WHILE @Position>0

      BEGIN

        SET @Hex=STUFF(@Hex,7,2,LEFT(RIGHT(@ParseStr,len(@ParseStr) - @Position),2));

        SET @HightByte=CAST(CAST(@Hex AS BINARY(1)) AS INT);

        

        IF (@HightByte & 127=@HightByte)

         BEGIN--ASCII码直接转为UTF-8或UTF-16

           SET @CurrWord=@HightByte;

           SET @BitsCount=1;

         END

         

        IF (@HightByte & 192=192)

         BEGIN--Unicode编码

           SET @CurrWord=@HightByte & 31 ;

           SET @BitsCount=2;

         END



        IF (@HightByte & 224=224)

         BEGIN--UTF-8编码

			SET	@CurrWord = @HightByte & 15

			SET @BitsCount = 3	

         END



        IF (@HightByte & 240=240)

         BEGIN--UTF-16编码

			SET	@CurrWord = @HightByte & 7

			SET @BitsCount = 4	

         END



        DECLARE @Index INT;        

        DECLARE @NEWCHAR NVARCHAR(2);

        SET @Index=1;

        SET @NEWCHAR='';

        WHILE @Index<@BitsCount

         BEGIN

              IF (LEN(@ParseStr)-@Position-3*@Index)<0

               BEGIN

                   SET @ParseStr=@Str ;   

                   SET @Position=0;

                   BREAK;              

               END

			SET @NEWCHAR = LEFT(RIGHT(@ParseStr,LEN(@ParseStr) - @Position - 3* @Index),2);	  

            --如果没有16进制编码则中断外层WHILE

			IF @NEWCHAR NOT LIKE '[a-f0-9][a-f0-9]'

			 BEGIN

				SET @ParseStr = @Str

				SET @Position=0;--中断外层WHILE

				BREAK;

			 END 	



			SET @Hex = STUFF(@Hex, 7, 2, @NEWCHAR)		



			SET @LowByte = CAST(CAST(@Hex AS BINARY(1)) AS INT);



			IF @LowByte&192=192

			BEGIN

				SET @ParseStr = @Str

				SET @Position=0;--中断外层WHILE

				BREAK;

			END 

			

			SET @CurrWord = (@CurrWord * 64) | (@LowByte & 63)				

			SET @Index =@Index+ 1						  			             

         END                                   



		 IF @BitsCount > 1           

          SET @ParseStr = STUFF(@ParseStr, @Position, 3*(@BitsCount), NCHAR(@CurrWord))

		 ELSE 

		  BEGIN

			set @ParseStr = STUFF(@ParseStr, @Position, 2, NCHAR(@CurrWord))

			set @ParseStr = STUFF(@ParseStr, @Position+1, 1, N'')		

		  END

		----取得下一个'%'所在的位置

        SET  @Position = PATINDEX(@Pattern, @ParseStr);

      END

   END

   RETURN @ParseStr;

END



GO

SELECT dbo.FN_URLDecode('%E4%BD%A0%E6%98%AF%E5%93%AA%E4%B8%AA')