精易论坛

标题: 【在线等】怎样获取这个网页上搜索框搜索结果的源码？ [打印本页]

---

作者: hhwxyhh    时间: 2025-1-21 23:25
标题: 【在线等】怎样获取这个网页上搜索框搜索结果的源码？
https://tonkiang.us/，这个网页是搜索电视直播源的，怎样用易语言获取搜索结果的的网页内容？比如搜索CCTV1，如图，有大佬给个源码？



补充内容 (2025-1-22 11:34):
点击搜索之后，下面不是有很多搜索结果页面嘛，取第二页试试

---

作者: 兰迪Randy    时间: 2025-1-21 23:37
网址打不开？？

---

作者: 源于互联    时间: 2025-1-22 00:26
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: 单指1    时间: 2025-1-22 01:40
.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕

线程_启动_文本型 (到整数 (&匹配播放地址), , , “CCTV”, “9”, , , , , , , , )

.子程序 匹配播放地址
.参数 搜索内容, 文本型
.参数 页码, 文本型
.局部变量 网页内容, 文本型
.局部变量 播放链接数组, 文本型, , "0"
.局部变量 正则表达式, 正则表达式类
.局部变量 i, 整数型
.局部变量 播放地址, 文本型

网页内容 ＝ 网页_访问S (“https://tonkiang.us/?page=” ＋ 页码 ＋ “&iptv=” ＋ 编码_URL编码 (搜索内容, , 真) ＋ “&l=0”, 0, , , , , , , , , , , , , , , , , , , )
正则表达式.创建 (“<tba[^>]*>([^<]+)</tba>”, 网页内容, , , , )
.计次循环首 (正则表达式.取匹配数量 (), i)
    播放地址 ＝ 文本_取出中间文本 (正则表达式.取匹配文本 (i, ), “>”, “<”, , )
    调试输出 (播放地址)
.计次循环尾 ()





补充内容 (2025-1-22 01:43):
取网页源码的时候他代码是有一个传递参数是page但是我传了没啥用，你自己试试吧

---

作者: shiguang2018    时间: 2025-1-22 01:51

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

搜索频道 (“CCTV1”)

子程序名	返回值类型	公开	备 注
搜索频道
参数名	类 型	参考	可空	数组	备 注
关键字	文本型

变量名	类 型	静态	数组	备 注
str	文本型
文本数组	文本型		0
i	整数型
tba_class	文本型

关键字 ＝ “CCTV1”
str ＝ 到文本 (网页_访问_对象 (“https://tonkiang.us/?”, 1, “seerch=” ＋ 关键字 ＋ “&Submit=+&city=670ede1b”, , , , , , , , , , , , , , , , ))
str ＝ 编码_URL解码 (str, 真)
' 调试输出 (str)
tba_class ＝ 文本_取出中间文本 (str, “table-layout:fixed; width: 100%; overflow: hidden;”, “ {”, , )
tba_class ＝ 文本_取右边 (tba_class, “.”, , )
文本_取中间_批量 (str, tba_class ＋ “>”, “”, 文本数组, , , , , , , )
计次循环首 (取数组成员数 (文本数组), i)
调试输出 (文本数组 [i])
计次循环尾 ()
调试输出 (“ok”)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 搜索频道 (“CCTV1”)<br /> <br /> <br /> .子程序 搜索频道<br /> .参数 关键字, 文本型<br /> .局部变量 str, 文本型<br /> .局部变量 文本数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 tba_class, 文本型<br /> <br /> 关键字 ＝ “CCTV1”<br /> str ＝ 到文本 (网页_访问_对象 (“https://tonkiang.us/?”, 1, “seerch=” ＋ 关键字 ＋ “&Submit=+&city=670ede1b”, , , , , , , , , , , , , , , , ))<br /> str ＝ 编码_URL解码 (str, 真)<br /> ' 调试输出 (str)<br /> tba_class ＝ 文本_取出中间文本 (str, “table-layout:fixed; width: 100%; overflow: hidden;”, “ {”, , )<br /> tba_class ＝ 文本_取右边 (tba_class, “.”, , )<br /> 文本_取中间_批量 (str, tba_class ＋ “>”, “”, 文本数组, , , , , , , )<br /> .计次循环首 (取数组成员数 (文本数组), i)<br />     调试输出 (文本数组 <i>)<br /> <br /> .计次循环尾 ()<br /> 调试输出 (“ok”)

---

作者: shiguang2018    时间: 2025-1-22 01:52

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

搜索频道 (“CCTV1”)

子程序名	返回值类型	公开	备 注
搜索频道
参数名	类 型	参考	可空	数组	备 注
关键字	文本型

变量名	类 型	静态	数组	备 注
str	文本型
文本数组	文本型		0
i	整数型
tba_class	文本型

关键字 ＝ “CCTV1”
str ＝ 到文本 (网页_访问_对象 (“https://tonkiang.us/?”, 1, “seerch=” ＋ 关键字 ＋ “&Submit=+&city=670ede1b”, , , , , , , , , , , , , , , , ))
str ＝ 编码_URL解码 (str, 真)
' 调试输出 (str)
tba_class ＝ 文本_取出中间文本 (str, “table-layout:fixed; width: 100%; overflow: hidden;”, “ {”, , )
tba_class ＝ 文本_取右边 (tba_class, “.”, , )
文本_取中间_批量 (str, tba_class ＋ “>”, “”, 文本数组, , , , , , , )
计次循环首 (取数组成员数 (文本数组), i)
调试输出 (文本数组 [i])
计次循环尾 ()
调试输出 (“ok”)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 搜索频道 (“CCTV1”)<br /> <br /> <br /> .子程序 搜索频道<br /> .参数 关键字, 文本型<br /> .局部变量 str, 文本型<br /> .局部变量 文本数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 tba_class, 文本型<br /> <br /> 关键字 ＝ “CCTV1”<br /> str ＝ 到文本 (网页_访问_对象 (“https://tonkiang.us/?”, 1, “seerch=” ＋ 关键字 ＋ “&Submit=+&city=670ede1b”, , , , , , , , , , , , , , , , ))<br /> str ＝ 编码_URL解码 (str, 真)<br /> ' 调试输出 (str)<br /> tba_class ＝ 文本_取出中间文本 (str, “table-layout:fixed; width: 100%; overflow: hidden;”, “ {”, , )<br /> tba_class ＝ 文本_取右边 (tba_class, “.”, , )<br /> 文本_取中间_批量 (str, tba_class ＋ “>”, “”, 文本数组, , , , , , , )<br /> .计次循环首 (取数组成员数 (文本数组), i)<br />     调试输出 (文本数组 <i>)<br /> <br /> .计次循环尾 ()<br /> 调试输出 (“ok”)

---

作者: 39751549    时间: 2025-1-22 02:13
匪我愆期去去去去去去七七七七七七七七七七

---

作者: maozaiba    时间: 2025-1-22 05:01
然而这网站的链接基本没几个可用的

---

作者: hhwxyhh    时间: 2025-1-22 11:03

兰迪Randy 发表于 2025-1-21 23:37
网址打不开？？

可以打开啊

---

作者: hhwxyhh    时间: 2025-1-22 11:27

单指1 发表于 2025-1-22 01:40
.版本 2
.支持库 spec

对呀，就是分页源码取不出来，我就是想取分页内容啊，取表面的只能取三个重复的播放源网址

---

作者: hhwxyhh    时间: 2025-1-22 11:30

shiguang2018 发表于 2025-1-22 01:51
[e=0].版本 2
.支持库 spec

没这么简单啊，city=670ede1b，这里是变化的，下面不是有好多页吗，你取第二页的试试

---

作者: hhwxyhh    时间: 2025-1-22 12:01

maozaiba 发表于 2025-1-22 05:01
然而这网站的链接基本没几个可用的

所以要批量筛选啊

---

作者: shiguang2018    时间: 2025-1-22 12:30

hhwxyhh 发表于 2025-1-22 11:30
没这么简单啊，city=670ede1b，这里是变化的，下面不是有好多页吗，你取第二页的试试 ...

tba_class ＝ 文本_取出中间文本 (str, “table-layout:fixed; width: 100%; overflow: hidden;”, “ {”, , )
我这里不是已经 取出来了没

---

作者: 单指1    时间: 2025-1-22 17:42

hhwxyhh 发表于 2025-1-22 11:27
对呀，就是分页源码取不出来，我就是想取分页内容啊，取表面的只能取三个重复的播放源网址 ...

你是要做直播源是吧？我给你一个地址可以读取上面的，我之前写一个影视系统的可以用的

http://yuan.haitangw.net/ZB/  这个地址，里面有人维护的

补充内容 (2025-1-22 17:42):
http://ottrrs.hl.chinamobile.com/ ipv4的采集这个域名开头的可以播放

---

作者: 1425113841    时间: 2025-1-23 01:01
愿意付费联系我名字Q

---

作者: hhwxyhh    时间: 2025-1-23 23:14

shiguang2018 发表于 2025-1-22 12:30
tba_class ＝ 文本_取出中间文本 (str, “table-layout:fixed; width: 100%; overflow: hidden;”, “ { ...

你取搜索结果的第二页试试就知道了

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4