开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

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


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

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

查看: 6364|回复: 4
收起左侧

[技术专题] 关于vpm壳授权作弊问题处理方案

[复制链接]
结帖率:94% (131/139)
发表于 2019-11-5 09:45:32 | 显示全部楼层 |阅读模式   山东省青岛市
前排提示:仅供新人学习,大神绕道!
取网络时间源码(此源码理论上windows倒闭的那天才会失效):
  
窗口程序集名保 留  保 留备 注
取网络时间   
变量名类 型数组备 注
m_Data文本型  
m_ret文本型  

子程序名返回值类型公开备 注
时间_取网络时间日期时间型 直接调用系统获取网络时间的来获取最新的网络时间,不要频繁获取会卡的。建议每次获取间隔5秒左右。作者:祁辛
变量名类 型静态数组备 注
Eval文本型 
现行时间日期时间型 
httpWEB (“http://time.windows.com/”, m_ret)
' 调试输出 (m_ret)
m_Data = 文本_取中间文本 (m_ret, “Date:”, “Content-Length:”)
m_Data = 删首尾空 (m_Data)
' 输出调试文本 (m_Data)
Eval = 子文本替换 ( #JS语句代码_网络时间, “[要替换的数据]”, m_Data, , , )
Eval = 子文本替换 (Eval, #换行符, 字符 (32), , , )
' 调试输出 (Eval)
' 调试输出 (JavaScript取值 (Eval))
现行时间 = 获取网络时间 (JavaScript取值 (Eval))
返回 (现行时间)
子程序名返回值类型公开备 注
JavaScript取值长整数型 返回时间戳
参数名类 型参考可空数组备 注
EVAL文本型
变量名类 型静态数组备 注
script对象 
returns变体型 
script.创建 (“scriptcontrol”, )
script.写属性 (“Language”, “JScript”)
script.通用方法 (“ExecuteStatement”, EVAL)
returns = script.通用方法 (“Run”, “getmy”)
返回 (returns.取数值 ())
子程序名返回值类型公开备 注
文本_取中间文本文本型 根据指定内容返回中间文本
参数名类 型参考可空数组备 注
src文本型原文本需要寻找的文本
left文本型要寻找的文本的左边
right文本型要寻找文本的右边
变量名类 型静态数组备 注
retstr文本型 
leftlen整数型左边文本的位置
rightlent整数型右边文本的位置
retstr = “”
如果 (是否为空 (right))
rightlent = 取文本长度 (src)  ' 如果未提供右边的文本那么默认到文本末尾
rightlent = 寻找文本 (src, right, 1, )
leftlen = 寻找文本 (src, left, 1, )
如果真 (leftlen ≠ -1 rightlent ≠ -1)
retstr = 取文本中间 (src, leftlen + 取文本长度 (left), rightlent (leftlen + 取文本长度 (left)))
返回 (retstr)
子程序名返回值类型公开备 注
获取网络时间日期时间型 
参数名类 型参考可空数组备 注
网络时间戳长整数型
变量名类 型静态数组备 注
网络时间日期时间型 
网络时间 = 增减时间 ([1970年1月1日8时], #秒, 网络时间戳 ÷ 1000)
' 调试输出 (网络时间)
返回 (网络时间)
子程序名返回值类型公开备 注
httpWEB字节集 
参数名类 型参考可空数组备 注
地址文本型
返回的协yi头文本型
变量名类 型静态数组备 注
httpObj对象 
Object变体型 
源代码字节集 
CoInitialize (0)
httpObj.创建 (“WinHttp.WinHttpRequest.5.1”, )
httpObj.方法 (“settimeouts”, 3000, 3000, 3000, 3000)
httpObj.通用方法 (“Open”, “GET”, 地址, 假, )
httpObj.方法 (“SetRequestHeader”, “Accept”, “application/json, text/javascript, */*”)
httpObj.方法 (“SetRequestHeader”, “Accept-Language”, “zh-cn,zh;q=0.8,en-us;q=0.5,en;q=0.3”)
httpObj.方法 (“setRequestHeader”, “Charset”, “gb2312”)
httpObj.方法 (“SetRequestHeader”, “User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64; Trident/7.0; rv:11.0) like Gecko”)
httpObj.方法 (“Send”, )
如果真 (取反 (是否为空 (返回的协yi头)))
返回的协yi头 = httpObj.读文本属性 (“GetAllResponseHeaders”, )
源代码 = httpObj.读属性 (“responseBody”, ).取字节集 ()
httpObj.清除 ()
CoUninitialize ()
返回 (源代码)

下面觉大部分人应该清楚了,既然修改系统时间可以绕过授权验证。
那好!我不允许你系统时间和网络时间误差大于一小时。
(正常用电脑谁会允许自己电脑时间误差这么大呢)
比较损的办法就是自动同步网络时间,也就是过一段时间自动给他设置本机时间为网络时间。。。。
【反正我个人不建议使用这种方法】

至于如何防止被反编译。。。
咳咳,你确定你搞明白你是在问什么了么?vmp是干嘛的?就是防止反编译的啊喂!

原教程贴:https://bbs.125.la/forum.php?mod=viewthread&tid=13761829

@405817530 【此人估计已经退坑了】



补充内容 (2019-11-12 11:40):
然而我还是不会用。。。。

结帖率:65% (22/34)

签到天数: 1 天

发表于 2019-12-8 00:55:48 | 显示全部楼层   安徽省芜湖市
66666666666666666666
回复 支持 反对

使用道具 举报

结帖率:100% (3/3)
发表于 2019-11-18 20:25:48 | 显示全部楼层   河北省廊坊市
学习了            
回复 支持 反对

使用道具 举报

发表于 2019-11-9 11:01:36 | 显示全部楼层   云南省昆明市
观摩,,,,,,,
回复 支持 反对

使用道具 举报

发表于 2019-11-7 02:53:19 | 显示全部楼层   广西壮族自治区河池市
仅供新人学习
回复 支持 反对

使用道具 举报

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

本版积分规则 致发广告者

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

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

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