软件更新系统完美支持多文件

易语言 2020-07-07 12:58:24

超级列表框1.全部删除 ()
数据组 = 分割文本 (到文本 (HTTP读文件 (url + “更新系统.asp?3=查询数据”)), “|々|”, )
.计次循环首 (取数组成员数 (数据组), i)
变量 = 变量 + 1
.如果真 (变量 ≥ 9)
编号 = 编号 + 1
行号 = 超级列表框1.插入表项 (, 到文本 (编号), , , , )
超级列表框1.置标题 (行号, 1, 数据组 [i - 8])
超级列表框1.置标题 (行号, 2, 数据组 [i - 7])
超级列表框1.置标题 (行号, 3, 数据组 [i - 6])
超级列表框1.置标题 (行号, 4, 数据组 [i - 5])
超级列表框1.置标题 (行号, 5, 数据组 [i - 4])
超级列表框1.置标题 (行号, 6, 数据组 [i - 3])
超级列表框1.置标题 (行号, 7, 数据组 [i - 2])
超级列表框1.置标题 (行号, 8, 数据组 [i - 1])
超级列表框1.置标题 (行号, 9, 数据组 [i])
变量 = 0
.如果真结束

.计次循环尾 ()