呵呵,我写了个超简单的源码,你自己看吧!
.版本 2
.支持库 internet
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.局部变量 文件, 文本型
.局部变量 左边的内容, 文本型
.局部变量 网址, 文本型
_启动窗口.标题 = “V.0.1.0”
文件 = 到文本 (HTTP读文件 (“ http://28855.5x5x.info/文件更新.txt”))
左边的内容 = 到文本 (取文本左边 (文件, 7))
网址 = 到文本 (取文本右边 (文件, 13))
.判断开始 (_启动窗口.标题 ≠ 左边的内容)
.如果真 (信息框 (“发现有新版本.” + #换行符 + “您当前的版本是” + _启动窗口.标题 + #换行符 + “现最新的版本为” + 左边的内容 + #换行符 + “请问是否更新”, #确认取消钮 + #信息图标, “有新版本”) = #确认钮)
超级链接框1.Internet地址 = 网址
超级链接框1.跳转 ()
.如果真结束
.默认
.判断结束