json格式文本与普通格式文本相互转换

MrSean

{"mobile":"18866668888","dynamicCode":"666666","activity":"D11INVITE","invitationCode":"00G2stXu"}和
mobile=18866668888&dynamicCode=666666&activity=D11INVITE&invitationCode=00G2stXu互相转换用易语言怎么写




补充内容 (2020-12-13 19:16):
不用模块

补充内容 (2020-12-15 23:25):
有没有完美的写法?

616

有问题找其他人 好吧
0911.e (6.82 KB, 下载次数: 40)

2020-12-16 09:11 上传

点击文件名下载附件

chendipang

用json类遍历出全部的属性名拼接下就行了

瘦瘦的小四

替换大法?
":"  =
"," &

616

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
name	文本型		0
临时文本	文本型
i	整数型
j	整数型
t	文本型
bin	文本型		0
表单	文本型
Json	文本型

临时文本 ＝ 子文本替换 ( #常量1, #引号, , , , 真)
临时文本 ＝ 子文本替换 (临时文本, “{”, , , , 真)
临时文本 ＝ 子文本替换 (临时文本, “}”, , , , 真)
name ＝ 分割文本 (临时文本, “,”, )
计次循环首 (取数组成员数 (name), i)
变量循环首 (i ＋ 1, 取数组成员数 (name), 1, j)
如果真 (name [i] ＞ name [j])
t ＝ name [i]
name [i] ＝ name [j]
name [j] ＝ t

变量循环尾 ()
计次循环尾 ()
Json ＝ “{”
计次循环首 (取数组成员数 (name), i)
bin ＝ 分割文本 (name [i], “:”, )
表单 ＝ 表单 ＋ bin [1] ＋ “=” ＋ bin [2]
Json ＝ Json ＋ #引号 ＋ bin [1] ＋ #引号 ＋ “:” ＋ #引号 ＋ bin [2] ＋ #引号
如果真 (取数组成员数 (name) ≠ i)
表单 ＝ 表单 ＋ “&”
Json ＝ Json ＋ “,”
如果真 (取数组成员数 (name) ＝ i)
Json ＝ Json ＋ “}”

计次循环尾 ()
调试输出 (Json)
调试输出 (表单)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 name, 文本型, , "0"<br /> .局部变量 临时文本, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 t, 文本型<br /> .局部变量 bin, 文本型, , "0"<br /> .局部变量 表单, 文本型<br /> .局部变量 Json, 文本型<br /> <br /> 临时文本 ＝ 子文本替换 (#常量1, #引号, , , , 真)<br /> 临时文本 ＝ 子文本替换 (临时文本, “{”, , , , 真)<br /> 临时文本 ＝ 子文本替换 (临时文本, “}”, , , , 真)<br /> name ＝ 分割文本 (临时文本, “,”, )<br /> .计次循环首 (取数组成员数 (name), i)<br />     .变量循环首 (i ＋ 1, 取数组成员数 (name), 1, j)<br />         .如果真 (name <i> ＞ name [j])<br />             t ＝ name <i><br />             name <i> ＝ name [j]<br />             name [j] ＝ t<br />         .如果真结束<br /> <br />     .变量循环尾 ()<br /> .计次循环尾 ()<br /> Json ＝ “{”<br /> .计次循环首 (取数组成员数 (name), i)<br />     bin ＝ 分割文本 (name <i>, “:”, )<br />     表单 ＝ 表单 ＋ bin [1] ＋ “=” ＋ bin [2]<br />     Json ＝ Json ＋ #引号 ＋ bin [1] ＋ #引号 ＋ “:” ＋ #引号 ＋ bin [2] ＋ #引号<br />     .如果真 (取数组成员数 (name) ≠ i)<br />         表单 ＝ 表单 ＋ “&”<br />         Json ＝ Json ＋ “,”<br />     .如果真结束<br />     .如果真 (取数组成员数 (name) ＝ i)<br />         Json ＝ Json ＋ “}”<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 调试输出 (Json)<br /> 调试输出 (表单)

MrSean

wei615 发表于 2020-12-15 13:11
[e=3].版本 2
.支持库 spec

这个问题不需要排序,只需要json格式转成&拼接格式

616

你要完美写法，你掏出来 好吧

qq1056123185

就是个文本处理，不管是正则，还是分割替换，
结果对了就行呗，看楼主的要求，貌似比较完美。