易_JSON模块，不费脑，简单、方便 V1.2。解析速度800M/s

a1401449265 · 发表于 4 天前

子程序名	返回值类型	公开	备注
易_JSON_演示

变量名	类型	静态	数组	备注
J	易_JSON
网络数据	文本型
i	整数型

' ================================
' 场景一：无中生有 (构建 JSON)
' ================================
' 目标：构建一个配置表
J.取 (“App”).置 (“E_JSON”)
J.取 (“Version”).置 (“1.0”)
' 亮点：路径自动补全，不用管中间节点存不存在
J.取 (“Config”).取 (“Theme”).置 (“Dark”)
' 亮点：数组操作 (创建对象数组)
' 方式A：先加空位，再赋值
J.取 (“Data”).加 ()
J.取 (“Data”).点 (0).取 (“id”).置 (“101”)
' 方式B：自动扩容 (直接点下标)
J.取 (“Data”).点 (1).取 (“id”).置 (“102”)
调试输出 (“【构建结果】”, J.到文本值 ())
' {"App":"E_JSON","Version":"1.0","Config":{"Theme":"Dark"},"Data":[{"id":"101"},{"id":"102"}]}
' ================================
' 场景二：数据处理 (解析 & 循环)
' ================================
' 模拟一段 API 返回的文本
网络数据＝ “{” ＋ #引号＋ “code” ＋ #引号＋ “:200, ” ＋ #引号＋ “list” ＋ #引号＋ “:[{” ＋ #引号＋ “name” ＋ #引号＋ “: ” ＋ #引号＋ “张三” ＋ #引号＋ “, ” ＋ #引号＋ “score” ＋ #引号＋ “:85}, {” ＋ #引号＋ “name” ＋ #引号＋ “: ” ＋ #引号＋ “李四” ＋ #引号＋ “, ” ＋ #引号＋ “score” ＋ #引号＋ “:99}]}”

如果真 (J.解析 (网络数据))

' 1. 直接提取

调试输出 (“状态码：”, J.取 (“code”).到整数值 ())

' 2. 循环读取数组

计次循环首 (J.取 (“list”).成员数 (), i)

' ?? 逻辑：list -> 第i个 -> name

' (注意：易语言循环从1开始，JSON下标从0开始，所以用点(i-1))

调试输出 (“姓名：”, J.取 (“list”).点 (i － 1).取 (“name”).到文本值 ())

调试输出 (“分数：”, J.取 (“list”).点 (i － 1).取 (“score”).到整数值 ())

计次循环尾 ()

' ================================
' 场景三：类型转换 & 删除
' ================================
J.取 (“is_admin”).置 (“true”)
' 直接转逻辑型

如果真 (J.取 (“is_admin”).到逻辑值 () ＝真)

调试输出 (“是管理员”)

' 删除功能
J.删除 (“App”, ) ' 删除对象属性
J.取 (“Data”).删除 (, 0) ' 删除数组第0个
调试输出 (“最终结果：”, J.到文本值 ())

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br />
.支持库 spec<br />
<br />
.子程序 易_JSON_演示<br />
.局部变量 J, 易_JSON<br />
.局部变量 网络数据, 文本型<br />
.局部变量 i, 整数型<br />
<br />
' ================================<br />
' 场景一：无中生有 (构建 JSON)<br />
' ================================<br />
' 目标：构建一个配置表<br />
J.取 (“App”).置 (“E_JSON”)<br />
J.取 (“Version”).置 (“1.0”)<br />
<br />
' 亮点：路径自动补全，不用管中间节点存不存在<br />
J.取 (“Config”).取 (“Theme”).置 (“Dark”)<br />
<br />
' 亮点：数组操作 (创建对象数组)<br />
' 方式A：先加空位，再赋值<br />
J.取 (“Data”).加 ()<br />
J.取 (“Data”).点 (0).取 (“id”).置 (“101”)<br />
<br />
' 方式B：自动扩容 (直接点下标)<br />
J.取 (“Data”).点 (1).取 (“id”).置 (“102”)<br />
<br />
调试输出 (“【构建结果】”, J.到文本值 ())<br />
<br />
' {"App":"E_JSON","Version":"1.0","Config":{"Theme":"Dark"},"Data":[{"id":"101"},{"id":"102"}]}<br />
<br />
<br />
' ================================<br />
' 场景二：数据处理 (解析 & 循环)<br />
' ================================<br />
' 模拟一段 API 返回的文本<br />
网络数据 ＝ “{” ＋ #引号 ＋ “code” ＋ #引号 ＋ “:200, ” ＋ #引号 ＋ “list” ＋ #引号 ＋ “:[{” ＋ #引号 ＋ “name” ＋ #引号 ＋ “: ” ＋ #引号 ＋ “张三” ＋ #引号 ＋ “, ” ＋ #引号 ＋ “score” ＋ #引号 ＋ “:85}, {” ＋ #引号 ＋ “name” ＋ #引号 ＋ “: ” ＋ #引号 ＋ “李四” ＋ #引号 ＋ “, ” ＋ #引号 ＋ “score” ＋ #引号 ＋ “:99}]}”<br />
<br />
.如果真 (J.解析 (网络数据))<br />
<br />
    ' 1. 直接提取<br />
    调试输出 (“状态码：”, J.取 (“code”).到整数值 ())<br />
<br />
    ' 2. 循环读取数组<br />
    .计次循环首 (J.取 (“list”).成员数 (), i)<br />
<br />
        ' ?? 逻辑：list -> 第i个 -> name<br />
        ' (注意：易语言循环从1开始，JSON下标从0开始，所以用 点(i-1))<br />
        调试输出 (“姓名：”, J.取 (“list”).点 (i － 1).取 (“name”).到文本值 ())<br />
        调试输出 (“分数：”, J.取 (“list”).点 (i － 1).取 (“score”).到整数值 ())<br />
<br />
    .计次循环尾 ()<br />
<br />
.如果真结束<br />
<br />
' ================================<br />
' 场景三：类型转换 & 删除<br />
' ================================<br />
J.取 (“is_admin”).置 (“true”)<br />
<br />
' 直接转逻辑型<br />
.如果真 (J.取 (“is_admin”).到逻辑值 () ＝ 真)<br />
    调试输出 (“是管理员”)<br />
.如果真结束<br />
<br />
' 删除功能<br />
J.删除 (“App”, )  ' 删除对象属性<br />
J.取 (“Data”).删除 (, 0)  ' 删除数组第0个<br />
<br />
调试输出 (“最终结果：”, J.到文本值 ())

版本v1.2
重写内核，速度达到800M/s

易_JSON.rar (62.81 KB, 下载次数: 48)