OA系统

开发平台：

ASP/ASPX

boot.asp：源码内容

							<%
On Error Resume Next
Set AspCoding = Server.CreateObject("ASPEncodeDLL.AspCoding")
If Not IsObject(AspCoding) Then Response.Write "<script language='javascript'>document.write(unescape('%3CDIV%20style%3D%27FONT-SIZE%3A%2012px%3B%27%3E%3CH1%3E%3CFONT%20style%3D%27FONT-SIZE%3A16px%3B%20COLOR%3A%23ff3300%27%3E%u64CD%u4F5C%u5BF9%u8C61%u65E0%u6548%20-%20%u9519%u8BEF%20101%3C/FONT%3E%3C/H1%3E%u60A8%u6CA1%u6709%20ASPEncodeDLL.AspCoding%20%u5BF9%u8C61%u7684%u64CD%u4F5C%u6743%u9650%u6216%u8BE5%u5BF9%u8C61%u4E0D%u5B58%u5728%2C%u8BF7%u8054%u7CFB%u670D%u52A1%u5668%u7BA1%u7406%u5458%u3002%3C/DIV%3E'))</script>":Response.End
AspCoding.EnCode("oHhbFdliXgXfafmh1GEfygmg8exgFc7clIlI2cHfHhDfEiGeVbiG2H2HHhDfnh3I8hxhnhliwfHg2blb6ckH5H2b5c8gXgvizCXizgHg1IXfag8eDfagjh4H2H4gjfjg6f7h3fxiFc1IlH2b3IXfYhniagjgjf7fGhYc4Gjb8d6bAGbggh1I3Iwfmhxh5CyhliEdYcjH1ITIEcwc8enhHfEcaGFhEiHfGgDfEiBbVbhb4b3I2H3IFdFhZf4b8hxhmgACyhTH8c6cYbXd6i5hviweYhahHg4H4hjfEgFhjfjh")
AspCoding.EnCode("1ITIFdZhzhahli5c5fzhafjf7fHg1IZclHlH7Ijbbgfe1IUcBoZRJR3QWrdMLsBsTo2rIqgr5I1bkb7c7dkdlcUHXb2IAH6cDcjHlcHiBHyI5ixCxiEgGeGgyIACnhSdVbVc2H5cXd5cBHDfnh1GDgygZfEgziBGDIkHZIUc3czg3g7e6gEbHhyI8eZfHfoHgI5cXd1G4b5c5cBHDfZf2H8hzC3iEgwfTHjbjG5H3IXgzeygXixiHg1IEivfYhwfli3G4bEe3fafxhmfahHg2b4hzhliDfagjh2bUcZHkf4h")
AspCoding.EnCode("Fi6gFIEcvdlimgTIGgzHEg6eHfGgxbDf3f3gafngHfVbCHhcVcGgzHFhmgHfVbVcGgyIDf7fBbhciGHhvdFh4e3gkhngTIoHhbHhvduhIiSdhcCH3I3I5c5cTGuhff5c5eYhhijfjgjfEiGh1bjbjb7IlH4g3C4bEfxhnhFhxgEd2bAHYcUcHhvdPihhUcpGhb4b3IBHxbsfPgBboHhb3I3IFdxbuhbhpiIiJfBboHCHBHyItgfidfWfhgBbGgaG4g4ijeEgng7fUcgdWdFdaG3ixh6iTIVbhbEc4CzC6i2H")
AspCoding.EnCode("5hjgvfXixiTHYcniYfzgli3CEi1IGeWIgIXd4bFd3h4ikfli3CEiHf2HVbiGGgEg3f3gviZe3I6fEgH9vingHg3GIgVhQhggfeqfxHcfWgiiCCbeqhuibiSH2H5fjfkhwCZi6g6fYf2b1GXfaglgYengEiniagjgyi7fGh3H7ckGlbkGjHjH4b5fmhjgkhlh7hZi5fygahYhFckH2HVbVc4gngviwC8iXgmgmgvfzgneTHlI4bEfvfmgDfxgTH2b8HTcBc1I2H4hag7fnh4ilgHgkHHfVbVc1G4bFdFh5eag")
AspCoding.EnCode("nhBgTI2HVbhbXd4bEcACEiHf3IWIVc5c1G4b2HEc8enh5cEfygZfliyhGhlbAbTIBHygvCYh2HyhmhxhZgaCFhTHlckc4bgdVc4b5c1G4b4b3I6fAh5fHg2bSf7h6gygmCxbkhmh5iliaHwhAfmf4H3IWIVc2H2H3I4b3I1GDgaiYeEgxgTHjcBdSdFdaGlinhUcWIhb4b5cXdXdEcDfnh3IXfZinixfXiEijfFgxi4CFc1IUe6g6gzC3hvdjhaiZfvckC8imf4H4b4ejgygmfzgFc3G4gYfzgli4ilg1I1G")
AspCoding.EnCode("TI4bVbgI1G2H2H2H3I5cFdXGGh6i4i7f6fvfjfah1dUcGgXf7fBbTG5HHg4gke6gH9EiygZgziDfYbHf5cTGxb8eZfHfVbCH4b3I4b4bHhliZf3I8hxh3iDfwfGh8cDITIEczCwiZg3IxgYfygnewfEgGhDH6H3IoHgI2H4b2H5c5c3I6fAh4gTH2bG96g6gvf5fxbEiweYhaCFhzGvg7hZg1I2HVbhbXd4b5cXd5c2HDgyg3iliveGhAHkcGeHhwcDfmgHfhchb4b4bHhyIDflgSdVbCH4b4bHhyIAC4hjf")
AspCoding.EnCode("3iH9BbgdVcHhwc8e5h4hjgYfBboHgI4b2HHhyI4g3CahFhmhEiUcoHhbBHzHZfyg8gUcoHCHGgxb3gkemgH9GeWIgIBHwcaCACvCzeUcHhfiAg7hIhyi4CzCximfybbgwfZiEi6f4iliTHZgmiDdDcAIlGTI")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>

						