开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 4857|回复: 33
打印 上一主题 下一主题
收起左侧

[易源码分享] 蓝奏云密码直链解析

[复制链接]
结帖率:93% (253/272)
跳转到指定楼层
楼主
发表于 2023-11-1 00:50:21 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式   广西壮族自治区崇左市
分享源码
界面截图: -
是否带模块: 调用了模块
备注说明: -
本帖最后由 果心豆腐酱 于 2023-11-1 01:12 编辑
  
子程序名返回值类型公开备 注
__启动窗口_创建完毕  
变量名类 型静态数组备 注
文件名文本型 
调试输出 (蓝奏云_取直链_有密码 (“https://tgif.lanzouw.com/b029dmp8f”, “520”, 文件名), 文件名)
调试输出 (蓝奏云_取直链_有密码 (“https://police.lanzoue.com/iMv1l0ld6wib”, “euss”, 文件名), 文件名)
子程序名返回值类型公开备 注
蓝奏云_取直链_有密码文本型 
参数名类 型参考可空数组备 注
网址文本型
密码文本型
文件名文本型
变量名类 型静态数组备 注
蓝奏云_协议头文本型 
网页源码文本型 
正则正则表达式类 
sign文本型 
局_网址文本型 
action文本型 
域名文本型 
正则.创建 (“[a-zA-z]+://[a-zA-Z0-9][-a-zA-Z0-9]{0,62}(\.[a-zA-Z0-9][-a-zA-Z0-9]{0,62})+\.?”, 网址, , , , )
域名 = 正则.取匹配文本 (1, )
蓝奏云_协议头 = “User-Agent: Mozilla/5.0 (Windows NT 12.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”#换行符“referer: ” + 域名
网页源码 = 编码_Utf8到Ansi (网页_访问_对象 (网址, 0, , , , 蓝奏云_协议头, , , , , , , , , , , , , ))
' 调试输出 (网页源码)
' 正则.创建 (“([\s\S]*?)
”, 网页源码, , , , 真)
' 文件名 = 正则.取子匹配文本 (1, 2, )
正则.创建 (“action=(.*?)&sign=(.{10,}?)&p=”, 网页源码, , , , )
action = 正则.取子匹配文本 (1, 1, )
sign = 正则.取子匹配文本 (1, 2, )
如果真 (action = “”)
action = “downprocess”
如果真 (sign = “” 取文本长度 (sign) < 70)
正则.创建 (“[0-9a-zA-Z\_]{70,}”, 网页源码, , , , )
sign = 正则.取匹配文本 (1, )
' 调试输出 (sign)
如果真 (sign = “”)
返回 (蓝奏云_取直链_有密码2 (网址, 密码, 文件名))
网页源码 = 到文本 (网页_访问_对象 (域名 + “/ajaxm.php”, 1, “action=” + action + “&sign=” + sign + “&p=” + 密码, , , 蓝奏云_协议头, , , , , , , , , , , , , ))
局_网址 = 文本_取出中间文本 (网页源码, “dom”#引号“:”#引号“”, “”#引号“,”, , )“/file/”文本_取出中间文本 (网页源码, “url”#引号“:”#引号, #引号, , )
局_网址 = 子文本替换 (局_网址, “\”, “”, , , )
文件名 = 文本_取出中间文本 (网页源码, “inf”#引号“:”#引号“”, #引号, , )
局_网址 = 取跳转的最终地址 (局_网址)
如果真 (局_网址 = “”)
局_网址 = 子文本替换 (局_网址, “https://”, “http://”, , , )
局_网址 = 取跳转的最终地址 (局_网址)
返回 (局_网址)
子程序名返回值类型公开备 注
蓝奏云_取直链_有密码2文本型 
参数名类 型参考可空数组备 注
网址文本型
密码文本型
文件名文本型
变量名类 型静态数组备 注
蓝奏云_协议头文本型 
网页源码文本型 
sign文本型 
局_网址文本型 
action文本型 
域名文本型 
_hg2q2文本型 
t文本型 
ls文本型 
pwd文本型 
pg文本型 
lx文本型 
fid文本型 
uid文本型 
rep文本型 
k文本型 
up文本型 
内容文本型 
post数据文本型 
id文本型 
fn文本型 
signs文本型 
ves文本型 
websign文本型 
websignkey文本型 
数据字节集 
正则正则表达式类 
正则.创建 (“[a-zA-z]+://[a-zA-Z0-9][-a-zA-Z0-9]{0,62}(\.[a-zA-Z0-9][-a-zA-Z0-9]{0,62})+\.?”, 网址, , , , )
域名 = 正则.取匹配文本 (1, )
蓝奏云_协议头 = “User-Agent: Mozilla/5.0 (Windows NT 12.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”#换行符“referer: ” + 域名
网页源码 = 编码_Utf8到Ansi (网页_访问_对象 (网址, 0, , , , 蓝奏云_协议头, , , , , , , , , , , , , ))
' 调试输出 (网页源码)
k = 文本_取出中间文本 (网页源码, “k':”, “,”, , )
k = 文本_取出中间文本 (网页源码, k + “ = '”, “';”, , )
t = 文本_取出中间文本 (网页源码, “t':”, “,”, , )
t = 文本_取出中间文本 (网页源码, t + “ = '”, “';”, , )
rep = 文本_取出中间文本 (网页源码, “rep':'”, “',”, , )
lx = 文本_取出中间文本 (网页源码, “lx':”, “,”, , )
fid = 文本_取出中间文本 (网页源码, “fid':”, “,”, , )
uid = 文本_取出中间文本 (网页源码, “uid':'”, “',”, , )
up = 文本_取出中间文本 (网页源码, “up':”, “,”, , )
ls = 文本_取出中间文本 (网页源码, “ls':”, “,”, , )
pg = 文本_取出中间文本 (网页源码, “pgs =”, “;”, , )
pwd = 密码
post数据 = “lx=” + lx + “&fid=” + fid + “&uid=” + uid + “&pg=” + pg + “&rep=” + rep + “&t=” + t + “&k=” + k + “&up=” + up + “&ls=” + ls + “&pwd=” + pwd
内容 = 编码_Utf8到Ansi (网页_访问_对象 (域名 + “/filemoreajax.php”, 1, post数据, , , 蓝奏云_协议头, , , , , , , , , , , , , ))
id = 文本_取出中间文本 (内容, “id”#引号“:”#引号“”, “”#引号“,”, , )
文件名 = 编码_usc2到ansi (文本_取出中间文本 (内容, “name_all”#引号“:”#引号“”, “”#引号“,”, , ))
数据 = 网页_访问_对象 (域名 + “/” + id, 0, , , , 蓝奏云_协议头, , , , , , , , , , , , , )
内容 = 编码_Utf8到Ansi (数据)
正则.创建 (“]*src=”#引号“([^”#引号“]+)”#引号“”, 内容, , , , )
fn = 正则.取子匹配文本 (正则.取匹配数量 (), 1, )
内容 = 编码_Utf8到Ansi (网页_访问_对象 (域名 + “/” + fn, , , , , 蓝奏云_协议头, , , , , , , , , , , , , ))
action = 文本_取出中间文本 (内容, “action':'”, “',”, , )
sign = 文本_取出中间文本 (内容, “sign':'”, “',”, , )
signs = 文本_取出中间文本 (内容, “signs':”, “,”, , )
signs = 文本_取出中间文本 (内容, signs + “ = '”, “';”, , )
websign = 文本_取出中间文本 (内容, “websign':”, “,”, , )
websign = 文本_取出中间文本 (内容, websign + “ = '”, “';”, , )
websignkey = 文本_取出中间文本 (内容, “websignkey':”, “,”, , )
websignkey = 文本_取出中间文本 (内容, websignkey + “ = '”, “';”, , )
ves = 文本_取出中间文本 (内容, “ves':”, “ }”, , )
post数据 = “action=” + action + “&sign=” + sign + “&signs=” + signs + “&websign=” + websign + “&websignkey=” + websignkey + “&ves=” + ves
内容 = 编码_Utf8到Ansi (网页_访问_对象 (域名 + “//ajaxm.php”, 1, post数据, , , 蓝奏云_协议头, , , , , , , , , , , , , ))
局_网址 = 文本_取出中间文本 (内容, “dom”#引号“:”#引号“”, “”#引号“,”, , )“/file/”文本_取出中间文本 (内容, “url”#引号“:”#引号, #引号, , )
局_网址 = 子文本替换 (局_网址, “\”, “”, , , )
局_网址 = 取跳转的最终地址 (局_网址)
如果真 (局_网址 = “”)
局_网址 = 子文本替换 (局_网址, “https://”, “http://”, , , )
局_网址 = 取跳转的最终地址 (局_网址)

返回 (局_网址)


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

两种解析,能适用更多不同的域名。
好用就给点打赏呗,没精币提问题了
用了精易模块




补充内容 (2023-11-2 03:31):
.版本 2

.子程序 取跳转的最终地址, 文本型, 公开, 获取一个网站重定向跳转的URL地址
.参数 地址, 文本型
.局部变量 http, 对象
.局部变量 p, 变体型

....

评分

参与人数 4好评 +3 精币 +11 收起 理由
光影魔术 + 2 开源精神必须支持~
godandwoman + 1 + 2 支持开源~!感谢分享
AdGame + 1 + 5 支持开源~!感谢分享
猪滴寳貝哝 + 1 + 2 支持开源~!感谢分享

查看全部评分


结帖率:93% (253/272)
来自 20楼
 楼主| 发表于 2023-11-2 03:32:03 | 只看该作者   广西壮族自治区崇左市
  
子程序名返回值类型公开备 注
取跳转的最终地址文本型 获取一个网站重定向跳转的URL地址
参数名类 型参考可空数组备 注
地址文本型
变量名类 型静态数组备 注
http对象 
p变体型 
如果真 (http.创建 (“WinHttp.WinHttpRequest.5.1”, ))
http.写属性 (“Option”, 6, 0)
http.方法 (“SetTimeouts”, 5000, 5000, 10000, 5000)
http.方法 (“open”, “GET”, 地址, )
http.方法 (“setRequestHeader”, “User-Agent”, “Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)”)
http.方法 (“setRequestHeader”, “Accept-Language”, “zh-cn”)
http.方法 (“setRequestHeader”, “Connection”, “Keep-Alive”)
http.方法 (“setRequestHeader”, “Accept”, “image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/x-silverlight, */*”)
http.方法 (“send”, )
p = http.读属性 (“GetResponseHeader”, “Location”)
返回 (p.取文本 ())
返回 (“”)

就是取重定向地址
回复 支持 反对

使用道具 举报

结帖率:100% (3/3)

签到天数: 17 天

沙发
发表于 2023-11-1 01:10:37 | 只看该作者   广东省深圳市
学习一下
回复 支持 反对

使用道具 举报

结帖率:72% (55/76)

签到天数: 3 天

板凳
发表于 2023-11-1 03:11:03 | 只看该作者   河南省焦作市
缺命令 大佬
回复 支持 反对

使用道具 举报

结帖率:0% (0/2)
地板
发表于 2023-11-1 03:18:45 | 只看该作者   重庆市重庆市
来看看看
回复 支持 反对

使用道具 举报

结帖率:73% (8/11)

签到天数: 12 天

地下
发表于 2023-11-1 07:48:16 | 只看该作者   河南省焦作市
学习一下
回复 支持 反对

使用道具 举报

结帖率:98% (111/113)

签到天数: 18 天

6
发表于 2023-11-1 07:58:18 | 只看该作者   山东省青岛市
感谢您对论坛的支持!
回复 支持 反对

使用道具 举报

结帖率:96% (53/55)

签到天数: 15 天

7
发表于 2023-11-1 08:02:52 | 只看该作者   山东省青岛市
感谢发布原创作品,精易因你更精彩!6666666666666
回复 支持 反对

使用道具 举报

结帖率:86% (12/14)

签到天数: 15 天

8
发表于 2023-11-1 08:24:05 | 只看该作者   天津市天津市
感谢分享,很给力!~
回复 支持 反对

使用道具 举报

结帖率:0% (0/2)

签到天数: 15 天

9
发表于 2023-11-1 08:50:39 | 只看该作者   广西壮族自治区玉林市
感谢分享,很给力!~
回复 支持 反对

使用道具 举报

结帖率:63% (5/8)

签到天数: 10 天

10
发表于 2023-11-1 10:06:59 | 只看该作者   贵州省黔东南苗族侗族自治州
.版本 2

.子程序 取跳转的最终地址, 文本型, , 获取一个网站重定向跳转的URL地址
.参数 地址, 文本型
.局部变量 http, 对象
.局部变量 p, 变体型

.如果真 (http.创建 (“WinHttp.WinHttpRequest.5.1”, ))
    http.写属性 (“Option”, 6, 0)
    http.方法 (“SetTimeouts”, 5000, 5000, 10000, 5000)
    http.方法 (“open”, “GET”, 地址, 假)
    http.方法 (“setRequestHeader”, “User-Agent”, “Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)”)
    http.方法 (“setRequestHeader”, “Accept-Language”, “zh-cn”)
    http.方法 (“setRequestHeader”, “Connection”, “Keep-Alive”)
    http.方法 (“setRequestHeader”, “Accept”, “image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/x-silverlight, */*”)
    http.方法 (“send”, )
    p = http.读属性 (“GetResponseHeader”, “Location”)
    返回 (p.取文本 ())
.如果真结束
返回 (“”)

缺少这个命令呢  大佬  是我这个不对吗  解析不出来呢

回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 793400750,邮箱:[email protected]
网站简介:精易论坛成立于2009年,是一个程序设计学习交流技术论坛,隶属于揭阳市揭东区精易科技有限公司所有。
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表