|

5精币
软件自动下载软件,但是,我在源码里面找不到下载软件的地址。求帮助!
软件打开后,自动下载,但是找不到下载地址。
怎么回事阿? 求解答。
以下是源码:
.版本 2
.程序集 程序集1
.子程序 _启动子程序, 整数型, , 请在本子程序中放置动态链接库初始化代码
_临时子程序 () ' 在初始化代码执行完毕后调用测试代码
返回 (0) ' 返回值被忽略。
.子程序 _临时子程序
' 本名称子程序用作测试程序用,仅在开发及调试环境中有效,编译发布程序前将被系统自动清空,请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
.如果真 (系统_信息框 (“本实例以【泡泡吧】为演示,包括在线下载及效验。” + #换行符 + “是否同意实例继续?” + #换行符 + “如有疑问请联系QQ:294712662”, #是否钮, “安装协议”) = #是钮)
系统_创建托盘图标 (窗口_取桌面句柄 (), “泡泡吧”)
验证安装包 ()
.如果真结束
.子程序 AutoSetup
.参数 文件路径, 文本型
.局部变量 auto, Autoit脚本
.局部变量 pid
pid = auto.Run (文件路径, , 文件路径 + “ /S”) ' 带静默安装命令行
.如果 (pid = 0)
系统_托盘气泡提示 (“萧阳天提示!”, “后台安装失败,请重新运行程序!”, 3)
auto.ProcessClose ()
.否则
系统_托盘气泡提示 (“萧阳天提示!”, “开始后台安装,请稍等......”, 2)
.如果结束
.如果真 (auto.ProcessWaitClose (pid))
系统_托盘气泡提示 (“萧阳天提示!”, “恭喜你,安装已完成,即将退出!”, 1)
auto.Sleep (2000)
系统_删除托盘图标 ()
auto.ProcessClose ()
.如果真结束
.子程序 验证安装包
.局部变量 size, 长整数型
.局部变量 path, 文本型
.如果真 (进程_进程名是否存在 (磁盘_取文件短名 (#url))) ' 安装包不允许两个安装程序同时运行。
系统_信息框 (“另外一个[泡泡吧]安装程序已经在运行。”, #信息图标, “泡泡吧”)
进程_结束_进程名 ()
.如果真结束
path = 磁盘_取桌面路径 () + “PaoPao8.exe”
.如果 (磁盘_文件是否存在 (path)) ' 如果文件存在就效验文件大小
size = 网络_取网络文件大小 (#url)
.如果 (磁盘_取文件尺寸 (path) = size)
AutoSetup (path)
.否则
.如果真 (进度下载 (#url, path))
AutoSetup (path)
.如果真结束
.如果结束
.否则
.如果真 (进度下载 (#url, path))
AutoSetup (path)
.如果真结束
.如果结束
.子程序 进度下载, 逻辑型
.参数 url, 文本型
.参数 path, 文本型
.局部变量 bool, 逻辑型
系统_托盘气泡提示 (“萧阳天提示!”, “正在后台下载,请稍等2-3分钟!”, 1)
bool = 网络_进度条下载 (url, path)
.如果 (bool)
系统_托盘气泡提示 (“萧阳天提示!”, “下载成功,开始安装!”, 1)
返回 (真)
.否则
系统_托盘气泡提示 (“萧阳天提示!”, “下载失败,请重新运行程序!”, 3)
系统_删除托盘图标 ()
返回 (假)
.如果结束
|
|