tou00oo 发表于 2012-7-13 20:36:19

一个抓取网页内容的程序代码！ ^_^

本来是想贴个图的，不能直接上传图片，就算了吧！
非常简单，直接上源码！

procedure TForm1.Button1Click(Sender: TObject);

const
url = 'http://bbs.fishc.com/';
var
str: string;
x,y: integer;
begin
IdHttp1.HandleRedirects := True;
try
    str := idhttp1.Get(url);
    x := Pos('一个改变世界的梦想', str);
    y := Pos('的梦想', str);
    str := Copy(str, x+4, y - x - 4);
    Edit1.Text := str;
except
end;
end;

不知如何准确抓取表格中的内容，以及网页中的链接，希望知道的鱼油分享一下！

丿夏夜灬彬刂 发表于 2012-7-13 21:57:31

支持下:lol

comeheres 发表于 2012-7-13 22:58:51

用正则{:5_103:}

comeheres 发表于 2012-7-13 23:00:39

网上有很多用WebBrowser取全部网页链接的，貌似取表格内容“TABLE”的也有

网络学习 发表于 2012-7-14 00:01:55

俺来学习，谢谢分享

小骨头 发表于 2012-12-7 20:15:59

楼主辛苦了

小骨头 发表于 2012-12-7 20:16:43

楼主辛苦了

伦敦和尚 发表于 2012-12-7 22:11:27

comeheres 发表于 2012-7-13 23:00 static/image/common/back.gif
网上有很多用WebBrowser取全部网页链接的，貌似取表格内容“TABLE”的也有

请教下导入文本里面的内容是账号----密码 用listview导进来以后如何分开显示呢

soet 发表于 2012-12-15 15:50:04

这个东东比较不错啊

Angel丶L 发表于 2015-2-2 00:55:01

逛一逛，瞧一瞧，顶一顶，没坏处

hynw0000 发表于 2021-6-29 19:07:43

1

hynw0000 发表于 2021-6-29 19:08:43

1
页: [1]
查看完整版本: 一个抓取网页内容的程序代码！ ^_^