网站首页  汉语字词  英语词汇  考试资料  写作素材  旧版资料

请输入您要查询的考试资料:

 

标题 网络程序员伴侣Lshdic--脚本加解密器
内容
    功能比较强大的一款加密器,包括加密前后的测试与常规字符统计,加密方式包括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>
随便看

 

在线学习网考试资料包含高考、自考、专升本考试、人事考试、公务员考试、大学生村官考试、特岗教师招聘考试、事业单位招聘考试、企业人才招聘、银行招聘、教师招聘、农村信用社招聘、各类资格证书考试等各类考试资料。

 

Copyright © 2002-2024 cuapp.net All Rights Reserved
更新时间:2025/5/19 18:28:53