求助！此代码如何修改成批量下载？
#include <INet.au3>Dim $rar, $path,$rul
$url = "http://www.123.com/1.rar"
$rar = "c:\1.rar"
$path = "c:\1\"
$load = InetGet($url, $rar, 1, 1)
ProgressOn("正在下载", "正在为你下载,请稍后.....")
While 1
If InetGetInfo($load, 2) = True Then ExitLoop
InetGetInfo($load, 1)
$rou = Round(InetGetInfo($load, 0) / InetGetInfo($load, 1), 2) * 100
ProgressSet($rou, "已下载:" & $rou & "%")
Sleep(100)
WEnd
ProgressSet(100, "下载完成")
ProgressOff()
$pid=Run(@ProgramFilesDir & "\winrar\rar.exe x -y c:\1.rar c:\1\","",@SW_HIDE)
Do
Sleep(100)
Until ProcessExists($pid) = 0
FileDelete($path & "*.reg")
FileDelete($path & "*.txt")
FileDelete($path & "*.html")
$sousuo=FileFindFirstFile("c:\1\*.exe")
$file=FileFindNextFile($sousuo)
Run($path & $file)
Exit以上代码 要如何修改成批量下载？
$url = "http://www.123.com/1.rar"
$url = "http://www.123.com/2.rar"
$url = "http://www.123.com/3.rar"
这样的然后解压到同个文件夹再运行1.exe
跪求高手的帮助！ 把下载的操作部分写成一个函数. fn_DownloadCore($sURL, $sPath, $iMode = 1, $IsBackground = 1)
然后多次调用这个函数来下载就可以了. 把下载的操作部分写成一个函数. fn_DownloadCore($sURL, $sPath, $iMode = 1, $IsBackground = 1)
然后多次 ...
easefull 发表于 2011-5-3 20:15 http://www.autoitx.com/images/common/back.gif
可以说明修改哪个地方的代码吗？
本人菜鸟不是很清楚！谢谢！最好能直接修改上面的代码做个例子！ 本帖最后由 easefull 于 2011-5-4 12:52 编辑
帮助文档 -> 语言相关 -> 用户函数
先试着学习一下怎么定义、使用自己的函数.
再用使用函数的思路修改这个代码.
页:
[1]