用vb和vbs 破解flashxp的密码的代码

整个在新版中，不是明文的密码字符串了，建议大家都升级到新版本中
vbs版

Function DecryptFlashFXP(password)
magic = Split("121,65,51,54,122,65,52,56,100,69,104,102,114,118,103,104,71,82,103,53,55,104,53,85,108,68,118,51", ",")
chrlast = CInt("&H" & Mid(password, 1, 2))
magicnum = 0

For X = 3 To Len(password) Step 2
chrtmp = CInt("&H" & Mid(password, X, 2))
chrresulta = (chrtmp Xor magic(magicnum))
chrresultb = chrresulta - CInt(chrlast)

If chrresultb > 255 Or chrresultb 27 Then
magicnum = 0
End If
Next

DecryptFlashFXP = pwdtmp
End Function

MsgBox DecryptFlashFXP("41F072E8799083F973B8BF99987D81886A")

[Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]

vb版
vb 破解flashxp的密码,他的密码放在 Sites.dat 文件中,大家打开这个文件,可以看到如下：
Pass=7B9A439CCB4FC1C7C2
等号后面的就是加密之后的密码,用下面的模块可以解开：


代码如下:

Public Function DecryptFlashFXP(password As String) As String 
Dim x As Integer 
Dim magic() As String 
Dim chrresulta As Integer 
Dim chrresultb As Integer 
Dim chrlast As Integer 
Dim chrtmp As Integer 
Dim magicnum As Integer 
Dim pwdtmp As String 
'MAGIC BUFFER = "yA36zA48dEhfrvghGRg57h5 
'   UlDv3" 
magic = Split("121,65,51,54,122,65,52,56,100,69,104,102,114,118,103,104,71,82,103,53,55,104,53,85,108,68,118,51", ",") 
chrlast = Val("&H" & Mid(password, 1, 2)) 
magicnum = 0

For x = 3 To Len(password) Step 2 
  chrtmp = Val("&H" & Mid(password, x, 2)) 
  chrresulta = (chrtmp Xor magic(magicnum)) 
  chrresultb = chrresulta - Val(chrlast)

If chrresultb > 255 or chrresultb < 0 Then 
    chrresultb = chrresultb - &HFFFFFF01 
  End If 
  chrlast = chrtmp 
  pwdtmp = pwdtmp & Chr(chrresultb) 
  magicnum = magicnum + 1

If magicnum > 27 Then 
    magicnum = 0 
  End If 
Next x 
DecryptFlashFXP = pwdtmp 
End Function

赞 (0)

相关推荐

  • 用vb和vbs 破解flashxp的密码的代码

    整个在新版中,不是明文的密码字符串了,建议大家都升级到新版本中vbs版 Function DecryptFlashFXP(password) magic = Split("121,65,51,54,122,65,52,56,100,69,104,102,114,118,103,104,71,82,103,53,55,104,53,85,108,68,118,51", ",") chrlast = CInt("&H" & Mid(p

  • Python实现在线暴力破解邮箱账号密码功能示例【测试可用】

    本文实例讲述了Python实现在线暴力破解邮箱账号密码功能.分享给大家供大家参考,具体如下: dic 字典格式如下(mail.txt) : username@gmail.com:password username@gmail.com:password username@gmail.com:password 以此类推,切记保存成utf-8编码格式. 放置在当前脚本目录,也可自己定义修改. 支持ssl https /imap协议. # version 3.4.0 # coding='UTF-8' #

  • 详解python破解zip文件密码的方法

    1.单线程破解纯数字密码 注意: 不包括数字0开头的密码 import zipfile,time,sys start_time = time.time() def extract(): zfile = zipfile.ZipFile('IdonKnow.zip')#读取压缩包,如果用必要可以加上'r' for num in range(1,99999,1): try: pwd = str(num) zfile.extractall(path='.',pwd=pwd.encode('utf-8')

  • Python破解网站登录密码脚本

    Python破解网站登录密码脚本

    目录 关键代码解释 完整代码 方法一 运行结果 方法二 运行结果 测试靶机为DVWA,适合DVWA暴力破解模块的Low和Medium等级 关键代码解释 url指定url地址 url = "http://192.168.171.2/dvwa/vulnerabilities/brute/" header设置请求头 header = { 'User-Agent':'Mozilla/5.0 (Windows NT 10.0; WOW64; rv:46.0) Gecko/20100101 Fir

  • Python实现破解网站登录密码(带token验证)

    Python实现破解网站登录密码(带token验证)

    目录 前言 关键代码解释 完整代码 运行结果 补充 前言 上一篇暴力破解文章:一个简单的Python暴力破解网站登录密码脚本 测试靶机为Pikachu漏洞练习平台暴力破解模块下的 “token防爆破?” 春节期间歇了一阵子,吃睡玩看小说.写这个脚本的起因是因为burp设置带token的暴力破解我只会用pitchfork草叉模式,要是用cluster bomb集束炸弹模式笛卡儿积那样就不会了,所以就干脆把之前写的脚本加了点东西实现这个功能了,到时候有空再学学多线程,爆破速度就更快了. 关键代码解释

  • Python破解excel进入密码的过程详解

    Python破解excel进入密码的过程详解

    目录 一.excel进入密码 二.密码解除思路 三.python 1.conf.ini 2.crack.py 一.excel进入密码 加密算法cipher Algorithm=“AES” AES加密算法的详细介绍与实现 二.密码解除思路 通过排列组合的方式进行查找 注意:此方法比较考验对密码字典的选取,且耗费时间较长,仅供参考学习!! 文件夹如图所示: 将待破解的文件放到excel文件夹中. 三.python 1.conf.ini 将准备好的密码字典添加到conf.ini中password后面,

  • python pyppeteer 破解京东滑块功能的代码

    Pyppeteer简介 介绍Pyppeteer之前先说一下Puppeteer,Puppeteer是谷歌出品的一款基于Node.js开发的一款工具,主要是用来操纵Chrome浏览器的 API,通过Javascript代码来操纵Chrome浏览器,完成数据爬取.Web程序自动测试等任务. 在上篇文章给大家详细介绍了python爬虫 Pyppeteer使用方法解析 ,感兴趣的朋友可以点击查看. 今天给大家介绍python pyppeteer 破解京东滑块功能,具体代码如下所示: import asyn

  • vbs后台运行bat删除自身的代码

    知道真实路径的情况下 复制代码 代码如下: set fso=wscript.createobject("scripting.filesystemobject") fso.deletefile "c:\windows\system32\run.cmd" fso.deletefile "c:\windows\system32\run.vbs" 不知道具体的路径情况下,可以用如下代码: 复制代码 代码如下: Set fso =CreateObject(

  • java加密MD5实现及密码验证代码实例

    这篇文章主要介绍了java加密MD5实现及密码验证代码实例,文中通过示例代码介绍的非常详细,对大家的学习或者工作具有一定的参考学习价值,需要的朋友可以参考下 MD5算法具有以下特点: 1.压缩性:任意长度的数据,算出的MD5值长度都是固定的. 2.容易计算:从原数据计算出MD5值很容易. 3.抗修改性:对原数据进行任何改动,哪怕只修改1个字节,所得到的MD5值都有很大区别. 4.强抗碰撞:已知原数据和其MD5值,想找到一个具有相同MD5值的数据(即伪造数据)是非常困难的. MD5的作用是让大容量

  • C#/VB.NET实现HTML转为XML的示例代码

    目录 引入dll 将HTML转为XML C# vb.net 本文以C#及VB.NET后端程序代码示例展示如何将HTML转为XML文件.转换时,调用Word API -Free Spire.Doc for .NET 提供的文档加载方法及文档保存的方法来实现.转换的代码步骤很简单,具体可参考以下内容. 引入dll 1.通过NuGet安装dll(2种方法) 1.1可以在Visual Studio中打开“解决方案资源管理器”,鼠标右键点击“引用”,“管理NuGet包”,然后搜索“Free Spire.D

随机推荐