软件更新例程

诚悦科技

个人用的软件更新程序 分享给新手
新更新程序.e (880.46 KB, 下载次数: 120)

2023-7-1 20:42 上传

点击文件名下载附件 采用精易模块 直接论坛下载

开源代码

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
下载参数	任务参数
下载任务	下载对象
下载状态	整数型
下载信息	字节集
文件大小	双精度小数型
下载地址	文本型	0
文件名	文本型
版本号	文本型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

' 调用方法：启动更新  运行 (取运行目录 () ＋ “\更新程序.exe ” ＋ 网络版本 ＋ “|” ＋ 更新地址, 假, )
取命令行 (下载地址)
程序_禁止重复运行 (“sagdhjsadgfjdsfsdajfgsfasdklgfjasdkg”, 真, “程序已经运行，请勿重复打开”, #警告图标, )
如果 (取数组成员数 (下载地址) ≠ 1)
销毁 ()
文件名 ＝ “\” ＋ 文本_取右边 (下载地址 [1], “update/”, 1, )
版本号 ＝ 文本_取左边 (下载地址 [1], “|”, 1, )
下载参数.类型 ＝ #传送常量 .下载
下载参数.文件地址 ＝ 文本_取右边 (下载地址 [1], “|”, 1, )
下载参数.线程等待超时 ＝ 1000
下载参数.默认线程数 ＝ 5
下载参数.本地文件路径 ＝ 取运行目录 () ＋ 文件名
下载参数.连接超时 ＝ 5000
下载参数.发送超时 ＝ 5000
下载参数.接收超时 ＝ 10000
下载参数.接收大小 ＝ 10240
下载参数.交互回调函数 ＝ &交互回调函数
下载任务.增加新任务 (下载参数)
如果真 (文件是否存在 (取运行目录 () ＋ 文件名))
透明标签1.标题 ＝ “文件正在解压中，请稍后...”
删除文件 (取运行目录 () ＋ 文件名)
进程_终止进程 (“主程序.EXE”, )

子程序名	返回值类型	公开	备 注
交互回调函数	整数型
参数名	类 型	参考	可空	数组	备 注
消息类型	整数型
线程信息	整数型
参数3	整数型
参数4	整数型
对象信息	整数型

判断 (消息类型 ＝ #传送常量 .下载上传开始)
时钟1.时钟周期 ＝ 10
时钟2.时钟周期 ＝ 100
文件大小 ＝ 参数3
' 置文件属性 (取运行目录 () ＋ 文件名, 2)
判断 (消息类型 ＝ #传送常量 .下载上传结束)
时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 0
透明标签1.标题 ＝ “文件正在解压中，请稍后...”
ZIP压缩1.解压 (取运行目录 () ＋ 文件名, 取运行目录 () ＋ “\”)
延迟 (5000)
删除文件 (取运行目录 () ＋ 文件名)
透明标签1.标题 ＝ “文件更新完成”
运行 (取运行目录 () ＋ “\主程序.EXE”, 假, )
写配置项 (取运行目录 () ＋ “\game.ini”, “deploy”, “Version”, 版本号)
结束 ()
判断 (消息类型 ＝ #传送常量 .新下载线程启动)
判断 (消息类型 ＝ #传送常量 .下载线程继续下载)
判断 (消息类型 ＝ #传送常量 .线程正常结束)
判断 (消息类型 ＝ #传送常量 .线程异常结束)
时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 0
判断 (消息类型 ＝ #传送常量 .存在同名文件)
判断 (消息类型 ＝ #传送常量 .收到数据)
判断 (消息类型 ＝ #传送常量 .下载数据范围)



返回 (0)

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

进度条1.位置 ＝ 四舍五入 (下载任务.取已下载长 () ÷ 文件大小 × 100, 0)

子程序名	返回值类型	公开	备 注
_时钟2_周期事件

透明标签2.标题 ＝ 到文本 (四舍五入 (下载任务.取下载速度 () ÷ 1024, 2)) ＋ “ KB/s”
透明标签3.标题 ＝ 到文本 (四舍五入 (下载任务.取已下载长 () ÷ 文件大小 × 100, 0)) ＋ “%”

i支持库列表	支持库注释
downlib	网络传送支持库
CCTS	(未知支持库)
iext	扩展界面支持库一
eCompress	压缩解压支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 downlib<br /> .支持库 CCTS<br /> .支持库 iext<br /> .支持库 eCompress<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 下载参数, 任务参数<br /> .程序集变量 下载任务, 下载对象<br /> .程序集变量 下载状态, 整数型<br /> .程序集变量 下载信息, 字节集<br /> .程序集变量 文件大小, 双精度小数型<br /> .程序集变量 下载地址, 文本型, , "0"<br /> .程序集变量 文件名, 文本型<br /> .程序集变量 版本号, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> ' 调用方法：启动更新  运行 (取运行目录 () ＋ “\更新程序.exe ” ＋ 网络版本 ＋ “|” ＋ 更新地址, 假, )<br /> <br /> 取命令行 (下载地址)<br /> <br /> 程序_禁止重复运行 (“sagdhjsadgfjdsfsdajfgsfasdklgfjasdkg”, 真, “程序已经运行，请勿重复打开”, #警告图标, )<br /> .如果 (取数组成员数 (下载地址) ≠ 1)<br />     销毁 ()<br /> .否则<br />     文件名 ＝ “\” ＋ 文本_取右边 (下载地址 [1], “update/”, 1, )<br />     版本号 ＝ 文本_取左边 (下载地址 [1], “|”, 1, )<br />     下载参数.类型 ＝ #传送常量.下载<br />     下载参数.文件地址 ＝ 文本_取右边 (下载地址 [1], “|”, 1, )<br />     下载参数.线程等待超时 ＝ 1000<br />     下载参数.默认线程数 ＝ 5<br />     下载参数.本地文件路径 ＝ 取运行目录 () ＋ 文件名<br />     下载参数.连接超时 ＝ 5000<br />     下载参数.发送超时 ＝ 5000<br />     下载参数.接收超时 ＝ 10000<br />     下载参数.接收大小 ＝ 10240<br />     下载参数.交互回调函数 ＝ &交互回调函数<br />     下载任务.增加新任务 (下载参数)<br />     .如果真 (文件是否存在 (取运行目录 () ＋ 文件名))<br />         透明标签1.标题 ＝ “文件正在解压中，请稍后...”<br />         删除文件 (取运行目录 () ＋ 文件名)<br />     .如果真结束<br />     进程_终止进程 (“主程序.EXE”, )<br /> .如果结束<br /> <br /> <br /> .子程序 交互回调函数, 整数型<br /> .参数 消息类型, 整数型<br /> .参数 线程信息, 整数型<br /> .参数 参数3, 整数型<br /> .参数 参数4, 整数型<br /> .参数 对象信息, 整数型<br /> <br /> .判断开始 (消息类型 ＝ #传送常量.下载上传开始)<br />     时钟1.时钟周期 ＝ 10<br />     时钟2.时钟周期 ＝ 100<br />     文件大小 ＝ 参数3<br />     ' 置文件属性 (取运行目录 () ＋ 文件名, 2)<br /> .判断 (消息类型 ＝ #传送常量.下载上传结束)<br />     时钟1.时钟周期 ＝ 0<br />     时钟2.时钟周期 ＝ 0<br />     透明标签1.标题 ＝ “文件正在解压中，请稍后...”<br />     ZIP压缩1.解压 (取运行目录 () ＋ 文件名, 取运行目录 () ＋ “\”)<br />     延迟 (5000)<br />     删除文件 (取运行目录 () ＋ 文件名)<br /> <br />     透明标签1.标题 ＝ “文件更新完成”<br />     运行 (取运行目录 () ＋ “\主程序.EXE”, 假, )<br />     写配置项 (取运行目录 () ＋ “\game.ini”, “deploy”, “Version”, 版本号)<br />     结束 ()<br /> .判断 (消息类型 ＝ #传送常量.新下载线程启动)<br /> <br /> .判断 (消息类型 ＝ #传送常量.下载线程继续下载)<br /> <br /> .判断 (消息类型 ＝ #传送常量.线程正常结束)<br /> <br /> .判断 (消息类型 ＝ #传送常量.线程异常结束)<br />     时钟1.时钟周期 ＝ 0<br />     时钟2.时钟周期 ＝ 0<br /> .判断 (消息类型 ＝ #传送常量.存在同名文件)<br /> <br /> .判断 (消息类型 ＝ #传送常量.收到数据)<br /> <br /> .判断 (消息类型 ＝ #传送常量.下载数据范围)<br /> <br /> .默认<br /> <br /> .判断结束<br /> 返回 (0)<br /> <br /> <br /> .子程序 _时钟1_周期事件<br /> <br /> 进度条1.位置 ＝ 四舍五入 (下载任务.取已下载长 () ÷ 文件大小 × 100, 0)<br /> <br /> .子程序 _时钟2_周期事件<br /> <br /> 透明标签2.标题 ＝ 到文本 (四舍五入 (下载任务.取下载速度 () ÷ 1024, 2)) ＋ “ KB/s”<br /> 透明标签3.标题 ＝ 到文本 (四舍五入 (下载任务.取已下载长 () ÷ 文件大小 × 100, 0)) ＋ “%”

调用更新程序格式

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
网络版本	文本型		不能为空，否者更新程序闪退
本地版本	文本型
更新地址	文本型		不能为空，否者更新程序闪退

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

网络版本 ＝ “1.3”  ' 网络上获取到的版本信息（不能为空）
本地版本 ＝ 读配置项 (取运行目录 () ＋ “\game.ini”, “deploy”, “Version”, )
更新地址 ＝ “http://cydn.vip/update/CSgame.zip”  ' 你需要更新的压缩文件的地址（zip格式）根据网址信息 修改更新文件代码获取文件名方式
如果 (到数值 (本地版本) ≥ 到数值 (网络版本))
' 正常运行代码
运行 (取运行目录 () ＋ “\更新程序.EXE ” ＋ 网络版本 ＋ “|” ＋ 更新地址, 假, )
销毁 ()

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 网络版本, 文本型, , , 不能为空，否者更新程序闪退<br /> .程序集变量 本地版本, 文本型<br /> .程序集变量 更新地址, 文本型, , , 不能为空，否者更新程序闪退<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> 网络版本 ＝ “1.3”  ' 网络上获取到的版本信息（不能为空）<br /> 本地版本 ＝ 读配置项 (取运行目录 () ＋ “\game.ini”, “deploy”, “Version”, )<br /> 更新地址 ＝ “http://cydn.vip/update/CSgame.zip”  ' 你需要更新的压缩文件的地址（zip格式）根据网址信息 修改更新文件代码获取文件名方式<br /> .如果 (到数值 (本地版本) ≥ 到数值 (网络版本))<br />     ' 正常运行代码<br /> .否则<br />     运行 (取运行目录 () ＋ “\更新程序.EXE ” ＋ 网络版本 ＋ “|” ＋ 更新地址, 假, )<br />     销毁 ()

配置文件game.ini 就是一个简单的配置文件

[deploy]
Version=1.0

诚悦科技

采用的精易模块 其余支持库都是系自带

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
下载参数	任务参数
下载任务	下载对象
下载状态	整数型
下载信息	字节集
文件大小	双精度小数型
下载地址	文本型	0
文件名	文本型
版本号	文本型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

' 调用方法：启动更新  运行 (取运行目录 () ＋ “\更新程序.exe ” ＋ 网络版本 ＋ “|” ＋ 更新地址, 假, )
取命令行 (下载地址)
程序_禁止重复运行 (“sagdhjsadgfjdsfsdajfgsfasdklgfjasdkg”, 真, “程序已经运行，请勿重复打开”, #警告图标, )
如果 (取数组成员数 (下载地址) ≠ 1)
销毁 ()
文件名 ＝ “\” ＋ 文本_取右边 (下载地址 [1], “update/”, 1, )
版本号 ＝ 文本_取左边 (下载地址 [1], “|”, 1, )
下载参数.类型 ＝ #传送常量 .下载
下载参数.文件地址 ＝ 文本_取右边 (下载地址 [1], “|”, 1, )
下载参数.线程等待超时 ＝ 1000
下载参数.默认线程数 ＝ 5
下载参数.本地文件路径 ＝ 取运行目录 () ＋ 文件名
下载参数.连接超时 ＝ 5000
下载参数.发送超时 ＝ 5000
下载参数.接收超时 ＝ 10000
下载参数.接收大小 ＝ 10240
下载参数.交互回调函数 ＝ &交互回调函数
下载任务.增加新任务 (下载参数)
如果真 (文件是否存在 (取运行目录 () ＋ 文件名))
透明标签1.标题 ＝ “文件正在解压中，请稍后...”
删除文件 (取运行目录 () ＋ 文件名)
进程_终止进程 (“主程序.EXE”, )

子程序名	返回值类型	公开	备 注
交互回调函数	整数型
参数名	类 型	参考	可空	数组	备 注
消息类型	整数型
线程信息	整数型
参数3	整数型
参数4	整数型
对象信息	整数型

判断 (消息类型 ＝ #传送常量 .下载上传开始)
时钟1.时钟周期 ＝ 10
时钟2.时钟周期 ＝ 100
文件大小 ＝ 参数3
' 置文件属性 (取运行目录 () ＋ 文件名, 2)
判断 (消息类型 ＝ #传送常量 .下载上传结束)
时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 0
透明标签1.标题 ＝ “文件正在解压中，请稍后...”
ZIP压缩1.解压 (取运行目录 () ＋ 文件名, 取运行目录 () ＋ “\”)
延迟 (5000)
删除文件 (取运行目录 () ＋ 文件名)
透明标签1.标题 ＝ “文件更新完成”
运行 (取运行目录 () ＋ “\主程序.EXE”, 假, )
写配置项 (取运行目录 () ＋ “\game.ini”, “deploy”, “Version”, 版本号)
结束 ()
判断 (消息类型 ＝ #传送常量 .新下载线程启动)
判断 (消息类型 ＝ #传送常量 .下载线程继续下载)
判断 (消息类型 ＝ #传送常量 .线程正常结束)
判断 (消息类型 ＝ #传送常量 .线程异常结束)
时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 0
判断 (消息类型 ＝ #传送常量 .存在同名文件)
判断 (消息类型 ＝ #传送常量 .收到数据)
判断 (消息类型 ＝ #传送常量 .下载数据范围)



返回 (0)

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

进度条1.位置 ＝ 四舍五入 (下载任务.取已下载长 () ÷ 文件大小 × 100, 0)

子程序名	返回值类型	公开	备 注
_时钟2_周期事件

透明标签2.标题 ＝ 到文本 (四舍五入 (下载任务.取下载速度 () ÷ 1024, 2)) ＋ “ KB/s”
透明标签3.标题 ＝ 到文本 (四舍五入 (下载任务.取已下载长 () ÷ 文件大小 × 100, 0)) ＋ “%”

i支持库列表	支持库注释
downlib	网络传送支持库
CCTS	(未知支持库)
iext	扩展界面支持库一
eCompress	压缩解压支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 downlib<br /> .支持库 CCTS<br /> .支持库 iext<br /> .支持库 eCompress<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 下载参数, 任务参数<br /> .程序集变量 下载任务, 下载对象<br /> .程序集变量 下载状态, 整数型<br /> .程序集变量 下载信息, 字节集<br /> .程序集变量 文件大小, 双精度小数型<br /> .程序集变量 下载地址, 文本型, , "0"<br /> .程序集变量 文件名, 文本型<br /> .程序集变量 版本号, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> ' 调用方法：启动更新  运行 (取运行目录 () ＋ “\更新程序.exe ” ＋ 网络版本 ＋ “|” ＋ 更新地址, 假, )<br /> <br /> 取命令行 (下载地址)<br /> <br /> 程序_禁止重复运行 (“sagdhjsadgfjdsfsdajfgsfasdklgfjasdkg”, 真, “程序已经运行，请勿重复打开”, #警告图标, )<br /> .如果 (取数组成员数 (下载地址) ≠ 1)<br />     销毁 ()<br /> .否则<br />     文件名 ＝ “\” ＋ 文本_取右边 (下载地址 [1], “update/”, 1, )<br />     版本号 ＝ 文本_取左边 (下载地址 [1], “|”, 1, )<br />     下载参数.类型 ＝ #传送常量.下载<br />     下载参数.文件地址 ＝ 文本_取右边 (下载地址 [1], “|”, 1, )<br />     下载参数.线程等待超时 ＝ 1000<br />     下载参数.默认线程数 ＝ 5<br />     下载参数.本地文件路径 ＝ 取运行目录 () ＋ 文件名<br />     下载参数.连接超时 ＝ 5000<br />     下载参数.发送超时 ＝ 5000<br />     下载参数.接收超时 ＝ 10000<br />     下载参数.接收大小 ＝ 10240<br />     下载参数.交互回调函数 ＝ &交互回调函数<br />     下载任务.增加新任务 (下载参数)<br />     .如果真 (文件是否存在 (取运行目录 () ＋ 文件名))<br />         透明标签1.标题 ＝ “文件正在解压中，请稍后...”<br />         删除文件 (取运行目录 () ＋ 文件名)<br />     .如果真结束<br />     进程_终止进程 (“主程序.EXE”, )<br /> .如果结束<br /> <br /> <br /> .子程序 交互回调函数, 整数型<br /> .参数 消息类型, 整数型<br /> .参数 线程信息, 整数型<br /> .参数 参数3, 整数型<br /> .参数 参数4, 整数型<br /> .参数 对象信息, 整数型<br /> <br /> .判断开始 (消息类型 ＝ #传送常量.下载上传开始)<br />     时钟1.时钟周期 ＝ 10<br />     时钟2.时钟周期 ＝ 100<br />     文件大小 ＝ 参数3<br />     ' 置文件属性 (取运行目录 () ＋ 文件名, 2)<br /> .判断 (消息类型 ＝ #传送常量.下载上传结束)<br />     时钟1.时钟周期 ＝ 0<br />     时钟2.时钟周期 ＝ 0<br />     透明标签1.标题 ＝ “文件正在解压中，请稍后...”<br />     ZIP压缩1.解压 (取运行目录 () ＋ 文件名, 取运行目录 () ＋ “\”)<br />     延迟 (5000)<br />     删除文件 (取运行目录 () ＋ 文件名)<br /> <br />     透明标签1.标题 ＝ “文件更新完成”<br />     运行 (取运行目录 () ＋ “\主程序.EXE”, 假, )<br />     写配置项 (取运行目录 () ＋ “\game.ini”, “deploy”, “Version”, 版本号)<br />     结束 ()<br /> .判断 (消息类型 ＝ #传送常量.新下载线程启动)<br /> <br /> .判断 (消息类型 ＝ #传送常量.下载线程继续下载)<br /> <br /> .判断 (消息类型 ＝ #传送常量.线程正常结束)<br /> <br /> .判断 (消息类型 ＝ #传送常量.线程异常结束)<br />     时钟1.时钟周期 ＝ 0<br />     时钟2.时钟周期 ＝ 0<br /> .判断 (消息类型 ＝ #传送常量.存在同名文件)<br /> <br /> .判断 (消息类型 ＝ #传送常量.收到数据)<br /> <br /> .判断 (消息类型 ＝ #传送常量.下载数据范围)<br /> <br /> .默认<br /> <br /> .判断结束<br /> 返回 (0)<br /> <br /> <br /> .子程序 _时钟1_周期事件<br /> <br /> 进度条1.位置 ＝ 四舍五入 (下载任务.取已下载长 () ÷ 文件大小 × 100, 0)<br /> <br /> .子程序 _时钟2_周期事件<br /> <br /> 透明标签2.标题 ＝ 到文本 (四舍五入 (下载任务.取下载速度 () ÷ 1024, 2)) ＋ “ KB/s”<br /> 透明标签3.标题 ＝ 到文本 (四舍五入 (下载任务.取已下载长 () ÷ 文件大小 × 100, 0)) ＋ “%”

诚悦科技

主程序调用更新程序方法

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
网络版本	文本型		不能为空，否者更新程序闪退
本地版本	文本型
更新地址	文本型		不能为空，否者更新程序闪退

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

网络版本 ＝ “V1.3”  ' 网络上获取到的版本信息（不能为空）
本地版本 ＝ 读配置项 (取运行目录 () ＋ “\game.ini”, “deploy”, “Version”, )
更新地址 ＝ “”  ' 你需要更新的压缩文件的地址（zip格式）
如果 (到数值 (本地版本) ≥ 到数值 (网络版本))
' 正常运行代码
运行 (取运行目录 () ＋ “\更新程序.EXE ” ＋ 网络版本 ＋ “|” ＋ 更新地址, 假, )
销毁 ()

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 网络版本, 文本型, , , 不能为空，否者更新程序闪退<br /> .程序集变量 本地版本, 文本型<br /> .程序集变量 更新地址, 文本型, , , 不能为空，否者更新程序闪退<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> 网络版本 ＝ “V1.3”  ' 网络上获取到的版本信息（不能为空）<br /> 本地版本 ＝ 读配置项 (取运行目录 () ＋ “\game.ini”, “deploy”, “Version”, )<br /> 更新地址 ＝ “”  ' 你需要更新的压缩文件的地址（zip格式）<br /> .如果 (到数值 (本地版本) ≥ 到数值 (网络版本))<br />     ' 正常运行代码<br /> .否则<br />     运行 (取运行目录 () ＋ “\更新程序.EXE ” ＋ 网络版本 ＋ “|” ＋ 更新地址, 假, )<br />     销毁 ()<br /> .如果结束

诚悦科技

米拉珍 发表于 2023-7-2 21:59
少这个支持库

CCTS.zip (2.16 MB, 下载次数: 45)

2023-7-2 22:06 上传

点击文件名下载附件 ccts超级支持库


补充内容 (2023-7-6 15:36):
我也不知道怎么下载不了 应该是论坛的问题 这支持库全名叫：超级支持库 （49.3#5版） 我测试了 好像不要这个库也可以

wuyanqing187

        开源精神必须支持~

诚悦科技

善有善报 发表于 2023-11-4 19:11
你这个 远程版本号  怎么获取的？直接网络地址？

网络上 你设置好版本啊 主程序传递给升级程序

善有善报

你这个 远程版本号  怎么获取的？直接网络地址？

jia201314973

开源精神必须支持~

穷八代

支持多文件吗

shen110

诚悦科技 发表于 2023-7-2 22:06
ccts超级支持库

下载不了

淘客推荐

开源精神必须支持~

kantal

感谢分享。来支持一下

shuya1

感谢分享，很给力！~

淘客推荐

学习了 谢谢