Простой парсер, не могу получить href из html (dom)

Тема в разделе "Delphi - Сети", создана пользователем strongmaster, 8 авг 2015.

  1. strongmaster

    strongmaster New Member

    Регистрация:
    8 авг 2015
    Сообщения:
    1
    Симпатии:
    0
    Всем привет. Помогите написать простенький парсер, не могу получить href в финале.
    Выдергивает все что Li, потом внутри в h3, а потом в A.
    Код (Text):

    vTags := WebBrowser1.OleObject.Document.getElementsByTagName('Li');
    n1:=vTags.Length;
    if n1>0 then
    begin
    for i1:=0 to n1-1 do
    begin
    vTags1 := vTags.item(i1).getElementsByTagName('H3');
    n2:=vTags1.Length;
    if n2>0 then
    begin
    for i2:=0 to n2-1 do
    begin
    sMemo2.Lines.Add(vTags1.item(i2).InnerHTML);
    end;
    end;
    end;
    end;
     
    В sMemo2 получается:
    Код (Text):

    <A href="http://www.google.ru/url?url=http://www.elle.ru/tests/&amp;rct=j&amp;frm=1&amp;q=&amp;esrc=s&amp;sa=U&amp;ved=0CBMQFjAAahUKEwj4n4380ZnHAhWI2SwKHdhEB2A&amp;usg=AFQjCNFKGc7G2o3Ta0OKGyFYhC8EjSKUHg" target=_blank><B>?????</B> ??????: ?????? ??????????????? <B>?????</B> ?????????, ??? <B>...</B></A>
     
    Как получить href? Чето не пойму. Спасибо.
     
  2. sinkopa

    sinkopa Well-Known Member

    Регистрация:
    17 июн 2009
    Сообщения:
    344
    Симпатии:
    9
    А вот так если? :)
    Код (Delphi):
    sMemo2.Lines.Add(vTags1.item(i2).getElementsByTagName('A').item(0).getAttribute('href'));
     
    #2 sinkopa, 12 авг 2015
    Последнее редактирование модератором: 13 авг 2015
Загрузка...

Поделиться этой страницей