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

extjs之去除s.gif的影响

Dec 25 Javascript

jquery实现网站超链接和图片提示效果

Mar 21 Javascript

关于jQuery对象数据缓存Cache原理以及jQuery.data详解

Apr 07 Javascript

jQuery后代选择器用法实例

Dec 23 Javascript

AngularJs concepts详解及示例代码

Sep 01 Javascript

Ajax和Comet技术总结

Feb 19 Javascript

BootStrap+Mybatis框架下实现表单提交数据重复验证

Mar 23 Javascript

jQuery实现radio第一次点击选中第二次点击取消功能

May 15 jQuery

knockoutjs模板实现树形结构列表

Jul 31 Javascript

Vue手把手教你撸一个 beforeEnter 钩子函数

Apr 24 Javascript

微信小程序云开发之模拟后台增删改查

May 16 Javascript

简单了解Vue computed属性及watch区别

Jul 10 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