易语言数组转JSON 和 JSON转数组

疯狂的猿猴

1. $content = [
   
2. "store_name"=>"Kafka"
   
3. ];
   
4. $data = json_encode($content);

复制代码

PHP里面 可以直接把数组转为JSON格式
请问如何在易语言里面实现 数组转JSON ，JSON转数组

例如以下数组
* 数组:5{“app_id=20181026172102149400”,“method=openapi.payment.store.query”,“format=json”,“sign_method=md5”,“nonce=123484697”}
或
* 数组:10{“app_id”,“20181026172102149400”,“method”,“openapi.payment.store.query”,“format”,“json”,“sign_method”,“md5”,“nonce”,“123460878”}

花一村

.版本 2

.程序集 窗口程序集_启动窗口
.程序集变量 json, 类_Json
.程序集变量 _json, 类_Json

.子程序 __启动窗口_创建完毕

json.置属性数值 (“int”, 20161020.2041)  ' 基本演示
json.置属性 (“Text”, “测试文本”, )
编辑框1.内容 ＝ json.取数据文本 ()

.子程序 _按钮1_被单击

' 成员演示
json.清除 ()
_json.清除 ()
_json.置属性 (“test”, “测试1”, )
json.加成员 (_json.取数据文本 (), “成员”, 真)
_json.清除 ()
_json.置属性 (“test”, “测试2”, )
json.加成员 (_json.取数据文本 (), “成员”, 真)
_json.清除 ()
_json.置属性 (“test”, “测试3”, )
json.加成员 (_json.取数据文本 (), “成员”, 真)
编辑框1.内容 ＝ json.取数据文本 ()
' 编辑框1.内容 ＝ 子文本替换 (编辑框1.内容, “\”, “”, , , 真)


补充内容 (2018-11-20 13:57):
https://bbs.125.la/thread-13949150-1-1.html

花一村

参考https://bbs.125.la/forum.php?mod=viewthread&tid=14255381&highlight=json

zl2017

.版本 2
.支持库 spec

.子程序 _按钮1_被单击
.局部变量 json, 类_json
.局部变量 临json, 类_json
.局部变量 数组, 文本型, , "0"
.局部变量 i, 整数型

数组 ＝ { “a”, “2”, “b”, “4” }
.计次循环首 (4 ÷ 2, i)
    临json.置属性 (数组 [2 × i － 1], 数组 [2 × i], )
.计次循环尾 ()
调试输出 (临json.取数据文本 ())
json.置成员 (0, 临json.取数据文本 (), )
调试输出 (json.取数据文本 ())

寒潮

json.e (757.63 KB, 下载次数: 53)

2018-11-20 16:31 上传

点击文件名下载附件