I'm using code like this:
to decode email header content likethis ...
It works, but surely there's an API for the conversion? With a large character set, there's no way I can create a function that covers all the possibilities.
Code:
Sub UTFtoASCII(tempZ As WStringZ * %Max_Path) If InStr(tempZ,"?UTF-8") Then Replace "=?UTF-8?Q?" With "" In tempZ Replace "=?UTF-8" With "" In tempZ Replace "=20" With $Spc In TempZ Replace "=3A" With "&" In TempZ Replace "?=" With "?" In TempZ Replace "=26" With "&" In TempZ End If End Sub
Code:
From: "=?UTF-8?Q?Yahoo?=" <[email protected]>
Comment