编程 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 相关文章推荐

使用JavaScript switch case 另类写法

Mar 14 Javascript

JavaScript 类的定义和引用 JavaScript高级培训自定义对象

Apr 27 Javascript

常用js字符串判断方法整理

Oct 18 Javascript

使用POST方式弹出窗口的两种方法示例介绍

Jan 29 Javascript

js操作输入框提示信息且响应鼠标事件

Mar 25 Javascript

jQuery模拟点击A标记示例参考

Apr 17 Javascript

jQuery使用hide方法隐藏元素自身用法实例

Mar 30 Javascript

jQuery结合CSS制作漂亮的select下拉菜单

May 03 Javascript

原生JS实现列表子元素顺序反转的方法分析

Jul 02 Javascript

vue中设置、获取、删除cookie的方法

Sep 21 Javascript

js全屏事件fullscreenchange 实现全屏、退出全屏操作

Sep 17 Javascript

weui中的picker使用js进行动态绑定数据问题

Nov 06 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