希望精易模块可以增加个字符串转JSON

q838210720

别跟我说用e2ee的键值表，个人感觉不好用，自己用易语言代码手写了个，能改进收录进模块最好啦这个功能非常实用，并且非常需要，建议增加

优化了下，支持拼接成url，用多了Python的字典转json和字典拼接url，现在这个代码可以实现同样的功能，非常好用，除非不做网络的程序否则可以说没人不需要

  

子程序名	返回值类型	公开	备 注
字符串转json	文本型
参数名	类 型	参考	可空	数组	备 注
a	文本型				key
b	文本型				value
data	文本型				组名字，填写后即添加到这个组里面
转url	逻辑型

变量名	类 型	静态	数组	备 注
arr	文本型		0	key[]
arra	文本型		0	value[]
n	整数型
i	整数型
x	整数型
json	文本型
j	类_json
text	类_快速文本

n ＝ 文本_分割文本 (a, “,”, , arr)
i ＝ 文本_分割文本 (b, “,”, , arra)
如果真 (n ≠ i)
返回 (“不好意思不对称”)
text.清空内容 ()
判断 (转url ＝ 假)
计次循环首 (n, x)
text.添加 ( #引号 ＋ arr [x] ＋ #引号 ＋ “:” ＋ #引号 ＋ arra [x] ＋ #引号 ＋ “,”)
计次循环尾 ()
json ＝ text.取文本 ()
判断 (data ＝ “”)
json ＝ “{” ＋ 取文本左边 (json, 取文本长度 (json) － 1) ＋ “}”
json ＝ “{” ＋ #引号 ＋ data ＋ #引号 ＋ “:[{” ＋ 取文本左边 (json, 取文本长度 (json) － 1) ＋ “}]}”



计次循环首 (n, x)
text.添加 (arr [x] ＋ “=” ＋ arra [x] ＋ “&”)
计次循环尾 ()
json ＝ text.取文本 ()
json ＝ 取文本左边 (json, 取文本长度 (json) － 1)

返回 (json)

.版本 2<br /> <br /> .子程序 字符串转json, 文本型<br /> .参数 a, 文本型, , key<br /> .参数 b, 文本型, , value<br /> .参数 data, 文本型, 可空, 组名字，填写后即添加到这个组里面<br /> .参数 转url, 逻辑型, 可空<br /> .局部变量 arr, 文本型, , "0", key[]<br /> .局部变量 arra, 文本型, , "0", value[]<br /> .局部变量 n, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 x, 整数型<br /> .局部变量 json, 文本型<br /> .局部变量 j, 类_json<br /> .局部变量 text, 类_快速文本<br /> <br /> n ＝ 文本_分割文本 (a, “,”, , arr)<br /> i ＝ 文本_分割文本 (b, “,”, , arra)<br /> .如果真 (n ≠ i)<br />     返回 (“不好意思不对称”)<br /> .如果真结束<br /> text.清空内容 ()<br /> .判断开始 (转url ＝ 假)<br />     .计次循环首 (n, x)<br />         text.添加 (#引号 ＋ arr [x] ＋ #引号 ＋ “:” ＋ #引号 ＋ arra [x] ＋ #引号 ＋ “,”)<br />     .计次循环尾 ()<br />     json ＝ text.取文本 ()<br />     .判断开始 (data ＝ “”)<br />         json ＝ “{” ＋ 取文本左边 (json, 取文本长度 (json) － 1) ＋ “}”<br />     .默认<br />         json ＝ “{” ＋ #引号 ＋ data ＋ #引号 ＋ “:[{” ＋ 取文本左边 (json, 取文本长度 (json) － 1) ＋ “}]}”<br />     .判断结束<br /> <br /> .默认<br /> <br />     .计次循环首 (n, x)<br />         text.添加 (arr [x] ＋ “=” ＋ arra [x] ＋ “&”)<br />     .计次循环尾 ()<br />     json ＝ text.取文本 ()<br />     json ＝ 取文本左边 (json, 取文本长度 (json) － 1)<br /> .判断结束<br /> <br /> 返回 (json)

字符串转json.e (872.38 KB, 下载次数: 8)

2021-4-23 00:13 上传

点击文件名下载附件

q838210720

lk1122 发表于 2021-4-23 09:36
萝卜白菜，各有所爱，我倒觉得1211挺好用的

e2ee先不说好不好用，软件体积就直接成倍增加，然后用起来不方便，你转的少是可以接受，你转几十条试试

lk1122

萝卜白菜，各有所爱，我倒觉得1211挺好用的

q838210720

希纱 发表于 2021-4-23 00:52
列表 / 键值表 难用 ?

个人觉得不好用，你觉得好用你就用

q838210720

语言EE 发表于 2021-4-23 01:12
类_json不是可以用嘛，多此一举

你是想太多

骑着王八追兔子1

数据多了难道要一个一个数着去对应位置吗

语言EE

类_json不是可以用嘛，多此一举

希纱

列表 / 键值表 难用 ?

大司命

个人需求不同！这种最好自己实现，不建议往模块里添加，我投反对票~