服务器之家:专注于服务器技术及软件下载分享
分类导航

PHP教程|ASP.NET教程|Java教程|ASP教程|编程技术|正则表达式|C/C++|IOS|C#|Swift|Android|VB|R语言|JavaScript|易语言|vb.net|

服务器之家 - 编程语言 - 易语言 - 易语言通过解析破解艾奇学院的收费视频的代码

易语言通过解析破解艾奇学院的收费视频的代码

2022-02-19 17:17易语言源码贝贝吧 易语言

今天小编就为大家分享一篇关于易语言通过解析破解艾奇学院的收费视频的代码,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来看看吧

常量数据表

?
1
2
.版本 2
.常量 常量1, "<文本长度: 51>", , href="/home.php?m=Order&a=subCourseConfirm&id=.*?" rel="external nofollow"

艾奇学院收费视频破解的代码

此功能需要加载精易模块5.6

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
.版本 2
.支持库 iext
.支持库 HtmlView
.支持库 eAPI
.程序集 窗口程序集_启动窗口
.程序集变量 vid, 文本型
.程序集变量 章节, 整数型
.子程序 _获取按钮_被单击
.局部变量 网页源码, 文本型
.局部变量 code, 文本型
.局部变量 课程id, 文本型
.局部变量 ID正则, 正则表达式类
.局部变量 i, 整数型
.局部变量 表项, 整数型
课程id = 文本_取出中间文本 (课程地址编辑框.内容, “http://www.27sem.com/course/details/”, “.html”, )
网页源码 = 编码_utf8到gb2312 (到文本 (网页_访问 (“http://www.27sem.com/home.php?m=Course&a=details&id=” + 课程id + “&p=” + 页数编辑框.内容)))
ID正则.创建 (“a=subCourseConfirm&id=(.+?)” + #引号, 网页源码, , , , )
选择列表框1.清空 ()
.计次循环首 (ID正则.取匹配数量 (), i)
  选择列表框1.加入项目 (ID正则.取子匹配文本 (i, 1, ), )
.计次循环尾 ()
选择列表框1.现行选中项 = 0
获取vid ()
.子程序 课程信息
.局部变量 地址源码, 文本型
.局部变量 JSON1, 类_json
.局部变量 mp4, 文本型
.局部变量 videolink, 文本型
.局部变量 packageUrl, 文本型
.局部变量 title, 文本型
.局部变量 swf, 文本型
地址源码 = 编码_utf8到gb2312 (到文本 (网页_访问 (“http://player.polyv.net/videojson/” + vid + “.js”)))
JSON1.解析 (地址源码)
title = JSON1.取通用属性 (“title”)
透明标签1.标题 = title
videolink = JSON1.取通用属性 (“videolink”)
packageUrl = JSON1.取通用属性 (“packageUrl”)
mp4 = JSON1.取通用属性 (“mp4”)
swf = JSON1.取通用属性 (“swf_link”)
m3u8编辑框.内容 = videolink
mp4编辑框.内容 = mp4
下载地址编辑框.内容 = packageUrl
浏览器播放编辑框.内容 = “http://player.polyv.net/videos/player.swf?id=” + vid + “&code=GXj6zdgoRp1NimVFviFLgP8&watchEndTime=1115&autoplay=true&setScreen=16_9&watchStartTime=63.00&ban_history_time=on&vid=” + vid + “&start=-1&end=-1&”
.子程序 _m3u8按钮_被单击
超文本浏览框1.地址 = “http://www.654320.com/ckplayer/ckplayer.swf?f=m3u8.swf&s=3&a=” + m3u8编辑框.内容
.子程序 _mp4按钮_被单击
超文本浏览框1.地址 = “http://www.654320.com/ckplayer/ckplayer.swf?f=” + mp4编辑框.内容
.子程序 _视频下载按钮_被单击
打开指定网址 (下载地址编辑框.内容)
.子程序 _打开按钮_被单击
打开指定网址 (浏览器播放编辑框.内容)
.子程序 __启动窗口_创建完毕
.子程序 获取vid
.局部变量 ID, 文本型
.局部变量 数据源, 文本型
.局部变量 JSON, 类_json
ID = 选择列表框1.取项目文本 (选择列表框1.现行选中项)
数据源 = 编码_utf8到gb2312 (到文本 (网页_访问 (“http://www.27sem.com/home.php?m=Course&a=getCoursePlaying”, 1, “id=” + ID + “&code=GXj6zdgoRp1NimVFviFLgP8”, )))
JSON.解析 (数据源)
vid = JSON.取通用属性 (“polyv_vid”)
课程信息 ()
.子程序 _选择列表框1_列表项被选择
获取vid ()

运行结果:

易语言通过解析破解艾奇学院的收费视频的代码

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对服务器之家的支持。如果你想了解更多相关内容请查看下面相关链接

延伸 · 阅读

精彩推荐
  • 易语言易语言在画板中写出指定文本当画板中已满会自动滚屏

    易语言在画板中写出指定文本当画板中已满会自动滚屏

    今天小编就为大家分享一篇关于易语言在画板中写出指定文本当画板中已满会自动滚屏,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,...

    易语言帮助手册9092022-01-12
  • 易语言一步一步跟我学易语言之第二个易程序菜单设计

    一步一步跟我学易语言之第二个易程序菜单设计

    今天小编就为大家分享一篇关于的一步一步跟我学易语言之第二个易程序菜单设计,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要...

    易语言帮助手册7092021-06-17
  • 易语言易语言生成exe文件的方法

    易语言生成exe文件的方法

    在本篇内容中小编给大家分享的是关于易语言生成exe文件的方法知识点,需要的朋友们参考下。...

    易语言教程网14792022-03-01
  • 易语言易语言获取指定磁盘的名称

    易语言获取指定磁盘的名称

    今天小编就为大家分享一篇关于易语言获取指定磁盘的名称,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随小编来...

    易语言帮助手册12662022-01-04
  • 易语言易语言关于程序进程和线程的基础知识

    易语言关于程序进程和线程的基础知识

    今天小编就为大家分享一篇关于易语言关于程序进程和线程的基础知识,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起...

    三叶资源网6662022-02-24
  • 易语言一步一步跟我学易语言之关于变量

    一步一步跟我学易语言之关于变量

    今天小编就为大家分享一篇关于一步一步跟我学易语言之关于变量,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随...

    易语言帮助手册10822021-06-17
  • 易语言实例操作易语言载入窗口

    实例操作易语言载入窗口

    在本文中小编给大家整理的是关于易语言载入窗口的教程和步骤内容,需要的可以跟着学习下...

    易语言教程网19162022-03-02
  • 易语言易语言设置进度条边框样式的方法

    易语言设置进度条边框样式的方法

    今天小编就为大家分享一篇关于易语言设置进度条边框样式的方法,小编觉得内容挺不错的,现在分享给大家,具有很好的参考价值,需要的朋友一起跟随...

    易语言帮助手册4422022-01-20