Если ЭлементыФормы.Кодировка.Значение="ANSI" Тогда
ЧТ = Новый ЧтениеТекста(ЭлементыФормы.ОткрытьФайл.Значение,КодировкаТекста.ANSI);
КонецЕсли;
Сообщение=Новый СообщениеПользователю;
Строка = ЧТ.ПрочитатьСтроку();
//загружаем из текстового файла в табличную часть формы
Пока Строка <> Неопределено Цикл
/////////////////////////////////////////////////////////////////////////Другой вариант открытия и чения файла
Текст = Новый ТекстовыйДокумент;
ПолноеИмяФайла = ПутьКФайлу;
Текст.Прочитать(ПолноеИмяФайла,"cp866");
КоличествоСтрок = Текст.КоличествоСтрок();
Для Счетчик = 1 по КоличествоСтрок Цикл
ТекСтрока = Текст.ПолучитьСтроку(Счетчик);
КонецЦикла;
|