|
发表于 2014-1-4 12:46:10
|
显示全部楼层
- //把网络上的文件下载到本地
- //此函数可以下载各种类型的文件,例如exe,图片,网页,压缩,等等
- //参数1:文件地址
- //参数2:文件本地存放的地址
- function 下载文件(文件地址,保存路径)
- http=com("Microsoft.XMLHTTP")//创建一个com对象
- http.Open("get", 文件地址, false)//以get模式打开文件
- http.setRequestHeader("Cache-Control","no-cache")//不使用本地缓存数据,防止每次数据一样
- http.send("")
- t=system.gettickcount()
- while(http.ReadyState != 4)
- help.sleep(100)
- if((system.gettickcount()-t)>5000)
- return false
- endif
- endwhile
- body=http.ResponseBody
-
- http=null
- stream=com("ADODB.Stream")//文件操作的对象
- stream.Type=1//二进制类型
- stream.Open//打开文件流操作
- stream.write(body)//把文件流写入内存(猜测的)
- stream.saveToFile(保存路径,2)//然后把文件保存成二进制数据的指定文件
- stream.Close//关闭文件流操作
- stream=null
- endfunction
复制代码 |
|