易安卓JSON解析问题

Mia

好久没接触易安卓了  忘得差不多了  
取地区  图片地址   添加到图片列表框
麻烦写个列子  





{"pingtai":[{"address":"昆明","qiqunh":"http://wx1.sinaimg.cn/mw690/006iJPGply1g67akl7wl3j305c05cjro.jpg","title":"\u756A\u8304\u793E\u533A","Number":"9"},{"address":"广西","qiqunh":"http://wx1.sinaimg.cn/mw690/006iJPGply1g67a3lpdb2j303d03d0sk.jpg","title":"\u4E03\u79D2\u9C7C\u76F4\u64AD","Number":"104"},{"address":"广州","qiqunh":"http://wx1.sinaimg.cn/mw690/006iJPGply1g67oqmgib3j3050050a9y.jpg","title":"\u82B1\u5983\u5B50\u76F4\u64AD","Number":"63"},{"address":"深圳","qiqunh":"http://wx1.sinaimg.cn/mw690/006iJPGply1g67aog9g22j305c05cgn6.jpg","title":"\u4E8C\u5AC2\u76F4\u64AD","Number":"17"},{"address":"东莞","qiqunh":"http://wx1.sinaimg.cn/mw690/006iJPGply1g6fgtjj9ksj30sg0sggr8.jpg","title":"\u53EF\u7231\u591A\u76F4\u64AD","Number":"36"},{"address":"大理","qiqunh":"http://wx1.sinaimg.cn/mw690/006iJPGply1g679yc0lwpj303c03cmx8.jpg","title":"\u5C0F\u5F64\u989C","Number":"61"},{"address":"湖北","qiqunh":"http://wx1.sinaimg.cn/mw690/006iJPGply1g6tn1mcpy0j30dw0dw0t6.jpg","title":"\u5C0F\u751C\u5FC3","Number":"8"},{"address":"湖南","qiqunh":"http://wx1.sinaimg.cn/mw690/006iJPGply1g6toq618qqj307g07g3yh.jpg","title":"\u4E48\u4E48\u76F4\u64AD","Number":"8"},{"address":"北京","qiqunh":"http://wx1.sinaimg.cn/mw690/006iJPGply1g67op1hxajj302c02ca9z.jpg","title":"\u5927\u6D6A\u76F4\u64AD","Number":"14"},{"address":"长沙","qiqunh":"http://wx1.sinaimg.cn/mw690/006iJPGply1g68bu94d02j30sg0sgq6a.jpg","title":"\u83E0\u841D\u793E\u533A","Number":"22"},{"address":"海南","qiqunh":"http://wx1.sinaimg.cn/mw690/006iJPGply1g70kp3bjz2j305c05cjri.jpg","title":"\u5C0F\u72D0\u72F8\u76F4\u64AD","Number":"33"},{"address":"安徽","qiqunh":"http://wx1.sinaimg.cn/mw690/006iJPGply1g6meup2bzlj30hs0hswma.jpg","title":"\u756A\u65D7\u793E\u533A","Number":"20"},{"address":"天津","qiqunh":"http://tva1.sinaimg.cn/large/007X8olVly1g7cr45b7kpj30n60n6k3u.jpg","title":"\u96C5\u7C73\u76F4\u64AD","Number":"4"},{"address":"浙江","qiqunh":"http://wx1.sinaimg.cn/mw690/006iJPGply1g70mf9p2z4j305c05ct9s.jpg","title":"\u5927\u6CE2\u6D6A\u76F4\u64AD","Number":"0"}]}

千洛兮

公用模块代码：
'这个是取单个数据
静态 函数 json(源码 为 文本型,类名 为 文本型)为 文本型
        变量 取出值 为 文本型
        源码 = UCS2解码(源码)
        取出值 = 取指定文本2(源码,代码转字符(34) & 类名 & 代码转字符(34) & ":" & 代码转字符(34) , 代码转字符(34))
        如果 取出值 = "" 则
                取出值 = 取指定文本2(源码,代码转字符(34) & 类名 & 代码转字符(34) & ":"  , ",")
        结束 如果
        如果 取出值 = "" 则
                取出值 = 取指定文本2(源码, 代码转字符(34) & 类名 & 代码转字符(34) & ":"  , "}")
        结束 如果
        如果 取出值 = "" 则
                取出值 = 取指定文本2(源码, 代码转字符(34) & 类名 & 代码转字符(34) & ":"  , "]")
        结束 如果
        json=取出值
结束 函数

'这个是取多个数组
        静态 函数 json2(源码 为 文本型,类名 为 文本型)为 文本型()
        变量 取出值 为 文本型()
        源码 = UCS2解码(源码)
        取出值 = 取指定文本(源码, 代码转字符(34) & 类名 & 代码转字符(34) & ":" & 代码转字符(34) , 代码转字符(34))
        如果 取数组成员数(取出值) = 0 则
                取出值 = 取指定文本(源码, 代码转字符(34) & 类名 & 代码转字符(34) & ":"  , ",")
        结束 如果
        如果 取数组成员数(取出值) = 0 则
                取出值 = 取指定文本(源码, 代码转字符(34) & 类名 & 代码转字符(34) & ":"  , "}")
        结束 如果
        如果 取数组成员数(取出值) = 0 则
                取出值 = 取指定文本(源码, 代码转字符(34) & 类名 & 代码转字符(34) & ":"  , "]")
        结束 如果
        json2=取出值
结束 函数

然后
单个数组使用 公用模块.json(源码,"XX")
多个数组使用 公用模块.json2(源码,"XX")

xx代表数组名

yudave

进来看看了解一下

zh2650307

我来看一下板凳。。。。。

duanyijun

看了一遍，不懂；又看了一遍，还是不懂