Q-Encoding

The Chilkat Email component automatically "Q" and "B" encodes header fields as necessary. However, the email object provides utility methods for encoding manually, if needed for some unforeseen reason.

Download Chilkat Email ActiveX for POP3 / SMTP

Download Chilkat IMAP ActiveX

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set outFile = fso.CreateTextFile("output.txt", True)

set email = CreateObject("Chilkat.Email2")

qEncoded = email.QEncodeBytes("magnà el véder","iso-8859-1")
outFile.WriteLine(qEncoded)

qEncoded = email.QEncodeBytes("magnà el véder","utf-8")
outFile.WriteLine(qEncoded)

'  The output of this program is:
'  =?iso-8859-1?Q?magn=E0_el_v=E9der?=
'  =?utf-8?Q?magn=C3=A0_el_v=C3=A9der?=

outFile.Close