蓝奏云直连解析源码

挥别凡尘

厉害，要是再有个进度条显示下载就完美了！

Sam8

666666666666666666666666666666666666666666666

一指温柔

持开源~！感谢分享

ctry78985

感谢分享

豆豆灰常开心

感谢您对论坛的支持！

查过

全都是大佬~

year1970

感谢分享

renhe2018

给力，非常给力。

haoren1212

  

子程序名	返回值类型	公开	备 注
取文件目录列表	文本型		获取目录链接的文件列表，返回json文本
参数名	类 型	参考	可空	数组	备 注
链接	文本型				下载目录链接，如https://tres.lanzouq.com/b02rtgnha
密码	文本型				链接密码，如4vex，没有密码可空

变量名	类 型	静态	数组	备 注
局_提交协议头	文本型
局_返回	文本型
局_参数数组	文本型		0
局_提交数据	文本型

局_提交协议头 ＝ “User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”
局_返回 ＝ 到文本 (编码_编码转换对象 (网页_访问 (链接, , , , , 局_提交协议头, , , , , , , , ), , , ))  ' 获取基础参数，ua不可为空
文本_取中间_批量 (文本_取出中间文本 (局_返回, “pgs;”, “pgs”, , ), “= '”, “'”, 局_参数数组, , , , , , , )  ' t k参数
局_提交数据 ＝ “lx=2&fid=” ＋ 文本_取出中间文本 (局_返回, “fid':”, “,”, , ) ＋ “&pg=1&t=” ＋ 局_参数数组 [1] ＋ “&k=” ＋ 局_参数数组 [2] ＋ “&up=1”
如果真 (密码 ≠ “”)  ' 判断是否传递参数（密码）
局_提交数据 ＝ 局_提交数据 ＋ “&pwd=” ＋ 密码
返回 (编码_usc2到ansi (到文本 (网页_访问 (“https://” ＋ 网页_取域名 (链接, , , ) ＋ “/filemoreajax.php”, 1, 局_提交数据, , , , , , , , , , , ))))

.版本 2<br /> <br /> .子程序 取文件目录列表, 文本型, , 获取目录链接的文件列表，返回json文本<br /> .参数 链接, 文本型, , 下载目录链接，如https://tres.lanzouq.com/b02rtgnha<br /> .参数 密码, 文本型, 可空, 链接密码，如4vex，没有密码可空<br /> .局部变量 局_提交协议头, 文本型<br /> .局部变量 局_返回, 文本型<br /> .局部变量 局_参数数组, 文本型, , "0"<br /> .局部变量 局_提交数据, 文本型<br /> <br /> 局_提交协议头 ＝ “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 /> 局_返回 ＝ 到文本 (编码_编码转换对象 (网页_访问 (链接, , , , , 局_提交协议头, , , , , , , , ), , , ))  ' 获取基础参数，ua不可为空<br /> <br /> 文本_取中间_批量 (文本_取出中间文本 (局_返回, “pgs;”, “pgs”, , ), “= '”, “'”, 局_参数数组, , , , , , , )  ' t k参数<br /> 局_提交数据 ＝ “lx=2&fid=” ＋ 文本_取出中间文本 (局_返回, “fid':”, “,”, , ) ＋ “&pg=1&t=” ＋ 局_参数数组 [1] ＋ “&k=” ＋ 局_参数数组 [2] ＋ “&up=1”<br /> .如果真 (密码 ≠ “”)  ' 判断是否传递参数（密码）<br />     局_提交数据 ＝ 局_提交数据 ＋ “&pwd=” ＋ 密码<br /> .如果真结束<br /> 返回 (编码_usc2到ansi (到文本 (网页_访问 (“https://” ＋ 网页_取域名 (链接, , , ) ＋ “/filemoreajax.php”, 1, 局_提交数据, , , , , , , , , , , ))))

baitso

感谢分享