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

js字符串转换成xml对象并使用技巧解读

Apr 18 Javascript

各种页面定时跳转(倒计时跳转)代码总结

Oct 24 Javascript

Javascript事件实例详解

Nov 06 Javascript

利用javascript实现禁用网页上所有文本框,下拉菜单,多行文本域

Dec 14 Javascript

js菜单点击显示或隐藏效果的简单实例

Jan 13 Javascript

JS 日期比较大小的简单实例

Jan 13 Javascript

JavaScript实现穷举排列(permutation)算法谜题解答

Dec 29 Javascript

JavaScript常用脚本汇总（一）

Mar 04 Javascript

基于JavaScript代码实现pc与手机之间的跳转

Dec 23 Javascript

浅谈jquery的map()和each()方法

Jun 12 Javascript

JS原型和原型链原理与用法实例详解

Feb 05 Javascript

解决vue项目打包上服务器显示404错误,本地没出错的问题

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