编程 Javascript

教你如何解密js/vbs/vbscript加密的编码异处理小结

Posted in Javascript onJune 25, 2008

js/vbs/vbscript加密代码：

<body style="font:12px">
<fieldset>
<legend align="center">源码变异处理 </legend>
<table>
<tr valign=top>
<td><br>
<button onclick=encJSHTM()> JS 网页加密 </button><br>
<button onclick=encVBSHTM()> VBS网页加密 </button><br>
<button onclick=encVBS()> VB 脚本加密 </button><br>
<br><p style="font:12px">
说明:<br><br>
将需要加密的内容<br>复制到框里，<br>点相应的按钮，<br>就可以完成操作<br><br>
如出现运行错误，<br>请重新刷新后生成！</p>
</td>
<td>
<textarea id=txt cols=100% rows=20></textarea>
</td>
</table>
<script language=vbscript>

function change(k)
s=""
for i = 1 to Len(k)
s=s&ascw(mid(k,i,1))&","
next
change=left(s,len(s)-1)
end function

Sub encVBS()
s="function rechange(k)"+vbcrlf+"s=Split(k,"","")"+vbcrlf+"t="""""+vbcrlf+"For i = 0 To UBound(s)"+vbcrlf+"t=t+Chrw(eval(s(i)))"+vbcrlf+"Next"+vbcrlf+"rechange=t"+vbcrlf+"End Function"+vbcrlf+"t="""+change(Document.all.txt.value)+""""+vbcrlf+"execute(rechange(t))"
Document.all.txt.value=s
End sub

Sub nencJSHTM()
s="<script>"+vbcrlf+"t="""+change(Document.all.txt.value)+""""+vbcrlf+"t=eval(""String.fromCharCode(""+t+"")"");"+vbscrlf+"document.write(t);</"+"script>"
Document.all.txt.value=s

End Sub

Sub encVBSHTM()
s="<script language=vbscript>"+vbcrlf+"function rechange(k)"+vbcrlf+"s=Split(k,"","")"+vbcrlf+"t="""""+vbcrlf+"For i = 0 To UBound(s)"+vbcrlf+"t=t+Chrw(eval(s(i)))"+vbcrlf+"Next"+vbcrlf+"rechange=t"+vbcrlf+"End Function"+vbcrlf+"t="""+change(Document.all.txt.value)+""""+vbcrlf+"document.write rechange(t)"+vbcrlf+"</scri"+"pt>"
Document.all.txt.value=s
End sub
</script>
<script language=javascript>
function encJSHTM()
{
var k = new String;
var s = new String;
k=document.all.txt.value
for (i=0;i<k.length ;i++ )
{
s+=k.charCodeAt(i);
if (i!=k.length-1)
{
s+=",";
}
}
s="<script>\nt=\""+s+"\"\nt=eval(\"String.fromCharCode(\"+t+\")\");\ndocument.write(t);</"+"script>";
document.all.txt.value=s;
}
</script>
</fieldset>

第二步我们做个测试用js加密上面的代码，加密效果如下：

其实我们可以根据以上的加密源码，做出解密源码，代码如下:

<textarea id=txt cols=100% rows=20></textarea>
<script language=vbscript>
function rechange(k)
s=Split(k,",")
t=""
For i = 0 To UBound(s)
t=t+Chrw(eval(s(i)))
Next
rechange=t
End Function
t="" //把加密的数字放到""里保存，然后打开我们就看到代码了！
txt.value=rechange(t)
</script>

到此我们的解密就完成了！
js/vbs/vbscript通用解码!

教你如何解密js/vbs/vbscript加密的编码异处理小结

声明：登载此文出于传递更多信息之目的，并不意味着赞同其观点或证实其描述。

Javascript 相关文章推荐

prototype1.4中文手册

Sep 22 Javascript

js 颜色选择器（兼容firefox）

Mar 05 Javascript

提取字符串中年月日的函数代码

Nov 05 Javascript

一个CSS+jQuery实现的放大缩小动画效果

Feb 19 Javascript

IE浏览器不支持getElementsByClassName的解决方法

Aug 27 Javascript

javascript实现节点（div）名称编辑

Dec 17 Javascript

javascript实现添加附件功能的方法

Nov 18 Javascript

JavaScript tab选项卡插件实例代码

Feb 23 Javascript

Javascript设计模式之观察者模式(推荐)

Mar 29 Javascript

jquery拖动改变div大小

Jul 04 jQuery

vue通过点击事件读取音频文件的方法

May 30 Javascript

微信小程序开发背景图显示功能

Aug 08 Javascript

JS解密入门最终变量劫持

Jun 25 #Javascript

JS解密入门之凭直觉解

Jun 25 #Javascript

js异或加解密效果代码

Jun 25 #Javascript

asp批量修改记录的代码

Jun 25 #Javascript

js innerHTML 的一些问题的解决方法

Jun 22 #Javascript

很酷的javascript loading效果代码

Jun 18 #Javascript

豆瓣网的jquery代码实例

Jun 15 #Javascript