网络程序员伴侣Lshdic--脚本加解密器

更新时间：2007年03月21日 00:00:00 作者：

功能比较强大的一款加密器,包括加密前后的测试与常规字符统计,加密方式包括js和vbs,可以选择使用

以下为源码,复制保存为.htm格式即可使用

<HTML>  <HEAD>  <META http-equiv="Content-Type" content="text/html; Charset=gb2312">  <META name="GENERATOR" content="网络程序员伴侣-Lshdic 2002">  <TITLE>网络程序员伴侣Lshdic--脚本加解密器</TITLE>  </HEAD>  <BODY bgcolor="D1DCE7">  <center>  <table width=600 bordercolordark=yellow bordercolorlight=navy border=1 cellspacing=0   bgcolor='EDCDDB' cellpadding=0><tr><td>  <input type=button id=ok1 value="加密前测试" onclick="runpath(txt1.value)"><input   type=button value="常规字符统计" onclick="alert(txt1.value.length)" id=len1>  <Textarea style="width:100%;height:150" id=txt1></textarea>  <input type=button id=js1 value="JS加密↓" onclick="chicks(this);vbs1.disabled=!  vbs1.disabled;"><input type=button id=vbs1 value="vbs加密↓" onclick="forstr();chicks  (this);js1.disabled=!js1.disabled">  <Textarea disabled style="width:100%;height:150;background-color:dddddd"   id=txt2></textarea>  <input type=button id=ok2 value="加密后测试" disabled onclick="runpath(txt2.value)"><input   type=button value="加密字符统计" onclick="alert(txt2.value.length)" id=len2 disabled>  </td></tr></table>  <script language=vbs>  dim vbsstr,vbstr  sub forstr  if js1.disabled=false then  vbstr=txt1.value  vbsstr=strreverse(vbstr)  end if  end sub  </script>  <script>  function chicks(where){  jsstr=String.fromCharCode(60)  if(where.value.indexOf('↓')!=-1)  {  where.value=where.value.replace('加密↓','解密↑')  txt1.disabled=true;txt1.style.backgroundColor='dddddd'  txt2.disabled=false;txt2.style.backgroundColor='white'  ok2.disabled=false;ok2.focus();  ok1.disabled=true;len1.disabled=true;len2.disabled=false;  if(where.id=='js1'){  txt2.value='<script>document.write(unescape(\''+escape(txt1.value)+'\'))'+jsstr+'/script>'  txt1.value=""}  else{  txt2.value='<textarea style="display:none"   id=lshdic200Xpage>'+vbsstr+'</textarea>'+jsstr+'script language=vbs>document.write  (strreverse(lshdic200Xpage.value))'+String.fromCharCode(60)+'/script>'  txt1.value=""}  }else{  where.value=where.value.replace('解密↑','加密↓')  txt1.disabled=false;txt1.style.backgroundColor='white'  txt2.disabled=true;txt2.style.backgroundColor='dddddd'  ok2.disabled=true;txt1.focus();ok1.disabled=false;len1.disabled=false;len2.disabled=true;  if(where.id=='js1'){txt1.value=unescape(txt2.value.replace('<script>document.write(unescape  (\'','').replace('\'))'+jsstr+'/script>',''))  txt2.value=""}  else{  txt1.value=vbstr  txt2.value=""}  }}  function runpath(whattxt){  msg1=open('','','')  msg1.document.open()  msg1.document.write(whattxt)  msg1.document.close()  }  </script>  </BODY>  </HTML>

[Ctrl+A 全选注:引入外部Js需再刷新一下页面才能执行]

网络程序员伴侣Lshdic--脚本加解密器

网络程序员伴侣Lshdic--脚本加解密器
网络程序员伴侣Lshdic--脚本加解密器...
2007-03-03
JScript.Encode 脚本在线解密代码
JScript.Encode 脚本在线解密代码...
2007-03-03
解密网页加密的两个方法
不错的一个方法，虽然以前收藏了，不过总忘，这个揭秘方法，一定要记住了
2008-05-05
解密ASP源代码
解密ASP源代码...
2006-08-08
RC4加密关键变量及算法特点原理详解
这篇文章主要为大家介绍了RC4加密关键变量及算法特点原理详解，有需要的朋友可以借鉴参考下，希望能够有所帮助，祝大家多多进步，早日升职加薪
2022-10-10
关于加密解密 Base64 and URL and Hex Encoding and Decoding
关于加密解密 Base64 and URL and Hex Encoding and Decoding...
2007-03-03
Md5密码在线破解
Md5密码在线破解...
2006-08-08
键盘各键对应的键值
键盘各键对应的键值...
2006-09-09
推荐一个javascript的加密工具
推荐一个javascript的加密工具...
2007-01-01
ASP代码加密
ASP代码加密...
2007-01-01

网络程序员伴侣Lshdic--脚本加解密器

相关文章

最新评论

大家感兴趣的内容

最近更新的内容

常用在线小工具