软件自动更新的问题 20精币

Den

请大家教下,如何利用百度空间实现自动更新

更新完成后,自动删除源码的程序,打开新版本的程序

我写来写去也出错,闷死了

希望能带上源码

zang爱

.版本 2
.支持库 internet
.支持库 eAPI

更新 ＝ HTTP读文件 (“http://xxx/gengxin/up.txt”)
输出调试文本 (到文本 (当前版本))
输出调试文本 (到文本 (更新))
.如果 (更新 ＝ 到字节集 (“”))
    信息框 (编码转换.GBK繁体到BIG5 (“無法連接伺服器”), #警告图标, 信息框标题)
    窗口_主程序.可视 ＝ 真
.否则
    .如果 (当前版本 ≠ 更新)
        .如果 (信息框 (编码转换.GBK繁体到BIG5 (“當前版本：” ＋ “V” ＋ 到文本 (当前版本) ＋ #换行符 ＋ “檢測到新版本” ＋ “V” ＋ 到文本 (更新) ＋ #换行符 ＋ “是否前往官網下載”), 4, 信息框标题) ＝ #是钮)
            打开指定网址 (“xxx”)
            结束 ()
        .否则
            窗口_主程序.可视 ＝ 真
        .如果结束

    .否则
        窗口_主程序.可视 ＝ 真
    .如果结束

.如果结束



不知道这么写对不对{:3_233:}

zang爱

无语 我的回复要审核...这个是我曾经看过的  不知道是不是你想要的     


下面是另一个源码 程序升级自身.rar (21.98 KB, 下载次数: 51)

2011-5-27 18:07 上传

点击文件名下载附件

SKY

以下是放在空间的代码：
////开始
最新版=5.11
下载地址=这个是文件的下载地址，由于帖子不可以发链接，以中文替代
下载方式=下载文件
下载方式可以是打开网页或下载文件
更新说明=1.测试
2.测试
3.测试
更新说明结束
////结束

以下是教程的易语言主要部分代码
.版本 2
.支持库 internet
.支持库 eAPI
.支持库 EThread
处理事件 ()
返回文本 ＝ 到文本 (HTTP读文件 (“这里是百度空间那个代码的地址，换了其他空间就不行了”))
返回文本 ＝ 取指定内容 (返回文本, “////开始”, “////结束”)
最新版 ＝ 取指定内容 (返回文本, “最新版=”, “</p>”)
.如果真 (到数值 (最新版) ＞ 到数值 (当前版本))
    下载地址 ＝ 取指定内容 (返回文本, “下载地址=”, “</p>”)
    下载方式 ＝ 取指定内容 (返回文本, “下载方式=”, “</p>”)
    更新说明 ＝ 取指定内容 (返回文本, “更新说明=”, “更新说明结束</p>”)
    更新说明 ＝ 子文本替换 (更新说明, “<p>”, “”, , , 真)
    更新说明 ＝ 子文本替换 (更新说明, “</p>”, “”, , , 真)
    .如果真 (信息框 (“当前版本：” ＋ 当前版本 ＋ #换行符 ＋ “最新版本：” ＋ 最新版 ＋ #换行符 ＋ “更新内容：” ＋ #换行符 ＋ 更新说明, #是否钮, “是否下载最新版？”) ＝ #是钮)
        .如果真 (下载方式 ＝ “打开网页”)
            打开指定网址 (下载地址)  ' 这个是直接打开下载页面,适合用网盘的朋友
        .如果真结束
        .如果真 (下载方式 ＝ “下载文件”)
            启动线程 (&下载更新, , )  ' 这个是直接下载文件,适合能外链下载的朋友   上传的地方可以用google的项目托管,速度快且稳定
        .如果真结束
    .如果真结束

希望是你要的  也希望你成功

Den

SKY 发表于 2011-5-27 19:55
以下是放在空间的代码：
////开始
最新版=5.11

麻烦放上源码

SKY

Den 发表于 2011-5-28 00:33
麻烦放上源码

不给你了嘛..
////开始
最新版=5.11
下载地址=这个是文件的下载地址，由于帖子不可以发链接，以中文替代
下载方式=下载文件
下载方式可以是打开网页或下载文件
更新说明=1.测试
2.测试
3.测试
更新说明结束
////结束  （以上放在空间）



.版本 2
.支持库 internet
.支持库 eAPI
.支持库 EThread
处理事件 ()
返回文本 ＝ 到文本 (HTTP读文件 (“这里是百度空间那个代码的地址，换了其他空间就不行了”))
返回文本 ＝ 取指定内容 (返回文本, “////开始”, “////结束”)
最新版 ＝ 取指定内容 (返回文本, “最新版=”, “</p>”)
.如果真 (到数值 (最新版) ＞ 到数值 (当前版本))
    下载地址 ＝ 取指定内容 (返回文本, “下载地址=”, “</p>”)
    下载方式 ＝ 取指定内容 (返回文本, “下载方式=”, “</p>”)
    更新说明 ＝ 取指定内容 (返回文本, “更新说明=”, “更新说明结束</p>”)
    更新说明 ＝ 子文本替换 (更新说明, “<p>”, “”, , , 真)
    更新说明 ＝ 子文本替换 (更新说明, “</p>”, “”, , , 真)
    .如果真 (信息框 (“当前版本：” ＋ 当前版本 ＋ #换行符 ＋ “最新版本：” ＋ 最新版 ＋ #换行符 ＋ “更新内容：” ＋ #换行符 ＋ 更新说明, #是否钮, “是否下载最新版？”) ＝ #是钮)
        .如果真 (下载方式 ＝ “打开网页”)
            打开指定网址 (下载地址)  ' 这个是直接打开下载页面,适合用网盘的朋友
        .如果真结束
        .如果真 (下载方式 ＝ “下载文件”)
            启动线程 (&下载更新, , )  ' 这个是直接下载文件,适合能外链下载的朋友   上传的地方可以用google的项目托管,速度快且稳定
        .如果真结束
    .如果真结束
（以上放在易语言里）

Den

SKY 发表于 2011-5-28 12:21
不给你了嘛..
////开始
最新版=5.11

更新完成后,自动删除源码的程序,打开新版本的程序
没有这个功能啊

SKY

Den 发表于 2011-5-29 06:52
更新完成后,自动删除源码的程序,打开新版本的程序
没有这个功能啊

这个得在旧版本的关闭前加个打开新版本
新版本打开后加个代码寻找和删除旧版本

陆宁

这个我知道你QQ多少，我直接做源码给你

Den

陆宁 发表于 2011-5-29 11:56
这个我知道你QQ多少，我直接做源码给你

嗯嗯,谢谢你了,发下给我 你知道我Q吧?