• 欢迎访问搞代码网站,推荐使用最新版火狐浏览器和Chrome浏览器访问本网站!
  • 如果您觉得本站非常有看点,那么赶紧使用Ctrl+D 收藏搞代码吧

php vbs加密复原

php 搞代码 4年前 (2022-01-24) 21次浏览 已收录 0个评论

php vbs加密还原
js加密还原

原过程

var pwd = theform.PassWord.value;var rndNum = 394058;rndNum = rndNum.toString();var curPos = 0;var tmpStr,EnCryptStr = "";for(Cnt=0;Cnt<pwd.length;Cnt++){    if(Cnt % rndNum.length == 0 ) curPos = 0;    tmpStr = pwd.substring(Cnt,Cnt+1);    EnCryptStr += String.fromCharCode(tmpStr.charCodeAt(0) - Cnt - rndNum.substring(curPos,curPos+1));    curPos +=1;}theform.PassWord.value = EnCryptStr;//Assigned the EncryptPassword value to the PassWord TextFiledtheform.EnRndNum.value = rndNum;

用php还原$pwd = "";$rndNum = "394058";$curPos = 0;$tmpStr = "";$EnCryptStr = "";for($Cnt=0;$Cnt&lt;strlen($pwd);$Cnt++)        {            if($Cnt % strlen($rndNum) == 0 ) $curPos = 0;            $tmpStr = substr($pwd,$Cnt,1);            $EnCryptStr = $EnCryptStr. fromCharCode(charCodeAt($tmpStr) - $Cnt - substr($rndNum,$curPos,1));                        $curPos +=1;         }echo $EnCryptStr;echo ''&lt;br&gt;'';echo $rndNum;echo ''&lt;br&gt;'';echo EncryptString($EnCryptStr);function fromCharCode($codes) {   if (is_scalar($codes)) $codes= func_get_args();   $str= '''';   foreach ($codes as $code) $str.= chr($code);   return $str;}function charCodeAt($word) {  if (is_array($word))    $arr = $word;  else      $arr = str_split($word);  $bin_str = '''';  foreach ($arr as $value)    $bin_str .= decbin(ord($value));  $bin_str = preg_replace(''/^.{4}(.{4}).{2}(.{6}).{2}(.{6})$/'',''$1$2$3'', $bin_str);  return bindec($bin_str);}

vbs加密还原

原函数Function EncryptString(InputText , ThePassword )''用户口令加密     Dim il_bit, il_x, il_y, il_z, il_len, i     Dim is_out     Password = InputText     il_len = Len(Password)     il_x = 0     il_y = 0     is_out = ""     For i = 1 To il_len         il_bit = AscW(Mid(Password, i, 1)) ''W系列支持unicode         il_y = (il_bit * 13 Mod 256) + il_x         is_out = is_out & ChrW(Fix(il_y)) ''取整 int和fix区别: fix修正负数         il_x = il_bit * 13 / 256     Next     is_out = is_out & ChrW(Fix(il_x))     Password = is_out     il_len = Len(Password)     il_x = 0     il_y = 0     is_out = ""     For i = 1 To il_len         il_bit = AscW(Mid(Password, i, 1)) ''取前4位值         il_y = il_bit / 16 + 64         is_out = is_out & ChrW(Fix(il_y)) ''取后4位值         il_y = (il_bit Mod 16) + 64         is_out = is_out & ChrW(Fix(il_y))     Next     EncryptString = is_out     End Function }

用php还原function EncryptString($Password){      //密码前端加密部分    $il_len = strlen($Password);    $il_x = 0;    $il_y = 0;    $is_out = "";    for($i=0;$i< $il_len;$i++){        $il_bit = ord(substr($Password, $i, 1));        $il_y = ($il_bit * 13 % 256) + $il_x;        $is_out = $is_out. Chr(fix($il_y));        $il_x = $il_bit * 13 / 256;    }    $is_out = $is_out. Chr(fix($il_x));    $Password = $is_out;    $il_len = strlen($Password);    $il_x = 0;    $il_y = 0;    $is_out = "";    for($i=0;$i<$il_len;$i++){        $il_bit = ord(substr($Password, $i, 1));        $il_y = $il_bi<mark style="color:transparent">本%文来源gaodaimacom搞#^代%!码网@</mark>搞代gaodaima码t / 16 + 64;         $is_out = $is_out. Chr(fix($il_y));        $il_y = ($il_bit % 16) + 64;         $is_out = $is_out. Chr(fix($il_y));    }    return $is_out; }function fix($il_y) {   if(floor($il_y) < 0){        return floor($il_y)+1;   }else{        return floor($il_y);   }}

搞代码网(gaodaima.com)提供的所有资源部分来自互联网,如果有侵犯您的版权或其他权益,请说明详细缘由并提供版权或权益证明然后发送到邮箱[email protected],我们会在看到邮件的第一时间内为您处理,或直接联系QQ:872152909。本网站采用BY-NC-SA协议进行授权
转载请注明原文链接:php vbs加密复原
喜欢 (0)
[搞代码]
分享 (0)
发表我的评论
取消评论

表情 贴图 加粗 删除线 居中 斜体 签到

Hi,您需要填写昵称和邮箱!

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址