易语言这个工具其实功能还是很强大的，开发一些简单的工具，易语言可以算得上是神器了哈！那么我们今天给带来的干货是用易语言开发一款快手去水印的工具！工具和源码感兴趣的可以去我的个人站下载这里就不提供了！免得违规！大家可以学习研究哈。
需要的工具和原料：1、易语言5.82、精易模块v8.03、gzip.dll
其实这个软件的功能就是对接了，某快手在线解析平台的Api实现的！原理也简单，复杂的点我们下面也会给大家讲到!
直接给大家上源码吧！
.版本2
.支持库script
.支持库spec
.程序集窗口程序集_启动窗口
.子程序_按钮1_被单击
.局部变量parseTempStr,文本型
.局部变量r,文本型
.局部变量s,文本型
.局部变量c,文本型
.局部变量d,文本型
.局部变量wz,文本型
.局部变量返回1,文本型
.局部变量最终,文本型
.局部变量协议头,文本型
.局部变量返回2,文本型
.局部变量替换网址,文本型
wz＝编辑框1.内容
脚本组件1.执行(#js)
调试输出(脚本组件1.运行(“generateRandom”,))
r＝脚本组件1.运行(“csr”,)
parseTempStr＝编辑框1.内容＋“@&^”＋r
调试输出(脚本组件1.运行(“generateStr”,parseTempStr))
s＝脚本组件1.运行(“generateStr”,parseTempStr)
c＝脚本组件1.运行(“generateRandom”,)
编辑框2.内容＝r
编辑框3.内容＝s
编辑框5.内容＝c
替换网址＝文本_替换(编辑框1.内容,1,,,“https://”,“”)
调试输出(替换网址)
编辑框4.内容＝“http://3g.gljlw.com/diy/ttxs_ks.php?url=https%3A//”＋替换网址＋“&r=”＋r＋“&s=”＋s
延迟(1000)
最终＝编辑框4.内容
返回1＝编码_utf8到gb2312(到文本(网页_GZIP解压(网页_访问_对象(最终,0,,,,#协议头,#协议头,,,,,5000,,))))
编辑框7.内容＝文本_取出中间文本(返回1,#前面,#后面)
.子程序__启动窗口_创建完毕
.子程序_编辑框5_内容被改变
.子程序_编辑框4_内容被改变
.子程序_按钮2_被单击
上面这个代码是经过全选复制的内容，大家可以直接拷贝到你的程序就OK，程序界面设置成像我这个一样的就行！
?
一定要设置一样，不然某些代码段会匹配不到！从而导致程序运行失败！
但是这个程序运行是需要GZIP.dll插件才可以，不然程序没办法解析出视频，因为对方平台API返回的是压缩数据！关于这个GZIP.dll，大家自行在百度找，很多的，下载后直接放入到你的程序运行目录即可！
其实还有一些JS代码段，也是比较多，我们就不提供了，建议博客园给广大的开发者提供一个资源和源码提交的地方，这样大家研究起来也方便！
?
?我们这篇文章主要也是传递一个开发的原理，毕竟某些核心的代码还没分享出来，比如JS和一些协议头数据这些！
最终的程序运行效果就是这样的！
?
?如果你没有安装GZIP.dl插件的话就会出现这样的提示窗口：
?
好了再见朋友们。
?
|
|
