取出网页中所有<td>标签中的内容

Question

取出网页中所有<td>标签中的内容有人之前做过吗?

Answer 1

用正则表达式分析源码 或者 微软的com IHTMLDocument接口获取都可以

Answer 2

    wb1: TWebBrowser;
procedure TForm1.BitBtn3Click(Sender: TObject);
var links :OleVariant;
  uri : string;
  i:integer;
begin
  memo1.Lines.Clear;
  links := wb1.OleObject.document.getElementsByTagName('TD');  //访问标记TD的集合对象
  for i:=0 to Integer(links.length)-1 do
  begin
    uri := links.item(i).outerHtml; //获取索引元素的HTML
    memo1.Lines.Add(uri); //显示到listbox1
  end;
end;

Answer 3

正则表达式 or IHTMLDocument