&НаКлиенте
Функция ВывестиЭлем_ДОМ(ДОМ,Знач Смещ);
    
    Рез=1;
    Попытка
		ТипУзла=ДОМ.ТипУзла;
		Если (ТипУзла=ТипУзлаDOM.Документ) Тогда
			;
		ИначеЕсли (ТипУзла=ТипУзлаDOM.Элемент) Тогда
			Смещ=Смещ+"    ";
			Сообщить(Смещ+"Элемент "+ДОМ.ИмяУзла+":",СтатусСообщения.Важное);
			
			Для каждого ТекАтр из ДОМ.Атрибуты Цикл
				Сообщить(Смещ+"Атрибут: "+ТекАтр.ИмяУзла+", значение: <"+ТекАтр.ЗначениеУзла+">");
			КонецЦикла;
		ИначеЕсли (ТипУзла=ТипУзлаDOM.Текст) Тогда 
			Сообщить(Смещ+"Текст элемента: <"+ДОМ.ЗначениеУзла+">");
		ИначеЕсли (ТипУзла=ТипУзлаDOM.СекцияCDATA) Тогда 
			Сообщить(Смещ+"CDATA: <"+ДОМ.ЗначениеУзла+">");
		ИначеЕсли (ТипУзла=ТипУзлаDOM.Комментарий) Тогда 
			Сообщить(Смещ+"Комментарий: <"+ДОМ.ЗначениеУзла+">",СтатусСообщения.Информация);
		Иначе
			Сообщить(Смещ+"Элемент "+ДОМ.ИмяУзла+":");
        	Сообщить(Смещ+"Тип: "+ДОМ.ЗначениеУзла);
		КонецЕсли; 
		
		Для каждого ТекУзел из ДОМ.ДочерниеУзлы Цикл
			ВывестиЭлем_ДОМ(ТекУзел,Смещ);
		КонецЦикла;
	Исключение
	    Сообщить(ОписаниеОшибки());
		Рез=0;
	КонецПопытки;
	
	Возврат Рез;
КонецФункции

&НаКлиенте
Процедура ВыгрузитьХМЛ(ИмяФайла) Экспорт
	ДОМ=Новый ДокументDOM;
	ТекЭлем=ДОМ.СоздатьЭлемент("Файл");
	ТекЭлем.УстановитьАтрибут("Атрибут_Файл_1","Здесь содержимое Атрибут_Файл_1");
	ТекТекст=ДОМ.СоздатьТекстовыйУзел("Здесь содержимое Файл");
	ТекКомм=ДОМ.СоздатьКомментарий("Далее следует содержимое файла");
	ТекЭлем.ДобавитьДочерний(ТекТекст);
	ТекЭлем.ДобавитьДочерний(ТекКомм);
	ДОМ.ДобавитьДочерний(ТекЭлем);
	ТекЭлем=ТекЭлем.ДобавитьДочерний(ДОМ.СоздатьЭлемент("СодержимоеФайла"));
	ТекЭлем.УстановитьАтрибут("Атрибут_СодержимоеФайла_1","Здесь содержимое Атрибут_СодержимоеФайла_1");
	ТекТекст=ДОМ.СоздатьТекстовыйУзел("Здесь содержимое СодержимоеФайла");
	ТекCDATA=ДОМ.СоздатьСекциюCDATA("Это секция CDATA");
	ТекЭлем.ДобавитьДочерний(ТекТекст);
	ТекЭлем.ДобавитьДочерний(ТекCDATA);
	
	ХМЛ=Новый ЗаписьXML;
	ХМЛ.ОткрытьФайл(ИмяФайла,Новый ПараметрыЗаписиXML("windows-1251",,Ложь,Ложь));
	ЗаписьДОМ=Новый ЗаписьDOM;
	ЗаписьДОМ.Записать(ДОМ,ХМЛ);
	ХМЛ.Закрыть();
	
	ПострДОМ=Новый ПостроительDOM;
	ХМЛ=Новый ЧтениеXML;
	ХМЛ.ОткрытьФайл(ИмяФайла,Новый ПараметрыЧтенияXML(,,,ТипПроверкиXML.НетПроверки));
	ДОМ=ПострДОМ.Прочитать(ХМЛ);
	
	ВывестиЭлем_ДОМ(ДОМ,"");
	ХМЛ.Закрыть();
КонецПроцедуры

Для таких задач - и SAX сгодится. Если же DOM - то тут нужны несколько более весомые аргументы :-)

(2) когда начнут тонуть - сделаю :) делов на пять минут, движок позволяет манипулировать с разделами

(3) "Когда начнут тонуть..." - у тебя то корова телиться начнёт, то машина заводиться перестанет, то конь в курятнике насерит... :-)

(4) а чтобы не выглядело голословным - уже сделано. за 3 минуты

1. При работе с xml лучше использовать кодировку UNICODE
2. Вообще непонятно к чему этот код.

ИМХО, DOM нужен для парсинга xml т.е. выборки по узлам, например разбор ответа web-сервиса или формирование запроса к оным.
Или же для xsl/xslt.

sapphire Вообще непонятно к чему этот код.

это просто пример, показывающий, как работать с узлами различных типов.
для новичков, так сказать

(8) если для 8 выше 0, то, ИМХО,
"Это неправильные пчёлы! И они, наверное, делают неправильный мёд!" (с)

Для восьмерок вообще низкоуровневые методы лучше не использовать, ИМХО.

Для записи данных из 1С в другую нотацию xml надо использовать xslt.
Для чтения - DOM & xpath

(10) если уж на то пошло, для чтения проще использовать фабрику XDTO. по крайней мере, новичкам

+ в книжках непонятно с какой целью постоянно для ЧтениеXML примеры в основном с файлами, и крайне редко используется УстановитьСтроку()

(13) не согласен. имхо, XDTO очень просто для новичка. проще, чем поэлементный обход по примеру как в сабже.
прочитал файл - и шпарь по нисходящей, просто указывая имена элементов

(15) Это как?
SAX в 1С= ЧтениеXML/ЗаписьXML вроде как :)

(16) имел в виду wiki:Xerces

(17) ну так это вообще не из той оперы. xerces используется в java и прочем.
Кстати сказать, oracle-овая библиотечка шустрее намного

sapphire ну так это вообще не из той оперы.

там есть COM-серверы, которые тоже можно использовать в Выне

(19) ну и зачем такой изврат?

(20) а почему бы и нет? чтоб было, до кучи.

(21) Я не люблю сферических коней в вакууме :)
Обычно привожу рабочие примеры. С чем сталкивался и как решал.

(22) если честно, я вообще не вижу для Sleep практического применения, особенно в рабочих примерах :)

но на форумах регулярно всплывают вопросы - как это сделать. зачем - дело десятое. пусть будет, раз кому-то надо

(23) редко, но нужен, например для тягомотных транзакционных операций sleep используется для возможности записи пользователями между транзакциями. Ясно, что пока идет транзакция, пользователи в тот диапазон писать не могут.

(24) не, можно, конечно, придумать. но можно и по-другому реализовать. например, в 7.7 - через обработку ожидания и порционную отработку

(25) в 77 - sleep = Вопрос/Предупреждение

(26) да полно вариантов. вопрос, вызов пинга, и т.д. Абрахамс, помнится, даже с вызовом своего любимого IE пример приводил

(27) Зачем что-то вызывать на стороне, если есть встроенное и работает?

(8) Если человек знает об "узлах разных типов" (то есть, хотя бы минимально вкурил, что есть XML) - тот не нужен ему такой пример. А sapphire прав - DOM нужна для "высокоуровневой" работы. Но тогда уж сразу и XSLT или что-то близкое.

(28)это, конечно, аргумент

DOM к сожаленью не умеет работать с большими объемами данных, поэтому в большистве случаев не применим.... Но выглядит красиво

(31) большие - это сколько? если больше гига, тогда, конечно, тяжеловато будет крутится

(32) У меня уже на пару сот мб уже ложился. Естественно зависит от машинки, но не приятно.

А DOM приятна тем что работаешь не с текстом, а с коллекцией, которую удобно обходить.

(33) всё так, всё так...
для работы с небольшими xml-файлами DOM-модель, конечно, идеальна