1С Программирование | 1C Разработка и Предприятие 8.3. Уроки для начинающих и Профи. Курсы Программиста: Конфигурация, Код и Внедрение. IT Карьера, Фриланс и Обучение. ERP, ЗУП, Бухгалтерия.
IT и технологии · 28 июня 2026 г.
Чтение файла в формате XML по порядку в 1С 8.3 — 28 июня 2026 г. в 21:01:03.414
Чтение файла в формате XML по порядку в 1С 8.3 //Подходит для файлов более 100Mb &НаСервере Процедура ПрочитатьФайлXMLПоПорядкуСпособ2(ПутьКФайлу) XML = Новый ЧтениеXML; XML.ОткрытьФайл(ПутьКФайлу); СписокИмен = Новый СписокЗначений; Пока XML.Прочитать() Цикл Если XML.ТипУзла = ТипУзлаXML.НачалоЭлемента Тогда СписокИмен.Добавить(XML.Имя); ПутьXML = СобратьПуть(СписокИмен); Если ПутьXML = "/Рестораны/Ресторан" Тогда Название = XML.ЗначениеАтрибута("Название"); Если Название <> Неопределено Тогда Сообщить("Название ресторана: " + Название);//"Китайская грамота" КонецЕсли; Категория = XML.ЗначениеАтрибута("Категория"); Если Категория <> Неопределено Тогда Сообщить("...наценочная категория ресторана: " + Категория);// Высшая КонецЕсли; Счет = XML.ЗначениеАтрибута("Счет"); Если Счет <> Неопределено Тогда Сообщить("...средний счет ресторана: " + Счет);// 3500 КонецЕсли; Кухня = XML.ЗначениеАтрибута("Кухня"); Если Кухня <> Неопределено Тогда Сообщить("...кухня ресторана: " + Кухня);// Азиатская КонецЕсли; ИначеЕсли ПутьXML = "/Рестораны/Ресторан/Меню" Тогда Сообщить("Меню:"); ИначеЕсли ПутьXML = "/Рестораны/Ресторан/Меню/Блюдо" Тогда Название = XML.ЗначениеАтрибута("Название"); Если Название <> Неопределено Тогда Сообщить("...название блюда: " + Название); КонецЕсли; ИначеЕсли ПутьXML = "/Рестораны/Ресторан/Описание" Тогда XML.Прочитать(); Если XML.ТипУзла = ТипУзлаXML.Текст Тогда Сообщить("Описание: " + XML.Значение); КонецЕсли; КонецЕсли; ИначеЕсли XML.ТипУзла = ТипУзлаXML.КонецЭлемента Тогда СписокИмен.Удалить(СписокИмен.Количество() - 1); КонецЕсли; КонецЦикла; XML.Закрыть(); КонецПроцедуры &НаСервере Функция СобратьПуть(СписокИмен) НашПуть = ""; Для Каждого Имя Из СписокИмен Цикл НашПуть = НашПуть + "/" + Имя; КонецЦикла; Возврат НашПуть; КонецФункции ✍️ @odin1C_rus