Base64 encoding / decoding functions in VbScript / Classic ASP

With the following functions Base64Encode(sText) and Base64Decode(ByVal vCode), You can easly encode/decode a text in/from base64 in VBScript/Classic ASP: