Recovering russian mojibake

General
1

I’ve got some mixed up russian. How can I recover the original russian?

The main header of the header says that it’s russian: “Content-Language: ru” . The header of the mail part says it’s utf8: “Content-Type: text/plain; charset=utf-8; format=flowed”

The original text of the mail is:

I’ve recovered mojibake before with

'bug in AppleScript that gives source back as Windows1252 (WindowsAnsi) MailText = MailText.ConvertEncoding(Encodings.WindowsANSI) MailText = MailText.DefineEncoding(Encodings.UTF8)

But something similar doesn’t work here:

'first try windows ansi currentBody = defineEncoding(currentBody, Encodings.UTF8) dim temp1 as String = DefineEncoding(currentBody, Encodings.WindowsANSI) temp1 = ConvertEncoding(temp1, encodings.UTF8) 'then with windows 1251 dim theEncoding as TextEncoding = GetInternetTextEncoding("Windows-1251") dim temp3 as String = DefineEncoding(currentBody, theEncoding) temp3 = ConvertEncoding(temp3, encodings.UTF8)

Any other ideas?

2

Here’s the solution:

dim bad as String = "??ма?, надо зас?ла?? ?а?ионов? в ?аком виде." dim fixed as String = bad.DefineEncoding (Encodings.UTF8).ConvertEncoding (Encodings.ISOLatin1).DefineEncoding (Encodings.UTF8)