如何获取下面链接里视频下载地址

kanhaiyouyue

https://haokan.baidu.com/author/1583602001858269这个链接有670个视频，如何通过这个链接获取每个视频的连接地址以及视频下载地址？
    请大神帮忙，并附上源码

初夏喔

https://haokan.baidu.com/web/aut ... chAfter=&_api=1


这个是接口，rn是页码，计次循环 i * 10 这样就行

jiesansi

https://vd4.bdstatic.com/mda-mk7mt9dihvadatwk/sc/cae_h264_clips/1636407124102039558/mda-mk7mt9dihvadatwk.mp4   第一个视频的下载地址

jiesansi

影知

初夏喔 发表于 2021-11-9 16:26
https://haokan.baidu.com/web/author/listall?app_id=1583602001858269&ctime=16360396085161&rn=20&searc ...

他要的是能直接下载的地址，还是要全部的
你这个我上次给过他的

云少i

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
首次数组	文本型	0
标题内容	文本型
第一次网址	文本型
网址	文本型

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

启动线程 (&功能_网页访问, , )

子程序名	返回值类型	公开	备 注
功能_网页访问			本命令由【精易网页调试助手】生成，请配合精易模块使用。

变量名	类 型	静态	数组	备 注
局_网址	文本型
局_方式	整数型
ADD_协议头	类_POST数据类
局_提交协议头	文本型
局_是否重定向	逻辑型
局_结果	字节集
局_返回	文本型
i	整数型

' [url]https://haokan.baidu.com/author/1583602001858269[/url]
局_网址 ＝ “https://haokan.baidu.com/author/1583602001858269”
局_方式 ＝ 0
ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”)
局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()
局_是否重定向 ＝ 真
局_结果 ＝ 网页_访问 (局_网址, 局_方式, , , , 局_提交协议头, , 局_是否重定向, , , )
局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果))
局_返回 ＝ 文本_取右边 (局_返回, “</span></h3><ul”, )
文本_取中间_批量 (局_返回, “title=”, “class=”, 首次数组, , , , )
计次循环首 (取数组成员数 (首次数组), i)
标题内容 ＝ 文本_取出中间文本 (首次数组 [i], #引号, #引号, , )
第一次网址 ＝ 文本_取出中间文本 (首次数组 [i], “><a href=” ＋ #引号, #引号, )
局_方式 ＝ 0
ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”)
局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()
局_是否重定向 ＝ 真
局_结果 ＝ 网页_访问 (第一次网址, 局_方式, , , , 局_提交协议头, , 局_是否重定向, , )
局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果))
局_返回 ＝ 文本_取右边 (局_返回, “playurl”, )
网址 ＝ 文本_取出中间文本 (局_返回, #引号 ＋ “https”, “?auth_key=”, , )
网址 ＝ “https” ＋ 子文本替换 (网址, “\”, , , , 真)
调试输出 (标题内容, 网址)
计次循环尾 ()

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 首次数组, 文本型, , "0"<br /> .程序集变量 标题内容, 文本型<br /> .程序集变量 第一次网址, 文本型<br /> .程序集变量 网址, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 启动线程 (&功能_网页访问, , )<br /> <br /> .子程序 功能_网页访问, , , 本命令由【精易网页调试助手】生成，请配合精易模块使用。<br /> .局部变量 局_网址, 文本型<br /> .局部变量 局_方式, 整数型<br /> .局部变量 ADD_协议头, 类_POST数据类<br /> .局部变量 局_提交协议头, 文本型<br /> .局部变量 局_是否重定向, 逻辑型<br /> .局部变量 局_结果, 字节集<br /> .局部变量 局_返回, 文本型<br /> .局部变量 i, 整数型<br /> <br /> ' <a href="https://haokan.baidu.com/author/1583602001858269" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">https://haokan.baidu.com/author/1583602001858269</a><br /> 局_网址 ＝ “<a href="https://haokan.baidu.com/author/1583602001858269" rel="nofollow" rel="nofollow" rel="nofollow" target="_blank">https://haokan.baidu.com/author/1583602001858269</a>”<br /> 局_方式 ＝ 0<br /> ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”)<br /> <br /> 局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()<br /> 局_是否重定向 ＝ 真<br /> <br /> 局_结果 ＝ 网页_访问 (局_网址, 局_方式, , , , 局_提交协议头, , 局_是否重定向, , , )<br /> 局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果))<br /> 局_返回 ＝ 文本_取右边 (局_返回, “</span></h3><ul”, )<br /> 文本_取中间_批量 (局_返回, “title=”, “class=”, 首次数组, , , , )<br /> .计次循环首 (取数组成员数 (首次数组), i)<br />     标题内容 ＝ 文本_取出中间文本 (首次数组 <i>, #引号, #引号, , )<br /> <br />     第一次网址 ＝ 文本_取出中间文本 (首次数组 <i>, “><a href=” ＋ #引号, #引号, )<br />     局_方式 ＝ 0<br />     ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”)<br />     局_提交协议头 ＝ ADD_协议头.获取协议头数据 ()<br />     局_是否重定向 ＝ 真<br />     局_结果 ＝ 网页_访问 (第一次网址, 局_方式, , , , 局_提交协议头, , 局_是否重定向, , )<br />     局_返回 ＝ 到文本 (编码_编码转换对象 (局_结果))<br />     局_返回 ＝ 文本_取右边 (局_返回, “playurl”, )<br />     网址 ＝ 文本_取出中间文本 (局_返回, #引号 ＋ “https”, “?auth_key=”, , )<br />     网址 ＝ “https” ＋ 子文本替换 (网址, “\”, , , , 真)<br />     调试输出 (标题内容, 网址)<br /> .计次循环尾 ()