求助大神，把这个变成json格式的。。。

xiaoyu1986

下面这段玩意，变成json格式的怎么弄？用啥模块？求助论坛各个大神伸出援助之后助我一飞冲天~

count=365&userInput="计划数量."&totalSum=x&isValid=true&dataList=001&maxLimit=999&currentIndex=100&responseData=res

shiguang2018

  

变量名	类 型	静态	数组	备 注
json	zyJsonValue
计划数量	文本型
data	文本型

' zyJson 模块
' 数据类型不确定,你这个看起来是个表单数据
' count=365&userInput="计划数量."&totalSum=x&isValid=true&dataList=001&maxLimit=999¤tIndex=100&responseData=res
json.创建 (, , , , )
json.置文本 (“count”, “365”)
' json.置整数 (“count”, 365)
json.置文本 (“userInput”, 计划数量)
' json.置整数 (“&userInput”, 计划数量)
json.置文本 (“totalSum”, “x”)
json.置逻辑 (“isValid”, 真)
json.置文本 (“dataList”, “001”)
json.置文本 (“maxLimit”, “999”)
' json.置整数 (“maxLimit”, 999)
json.置整数 (“currentIndex”, 100)
json.置文本 (“currentIndex”, “100”)
json.置文本 (“responseData”, “res”)
data ＝ json.到文本 (, , , )
调试输出 (data)
' 下面是结果
' {"count":"365","userInput":"","totalSum":"x","isValid":true,"dataList":"001","maxLimit":"999","currentIndex":"100","responseData":"res"}

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

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 json, zyJsonValue<br /> .局部变量 计划数量, 文本型<br /> .局部变量 data, 文本型<br /> <br /> ' zyJson 模块<br /> ' 数据类型不确定,你这个看起来是个表单数据<br /> ' count=365&userInput="计划数量."&totalSum=x&isValid=true&dataList=001&maxLimit=999¤tIndex=100&responseData=res<br /> json.创建 (, , , , )<br /> json.置文本 (“count”, “365”)<br /> ' json.置整数 (“count”, 365)<br /> json.置文本 (“userInput”, 计划数量)<br /> ' json.置整数 (“&userInput”, 计划数量)<br /> json.置文本 (“totalSum”, “x”)<br /> json.置逻辑 (“isValid”, 真)<br /> json.置文本 (“dataList”, “001”)<br /> json.置文本 (“maxLimit”, “999”)<br /> ' json.置整数 (“maxLimit”, 999)<br /> json.置整数 (“currentIndex”, 100)<br /> json.置文本 (“currentIndex”, “100”)<br /> json.置文本 (“responseData”, “res”)<br /> data ＝ json.到文本 (, , , )<br /> 调试输出 (data)<br /> ' 下面是结果<br /> ' {"count":"365","userInput":"","totalSum":"x","isValid":true,"dataList":"001","maxLimit":"999","currentIndex":"100","responseData":"res"}

补充内容 (2025-5-2 22:17):
有啥项目带带弟弟呗,技术包专业哦

随心o

使用精易模块

  

变量名	类 型	静态	数组	备 注
add	类_POST数据类

add.添加_批量 ( #常量1, )  ' 常量1 就是你那段文本
调试输出 (add.获取JSON文本 ())

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

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 add, 类_POST数据类<br /> <br /> add.添加_批量 (#常量1, )  ' 常量1 就是你那段文本<br /> 调试输出 (add.获取JSON文本 ())

随心o

.版本 2
.支持库 spec

.局部变量 add, 类_POST数据类

add.添加_批量 (#常量1, )  ' 常量1 就是你那段文本
调试输出 (add.获取JSON文本 ())

随心o

123.e (955.73 KB, 下载次数: 9)

2025-5-2 21:43 上传

点击文件名下载附件

补充内容 (2025-5-2 21:44):
精易模块即可，两行代码

xiaoyu1986

随心o 发表于 2025-5-2 21:43
补充内容 (2025-5-2 21:44):
精易模块即可，两行代码

count=365&userInput="计划数量"&totalSum=x&isValid=true&dataList=001&maxLimit=999&currentIndex=100&responseData=res

忘了说了，currentIndex是整数型。

shiguang2018

shiguang2018 发表于 2025-5-2 21:54
[e=0].版本 2
.支持库 spec

多了 json.置文本 (“currentIndex”, “100”)  直接删除,其他的数据类型要你自己确认

zainex

正则取出 key-value，然后用 类_json 创建：

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

变量名	类 型	静态	数组	备 注
文本	文本型
json	类_json
正则	正则表达式
搜索结果	搜索结果		0
数	整数型
属性名	文本型
值	文本型

文本 ＝ #常量1
正则.创建 (“([^&=]+)=([^&]+)”, )
搜索结果 ＝ 正则.搜索全部 (文本)
计次循环首 (取数组成员数 (搜索结果), 数)
属性名 ＝ 搜索结果 [数].取子匹配文本 (文本, 1, )
值 ＝ 搜索结果 [数].取子匹配文本 (文本, 2, )
如果真 (取文本左边 (值, 1) ＝ #引号 )
值 ＝ 取文本中间 (值, 2, 取文本长度 (值) － 2)
如果真 (json.置属性对象 (属性名, 值) ＝ 假)
json.置属性 (属性名, 值)

计次循环尾 ()
调试输出 ( #换行符 ＋ 子文本替换 (网页_JS格式化 (json.取数据文本 ()), 字符 (10), #换行符, , , 真))

i支持库列表	支持库注释
RegEx	正则表达式支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 RegEx<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 文本, 文本型<br /> .局部变量 json, 类_json<br /> .局部变量 正则, 正则表达式<br /> .局部变量 搜索结果, 搜索结果, , "0"<br /> .局部变量 数, 整数型<br /> .局部变量 属性名, 文本型<br /> .局部变量 值, 文本型<br /> <br /> 文本 ＝ #常量1<br /> 正则.创建 (“([^&=]+)=([^&]+)”, )<br /> 搜索结果 ＝ 正则.搜索全部 (文本)<br /> .计次循环首 (取数组成员数 (搜索结果), 数)<br />     属性名 ＝ 搜索结果 [数].取子匹配文本 (文本, 1, )<br />     值 ＝ 搜索结果 [数].取子匹配文本 (文本, 2, )<br />     .如果真 (取文本左边 (值, 1) ＝ #引号)<br />         值 ＝ 取文本中间 (值, 2, 取文本长度 (值) － 2)<br />     .如果真结束<br />     .如果真 (json.置属性对象 (属性名, 值) ＝ 假)<br />         json.置属性 (属性名, 值)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 调试输出 (#换行符 ＋ 子文本替换 (网页_JS格式化 (json.取数据文本 ()), 字符 (10), #换行符, , , 真))