// Перекодировка файла из кодировки 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);   

 // Как записать файл в кодировке UTF-8 без BOM

функция ЗаписатьФайлВформате_UTF8_без_BOM(текст,полноеИмяФайла)



    // записываем в файл с символами BOM в начале файле	

    ТекстовыйФайлUTF8_Bom = Новый ТекстовыйДокумент();

    ТекстовыйФайлUTF8_Bom.ДобавитьСтроку(текст);

    ТекстовыйФайлUTF8_Bom.Записать(полноеИмяФайла,"UTF-8");

	

    // открываем файл и считываем символы после символов BOM

    Данные = Новый ДвоичныеДанные(полноеИмяФайла);

    Строка64=Base64Строка(Данные);

    Строка64=Прав(Строка64,СтрДлина(Строка64)-4);

    ДанныеНаЗапись=Base64Значение(Строка64);

    ДанныеНаЗапись.Записать(полноеИмяФайла); // записываем

	

КонецФункции