BaiyeGG 发表于 2020-1-23 10:23:28

e4a怎么取视频网站的视频啊？

https://www.51zxw.net/List.aspx?cid=28就比如取这个网站的视频，怎么一列一列的取到图片列表框里面？这是我自己写的一个代码，但打开就闪退，我发现 了是判断循环首的问题，但我不会。。。。能帮我解决的，或给我写个案例的，可以加我QQ,我可以另外加钱。

shayu 发表于 2020-1-23 10:23:29

https://www.lanzous.com/i8tucva

BaiyeGG 发表于 2020-1-23 10:24:36

事件 主窗口.创建完毕()

        多线程1.开始取网页源码2("https://www.51zxw.net/List.aspx?cid=351","utf-8")
        置附加协议头("user-agent: Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/65.0.3314.0 Safari/537.36 ")
结束 事件

        变量 引号 为 文本型
       
事件 多线程1.取网页源码2完毕(源码 为 文本型)
        引号=标签1.标题
        变量 全部 为 文本型
        变量 取到 为 文本型
        变量 停止 为 文本型
        变量 标题 为 文本型
        变量 海报 为 文本型
        变量 地址 为 文本型
        停止=假
        全部=取中间文本(源码,"<!--课程列表-->","<!--脚本-->")
        判断循环首 停止=假
                取到=取中间文本(全部,"<a target","过</div> </a>")
          标题=取中间文本(取到,"xt-l"& 引号 & ">","</div> <div")
          海报=取中间文本(取到,"<img src="& 引号,引号)
                图片列表框1.添加项目(海报,标题)
                图片列表框1.置项目标记(图片列表框1.取项目数()-1,地址)
          地址="https://www.51zxw.net" & 取中间文本(全部,"href="&引号,引号)
                全部=子文本替换(全部,"<a target" & 取到 & "过</div> </a>","")
                如果 寻找文本(全部,"<a target",0)=-1 则
                        停止=真
                结束 如果
        判断循环尾
结束 事件

BaiyeGG 发表于 2020-1-23 10:25:10

我QQ2565204707

yudave 发表于 2020-1-23 10:31:12

进来看看了解一下

chengwei5714869 发表于 2020-1-23 10:57:12

没啥难度吧，可能你写的不对

BaiyeGG 发表于 2020-1-23 13:38:44

shayu 发表于 2020-1-23 10:23
https://www.lanzous.com/i8tucva

谢谢大佬
页: [1]
查看完整版本: e4a怎么取视频网站的视频啊？