国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學院 > 邏輯算法 > 正文

ASP代碼加密

2019-09-10 09:01:52
字體:
來源:轉載
供稿:網友
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也可以改成其它函數名。
這種方式加密比較簡單,解密也很容易。
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表

圖片精選

主站蜘蛛池模板: 如东县| 马龙县| 四子王旗| 荣昌县| 尚义县| 扶余县| 龙口市| 东山县| 桓台县| 汝阳县| 平原县| 武汉市| 白银市| 上林县| 峨眉山市| 綦江县| 开阳县| 会东县| 陵水| 温泉县| 麻栗坡县| 噶尔县| 兴和县| 黎平县| 丹寨县| 高阳县| 新兴县| 北碚区| 视频| 郸城县| 衡南县| 咸丰县| 宜黄县| 辛集市| 乐清市| 寿宁县| 鹤岗市| 石渠县| 聂拉木县| 都匀市| 宝丰县|