本帖最后由 asura 于 2011-12-27 10:02 编辑 Local $Time = TimerInit(), $type
Local $size = InetGetSize("ftp://sam:sam@192.168.9.253/2.rar")
Local $hDownload = InetGet("ftp://sam:sam@192.168.9.253/2.rar", @DesktopDir & "\2.rar", 1, 1)
ProgressOn ("下载进度","正在下载请稍候.....","0 %")
Do
Sleep(100)
$info = InetGetInfo($hDownload,0)
$jindu=Int($info/$size*100)
ProgressSet($jindu,String($jindu) & " % 已经下载 " & String($info) & "字节" )
Until InetGetInfo($hDownload, 2)
ProgressSet(100 ,"完成","全部完成")
Sleep(100)
ProgressOff()
我想怎么能把它加个缩小和关闭功能呢,(这样才有选择性,如果不想下载可以关闭它)希望各位大侠,帮助下,谢谢 |