求大神看看哪里有问题！点第5个视频以后的视频就闪退
本帖最后由 tutu 于 2021-7-14 13:44 编辑求大神看看哪里有问题！点第5个视频以后的视频就闪退
图片列表框1.初始化下载引擎(0,0,0,0,假)
图片列表框2.初始化下载引擎(0,0,0,0,假)
结束 事件
事件 多线程1.取网页源码完毕(源码 为 文本型)
变量 i 为 整数型
变量 截取 为 文本型 = 取指定文本2(源码, "<div class=\"row col5 clearfix\">","</div>")
变量 图片 为 文本型() = 取指定文本(截取,"<img class=\"nature\" src=\"","\" onerror=\"")
变量 标题 为 文本型() = 取指定文本(截取,"<h3>","</h3></a></dd>")
变量 地址 为 文本型() = 取指定文本(截取,"<dt><a href=\"/?m=vod-play-id-","-src-1-num-1.html\"")
变量循环首 i = 0 至 取数组成员数(图片)-1 步进 1
图片列表框1.添加项目(图片(i),标题(i))
图片列表框2.添加项目(图片(i),地址(i))
变量循环尾
结束 事件
事件 图片列表框1.表项被单击(项目索引 为 整数型)
编辑框1.内容 = 图片列表框2.取项目标题(项目索引)
多线程2.开始取网页源码2("http://e4192.com/?m=vod-play-id-" & 编辑框1.内容 & "-src-1-num-1.html","UTF-8")
标签1.标题= 图片列表框1.取项目标题(项目索引)
结束 事件
事件 多线程2.取网页源码2完毕(源码 为 文本型)
变量 截取1 为 文本型 = 取指定文本2(源码,"<div class=\"player\">","</div>")
变量 标题1 为 文本型() = 取指定文本(截取1,"('%u5728%u7ebf%u64ad%u653e%24https%3A%2F%2Fvip5.3sybf.com%2F20210120%2F","%2Findex.m3u8')")
变量 i 为 整数型 = 0
标签2.标题=("https://vip5.3sybf.com/20210120/"& 标题1(i) & "/index.m3u8")
浏览框1.跳转(标签2.标题)
结束 事件
页:
[1]
2