网上找的都是固定的,还都有弹窗。这个自己可以在格式里编辑想遍历的网址。刷流量的一般用的到!
如何遍历网页内图片
以前做邮件客户端时,收发Html邮件情况下需要将内嵌图片枚举,当时Google了一遍,没有找到可用的资料,都是些不全或错误代码。为了赶工,只有采用笨办法:通过查找网页源码的办法枚举内嵌图片。
后来,查了一阵MSDN啃了其中干巴巴的英文,并度了N次,找到了想要的方法。
在窗体上放WebBrowser、Memo、按钮,下面是源码,如果有什么疑问请查阅MSDN。
var
doc: IHtmlDocument2;
i: Integer;
s: String;
begin
//iFile := WebBrowser1.Document as IPersistFile;
//iFile.Save('F:/tt.mht', False);
doc := WebBrowser1.Document as IHtmlDocument2;
if doc.images.length = 0 then exit;
Memo1.Clear;
for i := 0 to doc.images.length-1 do
with (doc.images.item(i,null) as IHTMLImgElement) do begin
s := name;
s := s + ';' + href;
s := s + ';' + src;
s := s + ';' + mimeType;
s := s + ';' + dynsrc;
s := s + ';' + vrml;
Memo1.Lines.Add(s);
end;
end;