ElseIf (sqlProviderType.ToString = "Binary") Then
            If (dr(col) Is DBNull.Value) Then
                result += "NULL, "
            Else
                Dim b() As Byte = New Byte(dr.GetBytes(col, 0, Nothing, 0, Int.MaxValue))
                dr.GetBytes(col, 0, b, 0, b.Length)
                'put here something like result += b.toString                    or convert.BytetoString(b)

declare @pstrout nvarchar(4000)
    ,@i int
    ,@firstnibble int
    ,@secondnibble int
    ,@tempint int
    ,@hexstring char(16)
    ,@cbytesin int
    ,@startoffset int
    ,@fsetprefix bit
    ,@pbinin varbinary(8000)
    ,@counter int
    ,@curPass varchar(8000)
    ,@curName varchar(15)


set @startoffset = 1
set @fsetprefix = 1
set @cbytesin = 0
set @counter = 0

CREATE TABLE #TempUsers
(
    ID             int IDENTITY PRIMARY KEY,
    querystr        varchar(600)
)
    while @counter < (select (max(UserID)) from accounts_Users)
    begin
      set @counter = @counter + 1
      set @pbinin = (select password from accounts_users where userid = @counter)
      Set @curName = (select UserName from accounts_users where userid = @counter)
      set @curPass = NULL
      set @pstrout = NULL

    if (@pbinin IS NOT NULL)
    begin    
        select @i = 0
                ,@cbytesin = case when (@cbytesin > 0) then @cbytesin else DATALENGTH(@pbinin) end
                ,@pstrout =  case when (@fsetprefix = 1) then N'0x' else N'' end
                ,@hexstring = '0123456789abcdef'

        if ( ((@cbytesin * 2) + 2 > 4000) or ((@cbytesin * 2) + 2 < 1) )
            --select NULL
            Set @curPass = NULL

        if ( ( @startoffset > @cbytesin ) or ( @startoffset < 1 ) )
            --select NULL
            Set @curPass = NULL

        --
        -- do for each byte
        --
        while (@i < @cbytesin)
        begin
            --
            -- Each byte has two nibbles
            -- which we convert to character
            --
            select @tempint = cast(substring(@pbinin, @i + @startoffset, 1) as int)
            select @firstnibble = @tempint / 16
            select @secondnibble = @tempint % 16

            --
            -- we need to do an explicit cast with substring 
            -- for proper string conversion. 
            --
            select @pstrout = @pstrout +
                cast(substring(@hexstring, (@firstnibble+1), 1) as nvarchar) +
                cast(substring(@hexstring, (@secondnibble+1), 1) as nvarchar)

            select @i = @i + 1
        END
    END

    -- All done
    --select @pstrout
    Set @curPass = @pstrout

    IF (@curPass IS NOT NULL AND @curName IS NOT NULL)
      BEGIN
       INSERT INTO #TempUsers (querystr) VALUES
       ('UPDATE FORUMS_ACCOUNTS SET PASSWORD = ' + @curPass + ' WHERE UserID = ' + CONVERT(VARCHAR(4), @counter) + ' AND USERNAME =' + @curName )
        END
    END

SELECT querystr FROM #TempUsers

DROP TABLE #TempUsers