在来求一个范例

戒卜掉思恋

1. {
   
2. "code": 0,
   
3. "subcode": 0,
   
4. "message": "",
   
5. "default": 0,
   
6. "data": {
   
7. "attach_info": "",
   
8. "auto_load": 0,
   
9. "has_more": 0,
   
10. "remain_count": 0,
    
11. "vFeeds": [
    
12. {
    
13. "cell_template": {
    
14. "id": ""
    
15. },
    
16. "comm": {
    
17. "actiontype": 0,
    
18. "actionurl": "",
    
19. "appid": 4,
    
20. "curlikekey": "",
    
21. "feedskey": "V10bg2EC3YpnM1",
    
22. "feedstype": 0,
    
23. "fs_feedtype": 0,
    
24. "operatemask": 229391,
    
25. "orglikekey": "",
    
26. "originaltype": 0,
    
27. "refer": "",
    
28. "subid": 0,
    
29. "time": 0
    
30. },
    
31. "operation": {
    
32. "busi_param": {
    
33. "16": "2"
    
34. },
    
35. "share_info": {
    
36. "photo": null,
    
37. "summary": "",
    
38. "title": ""
    
39. }
    
40. },
    
41. "pic": {
    
42. "albumanswer": "",
    
43. "albumid": "V10bg2EC3YpnM1",
    
44. "albumname": "成都安仁古镇",
    
45. "albumnum": 65,
    
46. "albumquestion": "",
    
47. "albumrights": 1,
    
48. "allow_access": 1,
    
49. "anonymity": 2,
    
50. "balbum": 1,
    
51. "busi_param": null,
    
52. "desc": " ",
    
53. "lastupdatetime": 1440930218,
    
54. "picdata": [
    
55. {
    
56. "busi_param": {
    
57. "6": "http://user.qzone.qq.com/1327840813/photo/V10bg2EC3YpnM1/NDR0LT4lT2LZ4lWeZjAhBAAAAAAAAAA!"
    
58. },
    
59. "clientkey": "",
    
60. "commentcount": 0,
    
61. "desc": "",
    
62. "isIndependentUgc": 0,
    
63. "ismylike": 0,
    
64. "lloc": "",
    
65. "opsynflag": 0,
    
66. "photourl": {
    
67. "0": {
    
68. "height": 0,
    
69. "url": "http://m.qpic.cn/psb?/V10bg2EC3YpnM1/yQM4S.G48QiffAt.qDS3PMMrXpt9X2E8SRbQ7f37Nao!/b/dAQAAAAAAAAA&ek=1&kp=1&pt=0&su=0192219905&sce=0-12-12&rf=4-0",
    
70. "width": 0
    
71. },
    
72. "1": {
    
73. "height": 0,
    
74. "url": "http://m.qpic.cn/psb?/V10bg2EC3YpnM1/yQM4S.G48QiffAt.qDS3PMMrXpt9X2E8SRbQ7f37Nao!/b/dAQAAAAAAAAA&ek=1&kp=1&pt=0&su=0192219905&sce=0-12-12&rf=4-0",
    
75. "width": 0
    
76. },
    
77. "2": {
    
78. "height": 0,
    
79. "url": "http://m.qpic.cn/psb?/V10bg2EC3YpnM1/yQM4S.G48QiffAt.qDS3PMMrXpt9X2E8SRbQ7f37Nao!/c/dAQAAAAAAAAA&ek=1&kp=1&pt=0&su=0192219905&sce=0-12-12&rf=4-0",
    
80. "width": 0
    
81. },
    
82. "3": {
    
83. "height": 0,
    
84. "url": "http://m.qpic.cn/psb?/V10bg2EC3YpnM1/yQM4S.G48QiffAt.qDS3PMMrXpt9X2E8SRbQ7f37Nao!/m/dAQAAAAAAAAA&ek=1&kp=1&pt=0&su=0192219905&sce=0-12-12&rf=4-0",
    
85. "width": 0
    
86. },
    
87. "4": {
    
88. "height": 0,
    
89. "url": "http://m.qpic.cn/psb?/V10bg2EC3YpnM1/yQM4S.G48QiffAt.qDS3PMMrXpt9X2E8SRbQ7f37Nao!/m/dAQAAAAAAAAA&ek=1&kp=1&pt=0&su=0192219905&sce=0-12-12&rf=4-0",
    
90. "width": 0
    
91. }
    
92. },
    
93. "picname": "",
    
94. "shoottime": 0,
    
95. "sloc": "",
    
96. "type": 0,
    
97. "uUploadTime": 0
    
98. }
    
99. ],
    
100. "picdata_index": 0,
     
101. "uin": "1327840813",
     
102. "uploadnum": 0
     
103. }
     
104. },
     
105. {
     
106. "cell_template": {
     
107. "id": ""
     
108. },
     
109. "comm": {
     
110. "actiontype": 0,
     
111. "actionurl": "",
     
112. "appid": 4,
     
113. "curlikekey": "",
     
114. "feedskey": "V10bg2EC0k7Of1",
     
115. "feedstype": 0,
     
116. "fs_feedtype": 0,
     
117. "operatemask": 229391,
     
118. "orglikekey": "",
     
119. "originaltype": 0,
     
120. "refer": "",
     
121. "subid": 0,
     
122. "time": 0
     
123. },
     
124. "operation": {
     
125. "busi_param": {
     
126. "16": "2"
     
127. },
     
128. "share_info": {
     
129. "photo": null,
     
130. "summary": "",
     
131. "title": ""
     
132. }
     
133. },
     
134. "pic": {
     
135. "albumanswer": "",
     
136. "albumid": "V10bg2EC0k7Of1",
     
137. "albumname": "军人",
     
138. "albumnum": 124,
     
139. "albumquestion": "",
     
140. "albumrights": 1,
     
141. "allow_access": 1,
     
142. "anonymity": 0,
     
143. "balbum": 1,
     
144. "busi_param": null,
     
145. "desc": "",
     
146. "lastupdatetime": 1377361024,
     
147. "picdata": [
     
148. {
     
149. "busi_param": {
     
150. "6": "http://user.qzone.qq.com/1327840813/photo/V10bg2EC0k7Of1/NDJ0LT4lT57aGFIYGRAAnOpeo50UAAA!"
     
151. },
     
152. "clientkey": "",
     
153. "commentcount": 0,
     
154. "desc": "",
     
155. "isIndependentUgc": 0,
     
156. "ismylike": 0,
     
157. "lloc": "",
     
158. "opsynflag": 0,
     
159. "photourl": {
     
160. "0": {
     
161. "height": 0,
     
162. "url": "http://b274.photo.store.qq.com/psb?/V10bg2EC0k7Of1/o1b817.IQ06U7psNJhPwu9R43WxUHoPloWO.hm47Wb4!/b/dJzqXqOdFAAA&ek=1&kp=1&pt=0&su=0205992737&sce=0-12-12&rf=4-0",
     
163. "width": 0
     
164. },
     
165. "1": {
     
166. "height": 0,
     
167. "url": "http://b274.photo.store.qq.com/psb?/V10bg2EC0k7Of1/o1b817.IQ06U7psNJhPwu9R43WxUHoPloWO.hm47Wb4!/b/dJzqXqOdFAAA&ek=1&kp=1&pt=0&su=0205992737&sce=0-12-12&rf=4-0",
     
168. "width": 0
     
169. },
     
170. "2": {
     
171. "height": 0,
     
172. "url": "http://b274.photo.store.qq.com/psb?/V10bg2EC0k7Of1/o1b817.IQ06U7psNJhPwu9R43WxUHoPloWO.hm47Wb4!/c/dJzqXqOdFAAA&ek=1&kp=1&pt=0&su=0205992737&sce=0-12-12&rf=4-0",
     
173. "width": 0
     
174. },
     
175. "3": {
     
176. "height": 0,
     
177. "url": "http://b274.photo.store.qq.com/psb?/V10bg2EC0k7Of1/o1b817.IQ06U7psNJhPwu9R43WxUHoPloWO.hm47Wb4!/m/dJzqXqOdFAAA&ek=1&kp=1&pt=0&su=0205992737&sce=0-12-12&rf=4-0",
     
178. "width": 0
     
179. },
     
180. "4": {
     
181. "height": 0,
     
182. "url": "http://b274.photo.store.qq.com/psb?/V10bg2EC0k7Of1/o1b817.IQ06U7psNJhPwu9R43WxUHoPloWO.hm47Wb4!/m/dJzqXqOdFAAA&ek=1&kp=1&pt=0&su=0205992737&sce=0-12-12&rf=4-0",
     
183. "width": 0
     
184. }
     
185. },
     
186. "picname": "",
     
187. "shoottime": 0,
     
188. "sloc": "",
     
189. "type": 0,
     
190. "uUploadTime": 0
     
191. }
     
192. ],
     
193. "picdata_index": 0,
     
194. "uin": "1327840813",
     
195. "uploadnum": 0
     
196. }
     
197. }
     
198. ]
     
199. }
     
200. }

复制代码

再来求一个json的解析范例

80ww

.版本 2

.程序集 窗口程序集_启动窗口
.程序集变量 json数据, 文本型

.子程序 __启动窗口_创建完毕
    ' 这里使用你提供的JSON数据(简化版)
    json数据 ＝ #常量1 ' 将完整JSON放入常量1中
   
    ' 解析JSON数据
    解析QQ相册数据(json数据)

.子程序 解析QQ相册数据
.参数 json文本, 文本型
    变量 json, 类_json
    变量 相册数量, 整数型
    变量 i, 整数型
   
    ' 创建JSON对象
    如果(json.解析(json文本) ＝ 假)
        信息框("JSON解析失败!", 0, , )
        返回
    .如果结束
   
    ' 检查基本状态
    如果(json.取通用属性("code") ≠ "0")
        信息框("返回状态错误: " ＋ json.取通用属性("message"), 0, , )
        返回
    .如果结束
   
    ' 获取相册列表
    相册数量 ＝ json.取成员数("data.vFeeds")
    编辑框1.加入文本("共找到" ＋ 到文本(相册数量) ＋ "个相册" ＋ #换行符 ＋ #换行符)
   
    ' 遍历每个相册
    计次循环首(相册数量, i)
        变量 相册名称, 文本型
        变量 相册ID, 文本型
        变量 照片数量, 整数型
        变量 封面图, 文本型
        
        ' 获取相册基本信息
        相册名称 ＝ json.取通用属性("data.vFeeds[" ＋ 到文本(i－1) ＋ "].pic.albumname")
        相册ID ＝ json.取通用属性("data.vFeeds[" ＋ 到文本(i－1) ＋ "].pic.albumid")
        照片数量 ＝ 到整数(json.取通用属性("data.vFeeds[" ＋ 到文本(i－1) ＋ "].pic.albumnum"))
        
        ' 获取封面图URL(取第一个可用尺寸)
        封面图 ＝ json.取通用属性("data.vFeeds[" ＋ 到文本(i－1) ＋ "].pic.picdata[0].photourl['0'].url")
        如果(封面图 ＝ "")
            封面图 ＝ json.取通用属性("data.vFeeds[" ＋ 到文本(i－1) ＋ "].pic.picdata[0].photourl['1'].url")
        .如果结束
        
        ' 输出相册信息
        编辑框1.加入文本("相册" ＋ 到文本(i) ＋ ": " ＋ 相册名称 ＋ #换行符)
        编辑框1.加入文本("相册ID: " ＋ 相册ID ＋ #换行符)
        编辑框1.加入文本("照片数量: " ＋ 到文本(照片数量) ＋ #换行符)
        编辑框1.加入文本("封面图URL: " ＋ 封面图 ＋ #换行符)
        编辑框1.加入文本(#换行符)
    计次循环尾()

.子程序 _按钮解析_被单击
    解析QQ相册数据(json数据)
使用说明
需要添加以下组件：

一个编辑框(编辑框1)用于显示解析结果

一个按钮(按钮解析)用于触发解析

需要将完整的JSON数据放入程序常量中：

在易语言IDE中点击"插入"->"常量"

新建一个常量(如常量1)，将JSON数据粘贴进去

需要引用"类_json"：

易语言5.9及以上版本自带JSON解析支持

如果版本较旧，可以从网上下载"类_json"模块导入

80ww

.版本 2

.程序集 窗口程序集_启动窗口
.程序集变量 json数据, 文本型

.子程序 __启动窗口_创建完毕
    ' 这里使用你提供的JSON数据(简化版)
    json数据 ＝ #常量1 ' 将完整JSON放入常量1中
   
    ' 解析JSON数据
    解析QQ相册数据(json数据)

.子程序 解析QQ相册数据
.参数 json文本, 文本型
    变量 json, 类_json
    变量 相册数量, 整数型
    变量 i, 整数型
   
    ' 创建JSON对象
    如果(json.解析(json文本) ＝ 假)
        信息框("JSON解析失败!", 0, , )
        返回
    .如果结束
   
    ' 检查基本状态
    如果(json.取通用属性("code") ≠ "0")
        信息框("返回状态错误: " ＋ json.取通用属性("message"), 0, , )
        返回
    .如果结束
   
    ' 获取相册列表
    相册数量 ＝ json.取成员数("data.vFeeds")
    编辑框1.加入文本("共找到" ＋ 到文本(相册数量) ＋ "个相册" ＋ #换行符 ＋ #换行符)
   
    ' 遍历每个相册
    计次循环首(相册数量, i)
        变量 相册名称, 文本型
        变量 相册ID, 文本型
        变量 照片数量, 整数型
        变量 封面图, 文本型
        
        ' 获取相册基本信息
        相册名称 ＝ json.取通用属性("data.vFeeds[" ＋ 到文本(i－1) ＋ "].pic.albumname")
        相册ID ＝ json.取通用属性("data.vFeeds[" ＋ 到文本(i－1) ＋ "].pic.albumid")
        照片数量 ＝ 到整数(json.取通用属性("data.vFeeds[" ＋ 到文本(i－1) ＋ "].pic.albumnum"))
        
        ' 获取封面图URL(取第一个可用尺寸)
        封面图 ＝ json.取通用属性("data.vFeeds[" ＋ 到文本(i－1) ＋ "].pic.picdata[0].photourl['0'].url")
        如果(封面图 ＝ "")
            封面图 ＝ json.取通用属性("data.vFeeds[" ＋ 到文本(i－1) ＋ "].pic.picdata[0].photourl['1'].url")
        .如果结束
        
        ' 输出相册信息
        编辑框1.加入文本("相册" ＋ 到文本(i) ＋ ": " ＋ 相册名称 ＋ #换行符)
        编辑框1.加入文本("相册ID: " ＋ 相册ID ＋ #换行符)
        编辑框1.加入文本("照片数量: " ＋ 到文本(照片数量) ＋ #换行符)
        编辑框1.加入文本("封面图URL: " ＋ 封面图 ＋ #换行符)
        编辑框1.加入文本(#换行符)
    计次循环尾()

.子程序 _按钮解析_被单击
    解析QQ相册数据(json数据)
使用说明
需要添加以下组件：

一个编辑框(编辑框1)用于显示解析结果

一个按钮(按钮解析)用于触发解析

需要将完整的JSON数据放入程序常量中：

在易语言IDE中点击"插入"->"常量"

新建一个常量(如常量1)，将JSON数据粘贴进去

需要引用"类_json"：

易语言5.9及以上版本自带JSON解析支持

如果版本较旧，可以从网上下载"类_json"模块导入