易语言利用新浪微博实现程序自动更新

易语言利用新浪微博实现程序自动更新

.版本 2
.支持库 spec

.程序集 窗口程序集1
.程序集变量 当前版本, 双精度小数型
.程序集变量 下载地址, 文本型

.子程序 __启动窗口_创建完毕, , , 本源码来自三叶资源网(www.sanye.cx)

当前版本 ＝ 1.1
标签1.标题 ＝ “当前版本：” ＋ 到文本 (当前版本)

.子程序 _按钮1_被单击

启动线程 (&检查新版, , )

.子程序 检查新版
.局部变量 返回, 文本型
.局部变量 最新版本, 文本型
.局部变量 更新说明, 文本型
.局部变量 程序标题, 文本型

返回 ＝ 网页_访问S (“http://blog.sina.com.cn/s/blog_8a10a8700102vh6f.html”)
返回 ＝ 文本_取出中间文本 (返回, “////开始”, “////结束”)
调试输出 (返回)
.判断开始 (返回 ≠ “”)
    最新版本 ＝ 文本_取出中间文本 (返回, “最新版本=”, “<”)
    程序标题 ＝ 文本_取出中间文本 (返回, “程序标题=”, “<”)
    取下载地址 ＝ 文本_取出中间文本 (返回, “更新地址=”, “<”)
    本源码来自三叶资源网(www.sanye.cx)
    更新说明 ＝ 文本_取出中间文本 (返回, “更新说明=”, “<”)
    _启动窗口.标题 ＝ 程序标题
    .如果真 (到数值 (最新版本) ≤ 当前版本)
        信息框 (“当前版本已是最新”, 0, )
        返回 ()
    .如果真结束
    更新说明 ＝ 文本_替换 (更新说明, , , , “|”, #换行符)
    标签2.标题 ＝ 更新说明
    信息框 (更新说明, 0, “需要更新”, )
.默认
    提示框 (“检测更新失败。”)
.判断结束


.子程序 _按钮2_被单击

载入 (窗口1, , 假)

@韦贝贝