易语言吧

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 7194|回复: 14

[易语言源码] 易语言实现bilibili登陆源码

[复制链接]

295

主题

537

帖子

1万

积分

超级版主

Rank: 8Rank: 8

积分
14496

幽默大师终生成就

威望
0
易币
13874
贡献
0
积分
14496
UID
580
在线时间
464 小时
注册时间
2019-12-5
发表于 2020-3-1 11:45:54 | 显示全部楼层 |阅读模式
哈哈.发现大家都在B站学习.分享一个易语言实现登陆B站的源码.也就是易语言POST.因为B站加密了.所以要用到Js解密哦.第一次解密

  1. .版本 2

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

  3. .子程序 _按钮1_被单击

  4. 编辑框3.内容 = 登录 (编辑框1.内容, 编辑框2.内容)


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

  6. V8.InitializeV8 ()

  7. .子程序 密码, 文本型
  8. .参数 pwd, 文本型
  9. .参数 key, 文本型
  10. .参数 hash, 文本型
  11. .局部变量 返回密码, 文本型

  12. 返回密码 = V8.ExecJavaScriptV8 (#JS, “test('” + pwd + “','” + key + “','” + hash + “')”, , )
  13. 返回密码 = 文本_替换 (返回密码, , , , “=”, “%3D”, “+”, “%2B”, “/”, “%2F”, , , , )
  14. 返回 (返回密码)

  15. .子程序 登录, 文本型
  16. .参数 账号, 文本型
  17. .参数 密码, 文本型
  18. .局部变量 str, 文本型
  19. .局部变量 hash, 文本型
  20. .局部变量 key, 文本型
  21. .局部变量 gt, 文本型
  22. .局部变量 challenge, 文本型
  23. .局部变量 提交key, 文本型
  24. .局部变量 滑块, 文本型
  25. .局部变量 challenge1, 文本型
  26. .局部变量 validate, 文本型
  27. .局部变量 data, 文本型
  28. .局部变量 cookie, 文本型
  29. '易语言学习吧分享www.eyy8.vip
  30. str = 到文本 (网页_访问_对象 (“https://passport.bilibili.com/login?act=getkey&r=0.” + 文本_取随机数字 (16, ), , , , , , , , , , , , , , , , , , ))
  31. hash = 文本_取出中间文本 (str, “hash” + #引号 + “:” + #引号, #引号, , )
  32. key = 文本_取出中间文本 (str, “-----BEGIN PUBLIC KEY-----\n”, “\n-----END P”, , )

  33. str = 到文本 (网页_访问_对象 (“https://passport.bilibili.com/web/captcha/combine?plat=6”, , , , , , , , , , , , , , , , , , ))
  34. gt = 文本_取出中间文本 (str, “gt” + #引号 + “:” + #引号, #引号, , )
  35. challenge = 文本_取出中间文本 (str, “challenge” + #引号 + “:” + #引号, #引号, , )
  36. 提交key = 文本_取出中间文本 (str, “key” + #引号 + “:” + #引号, #引号, , )


  37. ' -----我对接的滑块平台,自己找个平台可以对接登录


  38. data = “captchaType=6&username=” + 账号 + “&password=” + 密码 (密码, key, hash) + “&keep=true&key=” + 提交key + “&goUrl=https%3A%2F%2Fwww.bilibili.com%2F&challenge=” + challenge1 + “&validate=” + validate + “&seccode=” + validate + “%7Cjordan”
  39. str = 编码_URL解码 (到文本 (网页_访问_对象 (“https://passport.bilibili.com/web/login/v2”, 1, data, , cookie, , , , , , , , , , , , , , )), 真)
  40. 返回 (str)

复制代码
源码下载:

哔哩哔哩登录源码.e

942.95 KB, 下载次数: 59

售价: 2 易币  [记录]

3

主题

19

帖子

112

积分

易语言菜鸟

Rank: 2

积分
112
威望
0
易币
93
贡献
0
积分
112
UID
1638
在线时间
3 小时
注册时间
2020-2-17
发表于 2020-3-2 16:19:37 | 显示全部楼层
哇,好棒,谢谢,我下载了
回复

使用道具 举报

0

主题

6

帖子

9

积分

初识易语言

Rank: 1

积分
9
威望
0
易币
3
贡献
0
积分
9
UID
2426
在线时间
2 小时
注册时间
2020-3-11
发表于 2020-3-11 21:17:06 | 显示全部楼层
谢谢楼主分享
回复

使用道具 举报

0

主题

6

帖子

17

积分

初识易语言

Rank: 1

积分
17
威望
0
易币
11
贡献
0
积分
17
UID
2720
在线时间
1 小时
注册时间
2020-3-20
发表于 2020-3-20 22:54:07 | 显示全部楼层
感谢楼主分享,找点资源是真不容易
回复

使用道具 举报

1

主题

9

帖子

93

积分

易语言菜鸟

Rank: 2

积分
93
威望
0
易币
84
贡献
0
积分
93
UID
3397
在线时间
1 小时
注册时间
2020-4-4
发表于 2020-4-4 11:32:42 | 显示全部楼层
感谢楼主的分享
回复

使用道具 举报

0

主题

6

帖子

13

积分

初识易语言

Rank: 1

积分
13
威望
0
易币
7
贡献
0
积分
13
UID
3541
在线时间
2 小时
注册时间
2020-4-7
发表于 2020-4-7 17:51:28 | 显示全部楼层
不懂。。。
回复

使用道具 举报

0

主题

21

帖子

45

积分

初识易语言

Rank: 1

积分
45
威望
0
易币
24
贡献
0
积分
45
UID
3774
在线时间
0 小时
注册时间
2020-4-11
发表于 2020-4-11 19:34:28 | 显示全部楼层
1111111111
回复

使用道具 举报

0

主题

11

帖子

19

积分

初识易语言

Rank: 1

积分
19
威望
0
易币
8
贡献
0
积分
19
UID
2933
在线时间
1 小时
注册时间
2020-3-24
发表于 2020-4-12 16:21:59 | 显示全部楼层
楼主发贴辛苦了,谢谢楼主分享!我觉得易语言吧是注册对了!
回复

使用道具 举报

0

主题

4

帖子

4

积分

初识易语言

Rank: 1

积分
4
威望
0
易币
0
贡献
0
积分
4
UID
4371
在线时间
0 小时
注册时间
2020-4-24
发表于 2020-4-24 00:17:59 | 显示全部楼层

这东西我收了!谢谢楼主!易语言吧真好!
回复

使用道具 举报

1

主题

17

帖子

177

积分

易语言菜鸟

Rank: 2

积分
177
威望
0
易币
160
贡献
0
积分
177
UID
4470
在线时间
2 小时
注册时间
2020-4-25
发表于 2020-4-26 16:37:48 | 显示全部楼层
楼主发贴辛苦了,谢谢楼主分享!我觉得易语言吧是注册对了!
回复

使用道具 举报

懒得打字嘛,点击右侧快捷回复 【选择右侧内容,快速回复】
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

大漠插件注册码无须等1-3号

QQ|一:站内所有资源均来自互联网收集或用户上传分享,本站不拥有此类资源的版权。 作为网络服务提供者,对转载行为的发生不具备充分的监控能力。但是当版权拥有者提出侵权并出示充分的版权证明材料时,易语言吧负有移除转载作品以及停止继续传播的义务。在满足前款条件下采取移除等相应措施后不为此向原发布人承担违约责任,包括不承担因侵权不成立而给原发布人带来损害的赔偿责任。 用户免费分享产生,如果侵犯了你的权益,联系QQ:3066137757|Archiver|手机版|小黑屋|易语言吧

GMT+8, 2024-11-25 15:17 , Processed in 0.269829 second(s), 45 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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