1,593
社区成员
发帖
与我相关
我的任务
分享
<div class='aha_class' id='aha_id'>
<ul>
<li><a href='./aa.php'>a_text</li>
<li><a href='./bb.php'>b_text</li>
<li><a href='./cc.php'>c_text</li>
</ul>
</div>
a_text
b_text
c_text
var
i, j,m,n: integer;
ovTable,ovTableul: OleVariant;
[delphi] view plaincopyprint?
//这一部分是取得“无序列表”的部分
ovTable:=Webbrowser1.OleObject.Document.getElementsByTagName('ul').item(0);
ovTableul:=ovTable.getElementsByTagName('li');
n:=ovTableul.Length;
if n>0 then
begin
for i:=0 to n-1 do
begin
self.Memo1.Lines.Add(ovTableul.item(i).InnerText);
end;
end;
<div class='aha_class' id='aha_id_A'>
<ul>
<li><a href='./aa.php'>a_text</li>
<li><a href='./bb.php'>b_text</li>
<li><a href='./cc.php'>c_text</li>
</ul>
</div>
<div class='aha_class' id='aha_id_B'>
<ul>
<li><a href='./aa.php'>a_text</li>
<li><a href='./bb.php'>b_text</li>
<li><a href='./cc.php'>c_text</li>
</ul>
</div>
这样如何取得id=aha_id_B下面的列表呢?