青海龙8国际乐建设、网络推广最好的公司--您身边的龙8国际乐建设专家,马上拿起电话,联系我们:0971-8235355   
青海西宁龙8国际乐建设、龙8国际乐制作公司-西宁威势电子信息服务有限公司
 
西宁威势最新龙8国际乐制做案例展示
Lastest Project
 
当前位置为:首页 >> ASP编程 >> 正文  
龙8国际乐_龙8国际娱乐电脑版_龙8国际娱城手机版

文章来源: 西宁威势电子信息服务有限公司     发布时间:2008-11-14    浏览次数:5703    tags:加密 解密

破解SHOPXP的时候,里面的代码是这样写的:
function UnEncode(temp)
but=1                  
for i =1 to len(temp)
  if mid(temp,i,1)<>"鬼" then
   pk=asc(mid(temp,i,1))-but
   if pk>126 then
    pk=pk-95
   elseif pk<32 then
    pk=pk+95
   end if
   a=a&chr(pk)
  else
   a=a&vbcrlf
  end if
next
UnEncode=a
end function
它的意图是将代码转换成字符串,然后用EXECUTE来执行,达到防止别人破解的目的,这样的加密方法很脆弱,至于怎么破解就不提了。我按解密函数返退一个加密函数,如下:
function Encode(temp)  '我写的加密
but=1
for i =1 to len(temp)
  if mid(temp,i,1)<>chr(10) then
   pk=asc(mid(temp,i,1))+but
   if pk>126 then
    pk=pk-95
   elseif pk<32 then
    pk=pk+95
   end if
   a=a&chr(pk)
  else
   a=a&"鬼"
  end if
next
Encode=a
end function

评论列表
正在加载评论……
  
评论   
呢  称:
验证码:
若看不清请点击更换!
内  容:
 
 
  在线洽谈咨询:
点击这里,在线洽谈   点击这里,在线洽谈   点击这里,在线洽谈
乘车路线    汇款方式   加盟合作  人才招聘
 
公司地址:青海省西宁市西关大街73号(三二四部队招行所四楼)     青ICP备13000578号-1 公安机关备案号:63010402000123    
QQ:147399120    mail:lostlove000@163.com    电话: 13897410341    邮编:810000
© Copyright( 2008-2009) QhWins.Com All Rights Reserved    版权所有:西宁威势电子信息服务有限公司 未经书面制授权,请勿随意转载!