кто может посоветовать как сделать Парсер HTML

Парсер.Сделать(Перечисления.ТипыПарсеров.HTML);
Сообщить("Мы сделали парсер!");

(1) Парсер - а где ты взял. шутиш.
А по делу можна
Хоть на подобии XML

(2) Ппц. Вот он. Русския язык.

а чем полеHTMLдокумента и иже с ним не устраивает?

Найти() + Сред() + Лев() + Прав() + ...

(4) да я взял  полеHTMLдокумента вытянул из него весь текст - а как вытянуть то что в тексте

(5) пока так и мучаюсь,думал может кто ище знает чтото объектное

(6) пля....

срочно учить DOM и курить СП в разделе поля html документа...

А может заюзать парсер XML ?

(8) а имено ...

(10) не каждый валидный html является валидным xml

(11) ты так и не показал своего творения, юзающего OprenGL

Из полеHTMLдокумента можно получить обычный текст без тегов

скачай PIM и посмотри, как работает мамбирование.
или кури Новый ComОбъект("HTMLFile");

ComОбъект("HTMLFile") это интересно

(11) какое творение в OprenGL

смени ник

(0) Я помницца делал так :
Написал фунцию ПолучитьСледующуюСекцию(текстХТМЛ)
в которую передается текст ХТМЛ а возвращается кусок кода начиная с первого найденного тега и заканчивая его окончанием.  Переданный текст укорачивается на эту секцию.

И вызывая эту функцию  и постепенно скармливая ей полученные куски разбирал ХТМЛ до запчастей. А запчасти уже анализировал

о... нашел старый код...

// Из HTML строки получает указанную секцию. Используется для разбора HTML
// Из переданной строки указанная секция вырезается и возвращается
// Начало секции не должно быть закрыто
//
//Пример использования
//// получение таблицы
//секц = ПолучитьСекцию(html_строка,"<TABLE","</TABLE>");
//// обход по строкам
//Если секц <> "" тогда
//    // цикл по строкам
//    Пока 1 = 1 цикл
//        стрсекц = ПолучитьСекцию(секц,"<TR","</TR>");          
//        Если стрСекц = "" тогда
//           прервать;
//        конецесли;
//    конеццикла;
//конецесли;

Функция глПолучитьСекциюHTML(Тхт,НачалоСекции,КонецСекции) Экспорт
   НачПоз = найти(тхт,НачалоСекции);
   // отрезаем от текста все, что шло до этой секции
   Тхт = Сред(тхт,начПоз + стрдлина(НачалоСекции));
   НачПоз = найти(тхт,">");
   тхт = Сред(тхт,НачПоз+1);
   КонПоз = найти(тхт,КонецСекции);
   Секц = лев(тхт,КонПоз-1);
   // отрезаем от текста указанную секцию
   Тхт = Сред(тхт,КонПоз+стрДлина(КонецСекции));
   возврат секц;
КонецФункции

(20) это чо ?

(20) И выкинь. Он неправильный.
Не учитываешь вложенность.

(22) Ну покажи нам что нибудь свое, более типа правильное. Или ты мастер попиз...ть тока ?

регулчрные выражения можно еще заюзать для разбора.

(24) ник смени

(22) 63 года а ума не нажил. Значит так дурнем и помрешь.
Судить о том, правильный код или неправильный можно только зная задачу, для которой он предназначен. Да, код в (20) не учитывает вложенности, однако задачу разбора простого HTML он выполняет.

(26) Мальчик! В (19), (20) ты давал ответ на вопрос в (0). Твоя программа _не является_ HTML-парсером. Так что ты дал человеку неправильный ответ.
Когда тебе указали на ошибку - ты начал гнуть пальцЫ.

Тьфу...

(27) дурень, ты ж не знаешь, какая задача стоит. Вполне возможно, что (20) хватит

Пионэры разбушевались...

в книге знаний есть парсер XML, HTML он на ура вытянет, если нужно именно свою функцию юзать.

(30)
<p>Ты это гарантируешь?<br>Или чего-то не учитываешь?</p>

(17) любое
(24) нифига, регулярки - конечные автоматы, а html - люьой можети быть
(31) <i>ничего</i> не <i>учитывается</i>

блин, почему стандортный механизм доступа к DOM через полеHTMLдокумента никому не нравится? тогда internetexplorer.application заюзайте...

ДокументХТМЛ = ЭлементыФормы.ПолеHTMLДокумента.Документ;
ТелоДокумента = ДокументХТМЛ.body;
   
   //Перебираем все Подчиненые элементы для тела документа
   Для каждого елемент из ТелоДокумента.getElementsByTagName("*")   Цикл
       
       //елемент.tagName - наименование елемента;
       ИмяТега    = елемент.tagName;
       //Текст который в теге
       ТекстТега    = елемент.outerText;
       //Проверяем тест в теге с которого нам надо начать читать
Если ТекстТега = "Сводная таблица индексов инфляции" Тогда
           
           НомерСтроки = 0;
           НомерКолонки = 0;
           
       КонецЕсли;
       
       //Новая строка
       Если ИмяТега = "TR" Тогда
           
           НомерСтроки = НомерСтроки + 1;
                   
       КонецЕсли;
       
       //Первая колонка
       //Одна ячейка з названием реквизита
       Если ИмяТега = "TH" Тогда
           
           НомерКолонки = 1;
           
       КонецЕсли;
       
       //Следущие колонки
       //Ячека з данными реквизита
       Если ИмяТега = "TD" Тогда
           
           НомерКолонки = НомерКолонки + 1;            
                       
       КонецЕсли;
       
       //Проверяем или нам надо дальше читать
       Если ИмяТега = "P" тогда
           
           Прервать;
           
       КонецЕсли;    
       
       МассивДанных(НомерСтроки,НомерКолонки) = ТекстТега;
   КонецЦикла;