全自动安装及静默安装有托盘气泡提示进度

易语言 2020-08-14 11:41:07

全自动安装及静默安装有托盘气泡提示进度

.如果真 (进程_进程名是否存在 (磁盘_取文件短名 (#url))) ' 安装包不允许两个安装程序同时运行。
系统_信息框 (“另外一个安装程序已经在运行。”, #信息图标, “88”)
进程_结束_进程名 ()
.如果真结束
path = 磁盘_取桌面路径 () + “PaoPao8.exe”
.如果 (磁盘_文件是否存在 (path)) ' 如果文件存在就效验文件大小
size = 网络_取网络文件大小 (#url)
.如果 (磁盘_取文件尺寸 (path) = size)
AutoSetup (path)
.否则
.如果真 (进度下载 (#url, path))
AutoSetup (path)