免费VBscript的混淆

大家好
我有我需要混淆一个相当大的（2k行）VBScript文件。它是一个定制的QTP功能库，因此必须随产品一起分发。有没有免费的VBscript混淆器在那里做一个体面的工作？
谢谢！免费VBscript的混淆

编辑：
加密不适合与QTP一起使用，因此Windows脚本加密工具不起作用，QTP必须能够理解输出。我并没有试图做出输出黑客的证明，只是为了让休闲程序员不费吹灰之力就可以将其解除混淆。

来源

2010-11-23 TerrorAustralis

您可以切换到JScript？ – SLaks 2010-11-23 13:46:47

[VBShaker（http://da440dil.narod.ru/vbshaker.html） - VBScript代码混淆 – 2012-09-29 21:48:57

这里有一个小剧本我刮起了你会混淆任何vbs文件....

混淆是非常简单的，在1分钟使任何人都熟悉vbs可以prolly去混淆它。

如果你想要更高级别的混淆，那么你需要付钱给我... :)但为了这个我会拿你的票！：d

得到的脚本obfuscated.vbs仍将是一个有效的vbs文件。

我本来可以自行解密vbs，但有可能会导致带有防病毒功能的红旗......并且如果您的防病毒功能不错，应该将其标记为可疑。

请注意，标准免责声明适用...我不负责因，也许发生的脚本，风险自担使用任何损害。我不保证它会工作

'VBS Obfuscator by st0le 

Randomize 
set fso = CreateObject("Scripting.FileSystemObject") 
fileName = Inputbox("Enter Path of the File to scramble : ") 
set src = fso.OpenTextfile(fileName,1) 
body = src.readall 
set rep = fso.createtextfile("Obfuscated.vbs",true) 
rep.writeline "Execute(" & Obfuscate(body) & ") " 

Function Obfuscate(txt) 
enc = "" 
for i = 1 to len(txt) 
enc = enc & "chr(" & form(asc(mid(txt,i,1))) & ") & " 
next 
Obfuscate = enc & " vbcrlf " 
End Function 


Function form(n) 

r = int(rnd * 10000) 
k = int(rnd * 3) 
if(k = 0) then ret = (r+n) & "-" & r 
if(k = 1) then ret = (n-r) & "+" & r 
if(k = 2) then ret = (n*r) & "/" & r 
form = ret 
End Function

来源

2010-11-30 09:22:25 st0le

在Windows XP中，您可以使用WSH Script Encoder。
请注意，这是reverse-engineered。

来源

2010-11-23 03:12:28 SLaks

感谢队友，我会看看到它 – TerrorAustralis 2010-11-23 03:28:20

我当时一看进去，它不为这种情况下工作，这是原因。 WSH脚本编码器会将vbs（使其成为vbe文件）“加密”QTP无法再执行。它是一个很好的解决方案，但它没有被混淆，它的加密。 +1找到加密脚本语言的解决方案tho，不知道这是可能的 – TerrorAustralis 2010-11-23 06:01:59

我发现了一个免费的在线VBScript中混淆利用的模糊技术堆栈（以及格式化和最小化）的所有时间：vbsobfuscator.com

来源

2012-02-17 04:06:04 Bosco

免费VBscript的混淆

回答

相关问题