刘136

多学习下

lishihai

求json解析源码

a34353

18543710630 发表于 2021-11-17 16:13
json我也不会哦

事件 多线程360_1.取网页源码2完毕(源码 为 文本型)
        源码 = 取文本中间(源码,寻找文本(源码,"{",0),取文本长度(源码)-倒找文本(源码,"}",0))
        变量 JSON对象1 为 对象
        变量 JSON对象2 为 对象
        变量 JSON对象3 为 对象
        变量 JSON对象4 为 对象
       
        变量 图片 为 文本型
        变量 标题 为 文本型
        变量 副标 为 文本型
        变量 地址 为 文本型
        变量 页码 为 整数型
       
        JSON对象1=JSON操作1.解析(源码)
        JSON对象2=JSON操作1.取对象(JSON对象1,"data")
       
        JSON对象3=JSON操作1.取数组(JSON对象2,"movies")
       
        变量 循环变量 为 整数型
        判断循环首 循环变量 < JSON操作1.取数组内成员数(JSON对象3)
                JSON对象4 =JSON操作1.取数组内对象(JSON对象3,循环变量)
                图片 ="http:" & JSON操作1.取文本值(JSON对象4 ,"cdncover")
                标题 = JSON操作1.取文本值(JSON对象4 ,"title")
                副标 = JSON操作1.取文本值(JSON对象4 ,"title")
                地址 = JSON操作1.取文本值(JSON对象4 ,"id")
               
                oktv图片列表1.添加项目(图片,标题,副标,地址)
                循环变量=循环变量+1
        判断循环尾
       
        翻页文本=取指定文本2(网站地址,"pageno=","&")
        如果 JSON操作1.取数组内成员数(JSON对象3) < 35 则
                翻页文本=""
                否则如果 翻页文本 > 19 则
                翻页文本=""
                否则
                页码=翻页文本 + 1
                翻页文本=子文本替换(网站地址,"pageno="&翻页文本,"pageno=" & 页码)
                网站地址=翻页文本
                '弹出提示(翻页文本)
        结束 如果
       
        如果 标签添加=假 则
                添加标签360(源码)
        结束 如果
'        解析文本360(源码)
结束 事件

a34353

lidacui215 发表于 2021-11-17 11:44
谢谢分享，膜拜大佬！

https://www.eruyi.cn/thread-11590-1-1.html

a34353

18543710630 发表于 2021-11-17 16:13
json我也不会哦

https://www.eruyi.cn/thread-11590-1-1.html

ccatd

电视，综艺，动漫 集数多的话就取不全地址的问题 如何解决啊

qin168

888888888888888888888

eyy

这个必须好评  

18543710630

ccatd 发表于 2021-11-20 13:08
电视，综艺，动漫 集数多的话就取不全地址的问题 如何解决啊

是怎样一个情况，获取不完整嘛？

18543710630

lishihai 发表于 2021-11-19 14:10
求json解析源码

看一下23楼哦，有坛友更新了。