HTML в 1С

[Ermak1985]

Доброе утро! Решил по пробовать парсер. Не понятно почему не читает код

Код Выделить Развернуть

Функция ПолучитьБлокиПоКлассу(Документ, Класс) 
   
    МассивБлоков = Новый Массив;   
    СписокЭлементов = Документ.ПолучитьЭлементыПоИмени("div");
    Для Каждого Элемент Из СписокЭлементов Цикл
        АтрибутКласс = Элемент.ПолучитьАтрибут("class");
        Если АтрибутКласс<>Неопределено Тогда
            Если АтрибутКласс=Класс Тогда
                МассивБлоков.Добавить(Элемент);
            КонецЕсли;
        КонецЕсли;
    КонецЦикла;
   
    Возврат МассивБлоков;
   
КонецФункции

Функция Выгрузка()
   
    ДанныеТекущейСтраницы="http://www.cyberforum.ru/";
    Чтение = Новый ЧтениеHtml;
    Чтение.УстановитьСтроку(ДанныеТекущейСтраницы, "UTF8");
    Построитель = Новый ПостроительDOM;
    Документ = Построитель.Прочитать(Чтение);
   
    Блоки = ПолучитьБлокиПоКлассу(Документ, "navbar");
    Если Блоки.Количество()=0 Тогда
        Возврат Неопределено;
    Иначе
        Возврат Блоки[0];
    КонецЕсли;
   
КонецФункции   

Процедура КнопкаВыполнитьНажатие(Кнопка)
      Выгрузка();   
КонецПроцедуры