|
发表于 2024-5-10 02:10:52
|
显示全部楼层
福建省泉州市
.版本 2
.子程序 蓝奏云_取文件夹_文件信息_无密码, 文本型, 公开, 获取分享的链接中的所有文件夹并自动添加完整路径。
.参数 url, 文本型, , 提供分享的链接。
.参数 提取码, 文本型, 可空, 提供分享链接的提取码。
.参数 参_类型_数组, 文本型, 可空 数组, 不填默认返回最新的文件类型;提供一个《文本型数组》接收返回的数据。
.参数 参_文件名_数组, 文本型, 可空 数组, 不填默认返回最新的文件名;提供一个《文本型数组》接收返回的数据。
.参数 参_大小_数组, 文本型, 可空 数组, 不填默认返回最新的文件大小;提供一个《文本型数组》接收返回的数据。
.参数 参_日期_数组, 文本型, 可空 数组, 不填默认返回最新的文件上传日期;提供一个《文本型数组》接收返回的数据。
.参数 参_ID_数组, 文本型, 可空 数组, 不填默认返回最新的文件ID;提供一个《文本型数组》接收返回的数据。
.局部变量 访问_源代码, 文本型, , , 取提交数据
.局部变量 访问_源代码_1, 文本型, , , 取文件名
.局部变量 post, 类_POST数据类
.局部变量 post_协议头, 类_POST数据类
.局部变量 json, 类_json
.局部变量 局_正则, 正则表达式类
.局部变量 lx, 文本型
.局部变量 fid, 文本型
.局部变量 uid, 文本型
.局部变量 pg, 文本型
.局部变量 rep, 文本型
.局部变量 t, 文本型
.局部变量 k, 文本型
.局部变量 up, 文本型
.局部变量 vip, 文本型
.局部变量 webfoldersign, 文本型
.局部变量 ls, 文本型
.局部变量 pwd, 文本型
.局部变量 提交协议头, 文本型
.局部变量 数据_一级链接, 文本型
.局部变量 数据_二级链接, 文本型
.局部变量 局_计次, 整数型
.局部变量 局_类型_数组, 文本型, , "0"
.局部变量 局_类型, 文本型
.局部变量 局_ID_数组, 文本型, , "0"
.局部变量 局_ID, 文本型
.局部变量 局_文件名_数组, 文本型, , "0"
.局部变量 局_文件名, 文本型
.局部变量 局_大小_数组, 文本型, , "0"
.局部变量 局_大小, 文本型
.局部变量 局_日期_数组, 文本型, , "0"
.局部变量 局_日期, 文本型
post_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/124.0.0.0 Safari/537.36 Edg/124.0.0.0”, )
提交协议头 = post_协议头.获取协议头数据 ()
访问_源代码 = UTF8到文本 (穆丰_网页访问 (url, 0, , , , 提交协议头, , , , , , , , ))
.判断开始 (是否为空 (提取码) = 真)
lx = 穆丰_取出中间文本 (访问_源代码, “'lx':”, “,”, , )
fid = 穆丰_取出中间文本 (访问_源代码, “'fid':”, “,”, , )
uid = 穆丰_取出中间文本 (访问_源代码, “'uid':'”, “',”, , )
pg = 穆丰_取出中间文本 (访问_源代码, “pgs =”, “;”, , )
rep = 穆丰_取出中间文本 (访问_源代码, “'rep':'”, “',”, , )
.判断开始 (局_正则.创建 (“= '(.*?)';”, 访问_源代码, 假, 假, 真, 真) = 真)
t = 局_正则.取子匹配文本 (1, 1, )
k = 局_正则.取子匹配文本 (2, 1, )
.默认
.判断结束
up = 穆丰_取出中间文本 (访问_源代码, “'up':”, “,”, , )
vip = 穆丰_取出中间文本 (访问_源代码, “'vip':'”, “',”, , )
webfoldersign = 穆丰_取出中间文本 (访问_源代码, “'webfoldersign':'”, “',”, , )
post.添加 (“lx”, lx, )
post.添加 (“fid”, fid, )
post.添加 (“uid”, uid, )
post.添加 (“pg”, pg, )
post.添加 (“rep”, rep, )
post.添加 (“t”, t, )
post.添加 (“k”, k, )
post.添加 (“up”, up, )
post.添加 (“vip”, vip, )
post.添加 (“webfoldersign”, webfoldersign, )
.判断 (是否为空 (提取码) = 假)
lx = 穆丰_取出中间文本 (访问_源代码, “'lx':”, “,”, , )
fid = 穆丰_取出中间文本 (访问_源代码, “'fid':”, “,”, , )
uid = 穆丰_取出中间文本 (访问_源代码, “'uid':'”, “',”, , )
pg = 穆丰_取出中间文本 (访问_源代码, “pgs =”, “;”, , )
rep = 穆丰_取出中间文本 (访问_源代码, “'rep':'”, “',”, , )
.判断开始 (局_正则.创建 (“= '(.*?)';”, 访问_源代码, 假, 假, 真, 真) = 真)
t = 局_正则.取子匹配文本 (1, 1, )
k = 局_正则.取子匹配文本 (2, 1, )
.默认
.判断结束
up = 穆丰_取出中间文本 (访问_源代码, “'up':”, “,”, , )
vip = 穆丰_取出中间文本 (访问_源代码, “'vip':'”, “',”, , )
webfoldersign = 穆丰_取出中间文本 (访问_源代码, “'webfoldersign':'”, “',”, , )
ls = 穆丰_取出中间文本 (访问_源代码, “'ls':”, “,”, , )
post.添加 (“lx”, lx, )
post.添加 (“fid”, fid, )
post.添加 (“uid”, uid, )
post.添加 (“pg”, pg, )
post.添加 (“rep”, rep, )
post.添加 (“t”, t, )
post.添加 (“k”, k, )
post.添加 (“up”, up, )
post.添加 (“vip”, vip, )
post.添加 (“webfoldersign”, webfoldersign, )
post.添加 (“ls”, ls, )
post.添加 (“pwd”, 提取码, )
.默认
.判断结束
数据_一级链接 = 穆丰_取出中间文本 (url, “https://”, “/”, , )
数据_二级链接 = “https://” + 数据_一级链接 + 穆丰_取出中间文本 (访问_源代码, “url : '”, “',”, , )
访问_源代码_1 = UTF8到文本 (穆丰_网页访问 (数据_二级链接, 1, post.获取Post数据 (), , , 提交协议头, , , , , , , , ))
json.解析 (访问_源代码_1, , )
.判断开始 (是否为空 (参_类型_数组) = 真)
局_类型 = “*.” + json.取通用属性 (“text[0].icon”, )
.判断 (是否为空 (参_类型_数组) = 假)
.计次循环首 (json.成员数 (“text”), 局_计次)
加入成员 (局_类型_数组, “https://” + 数据_一级链接 + “/” + json.取通用属性 (“text[” + 到文本 (局_计次 - 1) + “].icon”, ))
.计次循环尾 ()
参_类型_数组 = 局_类型_数组
.默认
.判断结束
.判断开始 (是否为空 (参_ID_数组) = 真)
局_ID = “https://” + 数据_一级链接 + “/” + json.取通用属性 (“text[0].id”, )
.判断 (是否为空 (参_ID_数组) = 假)
.计次循环首 (json.成员数 (“text”), 局_计次)
加入成员 (局_ID_数组, “https://” + 数据_一级链接 + “/” + json.取通用属性 (“text[” + 到文本 (局_计次 - 1) + “].id”, ))
.计次循环尾 ()
参_ID_数组 = 局_ID_数组
.默认
.判断结束
.判断开始 (是否为空 (参_文件名_数组) = 真)
局_文件名 = json.取通用属性 (“text[0]['name_all']”, )
.判断 (是否为空 (参_文件名_数组) = 假)
.计次循环首 (json.成员数 (“text”), 局_计次)
加入成员 (局_文件名_数组, json.取通用属性 (“text[” + 到文本 (局_计次 - 1) + “]['name_all']”, ))
.计次循环尾 ()
参_文件名_数组 = 局_文件名_数组
.默认
.判断结束
.判断开始 (是否为空 (参_大小_数组) = 真)
局_大小 = json.取通用属性 (“text[0].size”, )
.判断 (是否为空 (参_大小_数组) = 假)
.计次循环首 (json.成员数 (“text”), 局_计次)
加入成员 (局_大小_数组, json.取通用属性 (“text[” + 到文本 (局_计次 - 1) + “].size”, ))
.计次循环尾 ()
参_大小_数组 = 局_大小_数组
.默认
.判断结束
.判断开始 (是否为空 (参_日期_数组) = 真)
局_日期 = json.取通用属性 (“text[0].time”, )
.判断 (是否为空 (参_日期_数组) = 假)
.计次循环首 (json.成员数 (“text”), 局_计次)
加入成员 (局_日期_数组, json.取通用属性 (“text[” + 到文本 (局_计次 - 1) + “].time”, ))
.计次循环尾 ()
参_日期_数组 = 局_日期_数组
.默认
.判断结束
返回 (“文件类型:-> ” + 局_类型 + “ | 文件ID:-> ” + 局_ID + “ | 文件名称:-> ” + 局_文件名 + “ | 文件大小:-> ” + 局_大小 + “ | 上传日期: -> ” + 局_日期)
|
|