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

js/vbs/vbscript加密代码：

源码变异处理 

JS 网页加密   VBS网页加密   VB 脚本加密  说明: 将需要加密的内容 复制到框里， 点相应的按钮， 就可以完成操作 如出现运行错误， 请重新刷新后生成！

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="

function encJSHTM()
{
var k = new String;
var s = new String;
k=document.all.txt.value
for (i=0;i{
s+=k.charCodeAt(i);
if (i!=k.length-1)
{
s+=",";
}
}
s="

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



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



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)



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