马上注册，结交更多易友，享用更多功能，让你轻松玩转觅风论坛。
您需要 登录 才可以下载或查看，没有账号？立即注册
x
变量 退出时间 为 长整数型
事件 主窗口.按下某键(键代码 为 整数型,传址 屏蔽 为 逻辑型)
如果 键代码 = 返回键 则
如果 取启动时间() - 退出时间 > 2000 则
弹出提示("再按一次退出程序")
退出时间 = 取启动时间()
否则
结束程序()
结束 如果
结束 如果
结束 事件
事件 主窗口.创建完毕()
判断 文件是否存在("/sdcard/seversfig.txt")
分支 真
分支 假
创建文件("/sdcard/seversfig.txt")
写出文本文件("/sdcard/seversfig.txt","192.168.0.63","GBK")
结束 判断
serverIP=读入文本文件("/sdcard/seversfig.txt","GBK")
结束 事件
变量 serverIP 为 文本型
变量 最新版本号 为 文本型
变量 当前版本号 为 文本型
事件 下载器1.创建完毕()
最新版本号=取网页源码2("http://"&serverIP &":8060/bbh.txt","UTF-8",5000)'这个地址是 文件的外链地址
当前版本号=取应用版本("com.newapp")
如果 到数值( 最新版本号) > 到数值(当前版本号 )则 '这个对比写自己的版本号，现在的程序包为1.0 所以与1.1 对比
进度条1.可视=真
进度条1.左边=0
进度条1.顶边=取屏幕高度()-100
进度条1.宽度=取屏幕宽度()
弹出提示("开始更新！")
下载器1.开始下载("http://"&serverIP &":8060/xxxx.apk",根目录& "/xxxx.apk")
否则
弹出提示("当前软件已是最新版本！")
结束 如果
结束 事件
事件 下载器1.下载完毕(任务索引 为 整数型,下载结果 为 逻辑型)
安装应用(根目录& "/xxxx.apk")
结束 事件
事件 下载器1.进度改变(任务索引 为 整数型,文件总大小 为 整数型,已下载大小 为 整数型,下载进度 为 整数型)
进度条1.位置=下载进度
结束 事件
|
|
楼主