&НаСервере
Процедура Читать<?"Введите название коллекции">НаСервере()
ТабДок = Новый ТабличныйДокумент;
Попытка
ТабДок.Прочитать(Объект.ПутьКФайлу);
Исключение
Сообщение = Новый СообщениеПользователю;
Сообщение.Текст = "Не удалось прочитать файл по причине: " + ОписаниеОшибки();
Сообщение.Сообщить();
Возврат;
КонецПопытки;
КоличествоСтрок = ТабДок.ВысотаТаблицы;
КоличествоКолонок = ТабДок.ШиринаТаблицы;
Для НомерСтроки = 2 По КоличествоСтрок Цикл
Строка = <?"Введите название коллекции">.Добавить();
//Строка. = ТабДок.Область(НомерСтроки, 1).Текст;
КонецЦикла;
КонецПроцедуры
&НаСервере
Процедура Читать<?"Введите название коллекции">НаСервере()
ТабДок = Новый ТабличныйДокумент;
Попытка
ТабДок.Прочитать(Объект.ПутьКФайлу);
Исключение
Сообщение = Новый СообщениеПользователю;
Сообщение.Текст = "Не удалось прочитать файл по причине: " + ОписаниеОшибки();
Сообщение.Сообщить();
Возврат;
КонецПопытки;
КоличествоСтрок = ТабДок.ВысотаТаблицы;
КоличествоКолонок = ТабДок.ШиринаТаблицы;
Для НомерСтроки = 2 По КоличествоСтрок Цикл
Строка = <?"Введите название коллекции">.Добавить();
//Строка. = ТабДок.Область(НомерСтроки, 1).Текст;
КонецЦикла;
КонецПроцедуры