|
1.把下面的下载一个任务 改为下载两个 另一个的下载地址:http://bcs.duapp.com/zaq123456/2.jpg?sign=MBO:8b588d396f3a29431b10b7f79666a92c:WGhrawhbjBPlEIf%2BNmacKKWw79U%3D
2.改为下载两个任务后 不管是先下软件还是图片 修改成下载完最后一个任务 成功的执行 替换新版 里面的命令 替换成下载好的1.exe
.版本 2
.支持库 downlib
.程序集 窗口程序集3
.程序集变量 下载参数, 任务参数
.程序集变量 下载任务, 下载对象
.程序集变量 下载状态, 整数型
.程序集变量 下载信息, 字节集
.程序集变量 文件大小, 双精度小数型
.子程序 __启动窗口2_创建完毕
.局部变量 下载地址, 文本型
下载地址 = 删首尾空 (“http://bcs.duapp.com/zaq123456/%E6%A2%A6%E5%B9%BB%E8%BE%85%E5%8A%A9%E8%BD%AF%E4%BB%B6.exe?sign=MBO:8b588d396f3a29431b10b7f79666a92c:87Nheu7Q2SX1hvgmj3%2B1mm2wfVM%3D”)
下载参数.类型 = #传送常量.下载
下载参数.文件地址 = 下载地址
下载参数.线程等待超时 = 1000
下载参数.默认线程数 = 5
下载参数.本地文件路径 = 取当前目录 () + “\1.exe.tmp”
下载参数.连接超时 = 5000
下载参数.发送超时 = 5000
下载参数.接收超时 = 10000
下载参数.接收大小 = 10240
下载参数.交互回调函数 = &交互回调函数
下载任务.增加新任务 (下载参数)
.子程序 标签透明
.参数 标签, 标签
.局部变量 Backimg, 字节集
标签.可视 = 假
处理事件 ()
Backimg = 快照 (标签.取窗口句柄 (), , )
标签.底图 = Backimg
标签.可视 = 真
.子程序 _时钟1_周期事件
进度条1.位置 = 四舍五入 (下载任务.取已下载长 () ÷ 文件大小 × 100, 0)
标签1.标题 = “下载进度:” + 到文本 (进度条1.位置 ÷ 1) + “%”
标签透明 (标签1)
.子程序 __启动窗口2_将被销毁
结束 ()
.子程序 替换新版
写到文件 (“5update.bat”, 到字节集 (“@echo off” + #换行符 + “Taskkill /f /im ” + 取执行文件名 () + #换行符 + “Del ” + 取执行文件名 () + #换行符 + “ren ” + “1.exe.tmp ” + 取执行文件名 () + #换行符 + “start ” + 取执行文件名 () + #换行符 + “Del %0” + #换行符 + “Exit”))
运行 (“5update.bat”, 真, 1)
结束 ()
.子程序 交互回调函数, 整数型
.参数 消息类型, 整数型
.参数 线程信息, 整数型
.参数 参数3, 整数型
.参数 参数4, 整数型
.参数 对象信息, 整数型
.判断开始 (消息类型 = #传送常量.下载上传开始)
文件大小 = 参数3
.判断 (消息类型 = #传送常量.下载上传结束)
替换新版 ()
.判断 (消息类型 = #传送常量.新下载线程启动)
.判断 (消息类型 = #传送常量.下载线程继续下载)
.判断 (消息类型 = #传送常量.线程正常结束)
.判断 (消息类型 = #传送常量.线程异常结束)
.判断 (消息类型 = #传送常量.存在同名文件)
.判断 (消息类型 = #传送常量.收到数据)
.判断 (消息类型 = #传送常量.下载数据范围)
.默认
.判断结束
返回 (0)
|
|