|
v7: Считывание XML файлов | ☑ | ||
---|---|---|---|---|
0
Славянин
19.12.16
✎
16:08
|
Доброго времени суток. Подскажите пожалуйста.
Сформировал несколько выходных xml - файлов. Теперь мне нужно их все обработать и загрузить. Как это можно сделать. Каков должен быть цикл? нужно пользоваться методами внешней компоненты или можно стандартыми конструкциями 1С это сделать? |
|||
1
Cool_Profi
19.12.16
✎
16:10
|
ФС.НайтиФайлы()
Пока ФС.НайтиСледующий() = 1 (или получить, не помню) //читаешь свой файл |
|||
2
Это_mike
19.12.16
✎
16:14
|
(1) учишь читать СП? :-)
|
|||
3
Cool_Profi
19.12.16
✎
16:16
|
(2) Не моё это. Из меня учитель - как из тебя ВВП.
|
|||
4
vcv
19.12.16
✎
16:16
|
Почти в любой типовой конфигурации от 1С есть какая-нибудь загрузка/выгрузка XML. Читать исходники, много думать.
|
|||
5
Chum
19.12.16
✎
16:47
|
||||
6
Злопчинский
19.12.16
✎
21:26
|
Иксемель = СоздатьОбъект("Microsoft.XMLDOM");
Иксемель.Load(ФайлДанных); Корень = Иксемель.DocumentElement; ОбработатьУзел(Корень, 0); //тест чтения |
|||
7
Злопчинский
19.12.16
✎
21:27
|
//**************************************************************************************
// Процедура ОбработатьУзел(Узел, Уровень=0) Состояние(Уровень); КолвоУзлов = Узел.childNodes.length; Для СчУзлов = 0 По КолвоУзлов-1 Цикл ТекУзел = Узел.childNodes.item(СчУзлов); Если ТекУзел.nodeType <> 1 Тогда Продолжить; КонецЕсли; Стр = Формат("","С"+Уровень*8); СтрАтрибуты = ""; Для счАтрибутов = 0 По ТекУзел.attributes.length-1 Цикл Атрибут = ТекУзел.attributes.item(счАтрибутов); СтрАтрибуты = СтрАтрибуты + ?(СтрАтрибуты="","",";") + Атрибут.nodename+"="+Атрибут.value; КонецЦикла; ТекстУзла = ""; Если ТекУзел.childNodes.length = 1 Тогда Если ТекУзел.childNodes.item(0).nodetype = 3 Тогда ТекстУзла = ТекУзел.childNodes.item(0).text; КонецЕсли; КонецЕсли; Стр = Стр + ТекУзел.tagName + ?(СтрАтрибуты="","","("+СтрАтрибуты+")" ) + ": " +ТекстУзла; Сообщить(Стр); ОбработатьУзел(ТекУзел, Уровень+1); КонецЦикла; Состояние(""); КонецПроцедуры // ОбработатьУзел() |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |