jlzzjlzz亚洲乱熟在线播放

系統城裝機大師 - 唯一官網:www.farandoo.com!

當前位置:首頁 > 腳本中心 > hta > 詳細頁面

ASP代碼加密

時間:2020-02-02來源:系統城作者:電腦系統城

ASP代碼一般是明文,很少有加密的,MS有個工具Script Encoder可以加密,這個東東可以微軟官方網站免費下載,而且還有詳細使用說明,但是經過它加密后的文件會有<%@ language = vbscript.encode %>,管理員看到這句話就知道這個asp文件被加密了。而且也有相關的解密文件。 
本文提供一種簡單的方法,可以加密ASP代碼,主要思路是將代碼做些運算,比如將全部代碼移動一位,基本上就算加密了,主要的加解密函數如下: 

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 

function Encode(temp) 
  but=1 
  cc=replace(temp,vbcrlf,"湯") 
  for i= 1 to len(cc)  
    if mid(cc,i,1)<>"湯" then  
    pk=asc(mid(cc,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 
  ’a=replace(a,"""","""""") 
  Encode=a 
end function 

在開發的時候,通常將關鍵ASP代碼Encode,再使用Excute(Uncode(ipaddr))執行就可以了。這樣管理員一般不能直接看到關鍵代碼,一般在程序里不要帶上Encode函數,只在開發的時候使用,此外,UnEncode也可以改成其它函數名。 
這種方式加密比較簡單,解密也很容易。
分享到:

相關信息

系統教程欄目

欄目熱門教程

人氣教程排行

站長推薦

熱門系統下載