HelpF.pro

Как изменить кодировку файла из UTF-8 в ANSI

Код 1C v 8.х
 // Перекодировка файла из кодировки UTF-8 в ANSI.
// Будет создан файл в кодировке ANSI в этом же каталоге
// с суффиксом "_ansi" .
// параметры:
// каталогФайла - Каталог где лежит файл без символа "\" на конце
// файлUTF8 - имя файла для конвертации
Функция ПерекодироватьФайлUTF8_ANSI(каталогФайла, файлUTF8)

исходныйФайл = каталогФайла + "\" + файлUTF8;
файлЧтение = Новый ЧтениеТекста(исходныйФайл,КодировкаТекста.UTF8);
txt=файлЧтение.Прочитать();
файлЧтение.Закрыть();

ФайлANSI = СтрЗаменить(файлUTF8,".","_ansi.");
результатФайл = каталогФайла + "\" + ФайлANSI;
файлЗапись = Новый ЗаписьТекста(результатФайл,КодировкаТекста.ANSI);
файлЗапись.Записать(txt);
файлЗапись.Закрыть();

Возврат ФайлANSI;
КонецФункции

// Запуск
каталогCSV = "d:\csv";
файлCSV = "export_file_.csv"; // в utf-8
файлCSV_ansi = ПерекодироватьФайлUTF8_ANSI(каталогCSV,файлCSV);

Опубликовано на сайте: https://HelpF.pro
Прямая ссылка: https://HelpF.pro/faq8/view/1405.html