delphi 如何取网页上的列表啊 并保存到记事本中
就是这个地址 http://bk.pps.tv/class/61/3088/
我想取列表的网址 这一页都要 一页是20个地址
并且还想取下一页的内容
链接开始端是 <dd class="leftImg"><a href=" 这个是地址 ">这个是结束端
麻烦好心人帮忙写一下,记着不能用取整个网页上的地址那个函数
[解决办法]
用正则吧,去下一个正则的单元,下面匹配,根据实际情况修改
下载链接http://download.csdn.net/source/1090340
- Delphi(Pascal) code
var reg:TRegExpr; s:string;begin reg := TRegExpr.Create; s := Memo1.Text; reg.Expression := '(<dt>)((.*?))(target="_blank">)(.*?)(</a>)'; ListBox1.Clear; if reg.Exec(s) then begin repeat ListBox1.Items.Add(reg.Match[5]); until not reg.ExecNext; end;end;