开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 2377|回复: 13
打印 上一主题 下一主题
收起左侧

[易语言] 软件自动下载软件,但是,我在源码里面找不到下载软件的地址。求帮助!

[复制链接]
结帖率:41% (7/17)
跳转到指定楼层
楼主
发表于 2013-9-20 13:10:14 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式   湖北省襄阳市
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)
    系统_删除托盘图标 ()
    返回 (假)
.如果结束



回答提醒:如果本帖被关闭无法回复,您有更好的答案帮助楼主解决,请发表至 源码区 可获得加分喔。
友情提醒:本版被采纳的主题可在 申请荣誉值 页面申请荣誉值,获得 1点 荣誉值,荣誉值可兑换荣誉会员、终身vip用户组。
快捷通道:申请荣誉值无答案申请取消悬赏投诉有答案未采纳为最佳
结帖率:100% (1/1)
沙发
发表于 2013-9-20 13:17:27 | 只看该作者   吉林省长春市
你把源上传上来吧 不然看不出来的

点评

源码就我发的那些。 复制到易语言里面看吧,   湖北省襄阳市  详情 回复 发表于 2013-9-20 13:24
回复

使用道具 举报

结帖率:41% (7/17)
板凳
 楼主| 发表于 2013-9-20 13:24:24 | 只看该作者   湖北省襄阳市
misf 发表于 2013-9-20 13:17
你把源上传上来吧 不然看不出来的

源码就我发的那些。 复制到易语言里面看吧,
回复

使用道具 举报

结帖率:100% (1/1)
地板
发表于 2013-9-20 13:31:45 | 只看该作者   吉林省长春市
韩子耀 发表于 2013-9-20 13:24
源码就我发的那些。 复制到易语言里面看吧,



去看看这里去 你就会找到下载地址 要是你还找不到你把 .e文件传上来我帮你找

点评

问下, 如何多个文件下载阿。   湖北省襄阳市  详情 回复 发表于 2013-9-20 13:43
不用了, 乱点,一下点出来了。   湖北省襄阳市  详情 回复 发表于 2013-9-20 13:36
找不到, 源码上传了,帮忙找找,谢谢。!!   湖北省襄阳市  详情 回复 发表于 2013-9-20 13:35
回复

使用道具 举报

结帖率:41% (7/17)
地下
 楼主| 发表于 2013-9-20 13:35:35 | 只看该作者   湖北省襄阳市
misf 发表于 2013-9-20 13:31
去看看这里去 你就会找到下载地址 要是你还找不到你把 .e文件传上来我帮你找

找不到,

源码上传了,帮忙找找,谢谢。!!


源码.zip

644.22 KB, 下载次数: 33

回复

使用道具 举报

结帖率:41% (7/17)
6
 楼主| 发表于 2013-9-20 13:36:53 | 只看该作者   湖北省襄阳市
misf 发表于 2013-9-20 13:31
去看看这里去 你就会找到下载地址 要是你还找不到你把 .e文件传上来我帮你找

不用了, 乱点,一下点出来了。
回复

使用道具 举报

结帖率:41% (7/17)
7
 楼主| 发表于 2013-9-20 13:43:02 | 只看该作者   湖北省襄阳市
misf 发表于 2013-9-20 13:31
去看看这里去 你就会找到下载地址 要是你还找不到你把 .e文件传上来我帮你找

问下,  如何多个文件下载阿。   
回复

使用道具 举报

结帖率:94% (45/48)
8
发表于 2013-9-20 14:14:15 | 只看该作者   四川省资阳市
回复

使用道具 举报

结帖率:100% (1/1)
9
发表于 2013-9-20 14:17:53 | 只看该作者   吉林省长春市
韩子耀 发表于 2013-9-20 13:43
问下,  如何多个文件下载阿。

多个文件同时下载 那就点用多线程了 同样的方法用线程启动

点评

我新手,不知道怎么玩, 能不能帮忙添加下阿。 要么给个例子阿。 3Q   湖北省襄阳市  详情 回复 发表于 2013-9-20 14:19
回复

使用道具 举报

结帖率:41% (7/17)
10
 楼主| 发表于 2013-9-20 14:19:07 | 只看该作者   湖北省襄阳市
misf 发表于 2013-9-20 14:17
多个文件同时下载 那就点用多线程了 同样的方法用线程启动

  我新手,不知道怎么玩, 能不能帮忙添加下阿。    要么给个例子阿。      3Q
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报QQ: 793400750,邮箱:[email protected]
网站简介:精易论坛成立于2009年,是一个程序设计学习交流技术论坛,隶属于揭阳市揭东区精易科技有限公司所有。
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表