Base64 Property, ByteArray class - Base64 encode and decode, encoding algorithm

Description

Converts data between ByteArray (safearray of bytes) and Base64. Works as a Base64 encoder and decoder from binary (bytearray) or from Unicode String.

Syntax

Base64Data = ByteArray.Base64 ([maxLineChars as Long = 76])
ByteArray.Base64 ([maxLineChars as Long = 76]) = Base64Data

Where	Type	Optional	Default	Description
maxLineChars	Long	yes	76	Maximum line characters for Base64 encoded data

Returns

Variant

Returns

Base64 returns ByteArray

Remarks

You can use the property to do Base 64 encoding and decoding of data stream. Base64 property accepts UNICODE String (VT_BSTR) or binary data (VT_UI1 | VT_ARRAY) as an input.
maxLineChars has no meaning for property put.

See also live sample of this method at On-line base64 decoder and encoder page.

Examples

ByteArray - Decode a Base64 string to a binary data.

Dim ByteArray
Set ByteArray = CreateObject("ScriptUtils.ByteArray")

ByteArray.Base64 = "UHV0IHNvbWUgY2hhcmFjdGVycyB0by"

Wscript.Echo "Source data:" & vbCrLf & _
  ByteArray.String

ByteArray - encode a file to a base64 string (Base64 file)

You can simply encode a binary or text file to a Base64 string using this sample code. The base64 string can be stored to a file using SaveAs method.

'Convert a string to Base64
Dim ByteArray
Set ByteArray = CreateObject("ScriptUtils.ByteArray")

'Convert a File to a Base64
ByteArray.ReadFrom "F:\data\vbs\del.vbs"

'Convert contents of the file to a base64
Base64String = ByteArray.Base64.String
Wscript.Echo "Base64 encoded file:" & vbCrLf & _
  Base64String

'Save Base64 encoded data to a disk
ByteArray.Base64.SaveAs "F:\data\vbs\base64-del.vbs"

ByteArray - decode and encode from Base64

'Convert a string to a Base64
Dim ByteArray
Set ByteArray = CreateObject("ScriptUtils.ByteArray")

'Put some characters to the bytearray.
ByteArray.String = "Put some characters to the bytearray."

'Write the characters in original (windows-1250) charset
Dim Base64String
Wscript.Echo "Source data:" & vbCrLf & _
  ByteArray.String 

Base64String = ByteArray.Base64.String
Wscript.Echo "Base64 encoded string:" & vbCrLf & _
  Base64String

Base64String = ByteArray.Base64(30).String
Wscript.Echo "Base64 encoded string with short lines:" & vbCrLf & _
  Base64String

Wscript.Echo "Part of data encoded to base64:" & vbCrLf & _
  ByteArray.Mid(3,3).Base64.String

'Convert a File to a Base64
ByteArray.ReadFrom "F:\data\vbs\del.vbs"

Base64String = ByteArray.Base64.String
Wscript.Echo "Base64 encoded file:" & vbCrLf & _
  Base64String

ByteArray, T-SQL - base64 decoder for Microsoft SQL

ByteArray, T-SQL - base64 encoder for Microsoft SQL

Other links for Base64

Methods of ByteArray class

Find, FindRev, CharSetConvert, Left, Mid, ReadFrom, Right, SaveAs, SetSize

Properties of ByteArray class

Base64, ByteArray, CodePage, HexString, CharSet, Length, Punycode, String

ScriptUtils.ByteArray

Works with safearray binary data - save/restore binary data from/to a disk, convert to a string/hexstring, codepage/charset conversions, Base64 conversion, etc.
ByteArray is a COM class specially designed to work with Microsoft Windows Scripting engines - VB Script and JScript in Active Server Pages or WSH and in CHM or HTA applications. It also works with VB Net, Visual basic (VBA - VB 5, VB 6, Word, Excel, Access, …), C#, J#, C++, ASP, ASP.Net, Delphi and with T-SQL OLE functions - see Use ByteArray object article. You can also use the object in other programming environments with COM support, such is PowerBuilder.
Source code for ByteArray is available within distribution license, please see License page for ScriptUtilities and Huge ASP file upload.

ScriptUtils

Easy to use, hi-performance ASP file upload component with progress bar indicator. Let's you upload multiple files with size up to 2GB to a disk or database along with another form fields. Works with large posts, any character set (including unicode utf-8). Contains one-click multiple files/folders download with on-the-fly compression (Using BinaryWrite/BinaryRead).

      Hi-performance text file logging for ASP/VBScript/VBA applications. Lets you create daily/weekly/monthly log files with variable number of logged values and extra timing and performance info.
       Lets you work with safearray binary data in VBS/JS. It also enables conversion between binary and String data using several code pages. ZLib compress and uncompress functions. Lets you transfer files using compressed stream from a client to server using IE.
      This library also enables calling of some Kernel and Advapi functions (performance, timing, sleep, configuration ...) and enables native work with INI files.

	Base64
	Property
	Member of ScriptUtils.ByteArray