得到网页内容简单!但如何得到这个网页的内容却很难,所以一问,请高手出手解决!(200分)

  • 主题发起人 主题发起人 cnhxjtoa
  • 开始时间 开始时间
C

cnhxjtoa

Unregistered / Unconfirmed
GUEST, unregistred user!
得到网页内容通常按下面的程序就可以实现!
别人问我得到这个http://www.500wan.com网页首页内容我硬是没撤了,也还真是怪了去了。
uses MSHTML;
procedure TForm1.Button1Click(Sender: TObject);
var
doc3 : IHTMLDocument3;
sl : TStringList;
begin
doc3:=WebBrowser1.Document as IHTMLDocument3;
sl := TStringList.Create;
sl.Text := doc3.documentElement.outerText; // 保存内容
// sl.Text := doc3.documentElement.outerHTML; 保存源文件
sl.SaveToFile('c:/1.txt');
sl.Free;
end;
 
字符串的话, 分析得到的内容就可以了, 其他的估计很难搞定吧
 
后退
顶部