求解开jscript.encode代码的asp函数

2019-06-03 04:56:13王冬梅

  {    
  unEncodingString   +=   encodingString.substring(stringIndex,   scriptIndex)    
  scriptIndex   +=   marker.length    
  state   =   STATE_READLEN    
  }    
  else    
  {    
  stringIndex   =   stringIndex==0   ?   0   :   stringIndex    
  unEncodingString   +=   encodingString.substr(stringIndex,   encodingString.length)    
  state   =   0    
  }    
  break    

  case   (STATE_READLEN)   :    
  encodingLength   =   encodingString.substr(scriptIndex,   6)    
  unEncodinglength   =   decodeBase64(encodingLength)    
  scriptIndex   +=   (6   +   "==".length)    
  state   =   STATE_DECODE    
  break    

  case   (STATE_DECODE)   :    
  if   (!unEncodinglength)    
  {    
  stringIndex   =   scriptIndex   +   "DQgAAA==^#~@".length    
  unEncodingIndex   =   0    
  state   =   STATE_COPY_INPUT    
  break    
  }    
  char   =   encodingString.substr(scriptIndex,   1)    
  if   (char   ==   "@")   state   =   STATE_UNESCAPE    
  else    
  {    
  if   (char.charCodeAt(0)   <   0xFF)    
  {    
  unEncodingString   +=   String.fromCharCode(transformed[pick_encoding[unEncodingIndex%64]][char.charCodeAt(0)])