易语言的JSON解析，本人常用的方法 分享出来了

tiangang

需要引入精易3.7模块

BASIC
.版本 2
.支持库 spec

.子程序 获取直播列表
.参数 分类ID, 整数型
.参数 分页id, 整数型
.局部变量 列表, 文本型
.局部变量 i, 整数型
.局部变量 json, 类_json
.局部变量 sn, 文本型
.局部变量 聊天内容, 文本型


列表 ＝ 到文本 (网页_访问 (“http://sortType=0&callback=jQuery” ＋ 时间_取现行时间戳 () ＋ “&page=” ＋ 到文本 (分页id) ＋ “&count=16&category=” ＋ 到文本 (分类ID) ＋ “&from=mpc_ipcam_web&_=” ＋ 时间_取现行时间戳 () ＋ “”, 0, , , , , , , ))
列表 ＝ 文本_取出中间文本 (列表, “({”, “})”)
json.解析 (“{” ＋ 列表 ＋ “}”)
' 调试输出 (列表)
列表总数 ＝ json.取属性 (“devices”).成员数 ()
.变量循环首 (1, json.取属性 (“devices”).成员数 (), 1, i)
    sn ＝ 子文本替换 (json.取通用属性 (“devices[” ＋ 到文本 (i － 1) ＋ “].sn”), #引号, , , , 真)
    totalNum ＝ 子文本替换 (json.取通用属性 (“totalNum”), #引号, , , , 真)
    延迟 (1)
    处理事件 ()

    ' 调试输出 (totalNum)
    组合框2.加入项目 (sn, 到整数 (sn))
.变量循环尾 ()
组合框2.现行选中项 ＝ 0