易语言利用文档做软件远程更新

易语言利用文档做软件远程更新

.版本 2 .支持库 spec .支持库 shell .支持库 internet .程序集 窗口程序集_启动窗口 .子程序 __启动窗口_创建完毕 .局部变量 json, 类_json .局部变量 局_返回值, 文本型 .局部变量 最新版本, 文本型 .局部变量 最新下载链接, 文本型 .局部变量 强制更新, 文本型 局_返回值 = 编码_URL解码 (到文本 (网页_访问_对象 (“https://wds.ecsxs.com/9795.html”, 0, , , , , , , , , , , , , , , , , )), 真) ' 获取文档内容 调试输出 (局_返回值) json.解析 (局_返回值) ' 解析文档内容 .判断开始 (json.取通用属性 (“软件状态”, ) = “开启”) ' 判断软件状态是否为开启状态 编辑框1.内容 = json.取通用属性 (“公告内容”, ) _启动窗口.标题 = json.取通用属性 (“公告标题”, ) .默认 信息框 (“软件已关闭”, 0, , ) _启动窗口.销毁 () .判断结束 ' '''''''------------------以上是利用文档做软件远程公告的源码------------------------------ 最新版本 = json.取通用属性 (“最新版本”, ) 最新下载链接 = json.取通用属性 (“下载链接”, ) 强制更新 = json.取通用属性 (“强制更新”, ) .判断开始 (强制更新 = “真”) .判断开始 (标签2.标题 ≠ 最新版本) 信息框 (“检测到新版本,开始更新!本次为强制更新”, 0, , ) .判断开始 (写到文件 (取特定目录 (#系统桌面) + “最新版本.txt”, HTTP读文件 (最新下载链接)) = 真) 信息框 (“已经自动为您把最新版下载到桌面!”, 0, , ) 销毁 () .默认 信息框 (“抱歉 下载失败 请手动下载,软件链接:” + 最新下载链接, 0, , ) .判断结束 .默认 ' 信息框 (“本软件是最新版 不用更新”, 0, , ) .判断结束 .默认 .判断开始 (标签2.标题 ≠ 最新版本) .判断开始 (信息框 (“检测到新版本,开始更新!本次为可选更新”, 1, , ) = #取消钮) .默认 信息框 (“检测到新版本,开始更新!本次为强制更新”, 0, , ) .判断开始 (写到文件 (取特定目录 (#系统桌面) + “最新版本.txt”, HTTP读文件 (最新下载链接)) = 真) 信息框 (“已经自动为您把最新版下载到桌面!”, 0, , ) 销毁 () .默认 信息框 (“抱歉 下载失败 请手动下载,软件链接:” + 最新下载链接, 0, , ) .判断结束 .判断结束 .默认 ' 信息框 (“本软件是最新版 不用更新”, 0, , ) .判断结束 .判断结束
相关文件下载地址
©下载资源版权归作者所有;本站所有资源均来源于网络,仅供学习使用,请支持正版!

易语言利用文档做软件远程更新》有0个想法

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注