Можно ли (и как) перекодировать текст CP1251 → UTF-8, не создавая темповых файлов?

Движок поковеркал стрелку, вообщем CP1251 в UTF-8.

напиши свою таблицу соответсвий

Попробуй так:

Стрим = Новый COMОбъект("Adodb.Stream");

Стрим.Type = 2;
Стрим.Mode= 3;
Стрим.charset="windows-1251";
Стрим.Open();
Стрим.WriteText(Стр);
Стрим.Position=0;
Стрим.charset="utf-8";
Результат=Стрим.ReadText(-1);
Стрим.Close();