关于网页的批量打开与批量保存(100)

  • 主题发起人 主题发起人 huxhang
  • 开始时间 开始时间
H

huxhang

Unregistered / Unconfirmed
GUEST, unregistred user!
下面是批量打开:(登陆的网页)/*批量打开有一定规律的多网页*//*@echo off *//*FOR /L %%I IN (5,1,8) do (@start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=25638%%I)*//*FOR /L %%I IN (5,1,8) >从5开始到8,按1递增,即:5,5+1,6+1,8*//*批量打开单一网页*/ @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=256691 @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=256685 @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=256689 @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=256693 @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=256692 @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=256688 @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=256690 @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=274025 @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=274024 @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=274020 @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=274022 @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=274023 @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=274027 @start iexplore.exe http://www.mso.com.cn/odds/odds_standard.asp?id=274021/* 批量保存网页,以后面的6位数字为文件名保存,如: 274027.mht */
 
bat文件是没办法保存的。
 
没人知道吗?
 
http1.get;这样就可以方便的保存了.function DownPageFile(Address:string):TStrings; var tmps: TStrings; address1:string; http1:tidhttp; begin try address1:=address; tmps:= TStringlist.Create; http1:=tidhttp.Create(dm1); tmps.Add(http1.Get(address1)); result:=tmps; except result:=nil; http1.Free; end;end;
 
Tidhttp,是什么?ctrl+f9 过不去啊抱歉,才发现你的恢复。
 
idhttp是Indy Client里的一个控件。
 
http1:=tidhttp.Create(dm1);中的dm1是?
 
找个网页爬虫研究下 不复杂的
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
I
回复
0
查看
687
import
I
后退
顶部