OCtets to Bytes

[Nucleus]

Here you go, convert from any base back to decimal:

Conversion base 2- base 62 as 0-9, [A-Z], [a-z] is 10 + 26 +26 = max base 62.

Function RadixToDec62(ByVal sRadix$, Radix%) As Variant
 'Nucleus
 Dim ba() As Byte, i&, bitval As Variant, b As Byte
 bitval = 1
 ba = StrConv(sRadix, vbFromUnicode)
 For i = UBound(ba) To 0 Step -1
    b = ba(i)
    If b < 58 Then
        RadixToDec62 = CDec(RadixToDec62 + (b - 48) * bitval)
    ElseIf b < 91 Then RadixToDec62 = CDec(RadixToDec62 + (b - 55) * bitval)
    ElseIf b < 123 Then RadixToDec62 = CDec(RadixToDec62 + (b - 61) * bitval)
    End If
    bitval = CDec(bitval * Radix)
 Next i
End Function