OA系统

开发平台：
ASP/ASPX

ShowSpecial.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("2H3I3I3I4bXd2H3I3I4b1GXd3I4bBH5Hxh5i4b6fwfjfEf6fDCZe5fyg4ewCHgjH2H8exgZeahYbHfpGgI2H1G3I4b2H2HXdXd3I4b5c3I5c3IEcDflgHf2HpGgI3I5c3I4b5c5cXd2H2H4b5c5c3IXd4b5cGgFh4C2H6CxhmgEgxgGh4HkGkH6cZI3G3IxgngygXixgACGh2bjIjc2b3IDhZikhxhmfyCGhZdzfygZfmgafYfYc4bTI3Ihchb1G4bXd1G1G2H3I4b1G1G2H3I2H5c2H4bXd2HBHDC4bZivi")
AspCoding.EnCode("aiXiahHg2b5fngzgFh4iEi2bHfGghfoCWhuh1G3hzhwCjfAhFc1bYg5infnf5iYgUcKRaWPPZq9rpqKPpsGgwchf9f9esfBbFdyI8eZfUcVbCH2H5c2H3I3I2H5c1G1G1G2H4b5c5cGgxbFhFCGeoHWd3I5c4b2HXdXd3IXd1G2H2H5c2H4bHhDflgBb1GWIiG4b5c3I5c2HXd3I1G3I2H3I3I3I4bXd2HGgEgnh1G6CygnhDfwfGh7cAbkH5H2HwfYfzCnewfEgBG6dUIHf2HTGZI7emhFh2H6eAgAHBGAg")
AspCoding.EnCode("mh7fFf3CFCxIIhEingZiEg4i9f3gyfYfXeEgvIYcdghhpiIihCaHqfmhniyilg4CPh4iEg2bxd2HXd5bKRzVRRZqoHiG7fFijIzGQgagFglgningEd2blhngvimh4gFh5cuhzhAfXd2bXdZH3IDfagAf1fFi7h3I5I5c2b1GnbXdme6ejfkg4b3GYG2HmgXfMitfTh5Cxf5fyCNhui8i4inixhXgkh1ftgXg4hvi4i4bZH1I2HXdzhAhYemhAhXdXfTh5crhBgXixf5fxi0gui6gmhXexhZikhCebC3IIief")
AspCoding.EnCode("Rfde2H2bgdgI6e6f8cyb9fAf4ikf3Ilg6f8czGqeke8fAhni4izI3hzhyCjeyH6dzI7cVbCHzCXC3IyCkeDf2HEi6fkbybefWgfh1GEgvemhxiWIVcEfaCygzeng2HzgagEg4bFC6fjIxIghOedCWIhboHCHuhEiPhDf7fvfkfmfEd3GZHzg5eEC6gUHZHje3g7e7hEbZHje3g6fleFIXbkfXfECDCFIzb3czgmiAg8iUHGg3f2H1Gxglg4iYgGh4cuiDCYf5fxhZivi0gpCmh7iAgybYC6fDCTbsgBgZgvh")
AspCoding.EnCode("5fje1fui6gZe4gygXgjgWiggEd2b4b5I5cAhAgkbxc2brhUf5CvhmCkf0gRf6gYf5fai5hjgpgIi2bnG4b4d3GZGHf1I4bYG1GDflgvfwinHAhECAHnHZdrhH9Xikiniah0gPhAfng4gxhZiviWh3fkgYfZdvbvb1GXb4bZdBHxbZiBbGgmi7fHfYcWIVcPgmh7e7hyiah7e3CxIqi7fvf8eYf4bQClgqeDfEixhkfmfhcCHWIgI7fFilGzGWejfDh4ioingBhFhgdiGEf3Czg3iVbCH1dSd3I4djeXf6f8i")
AspCoding.EnCode("UHXbahXfAg7hSG5Ije4hFi6gHiZHyC3g7e6gUH5Izg3glhDCUH5Izg4h7eDCFIXbkfXflh8iEbZHkfXf6fAfGCYGkf3g7eDCFIZHkf5eAgleEbXbkf5eAgAfSG5IahXf6fDCGC5IahmiAg8iFI3ckf3g6fAfSGGgXg5c3IyhEi4iXCTHtfThXiki4gyCNhui6gmhmCvfYCkhxIXgAg7hHfTodu89mRMPzVRRYRxIvcxIFdxb5hTIEcxbEgnhUcVbhb2HXd4bXd2H3I2H3I2H2H5c4b3I3IEcxb8eAhSdpGiG")
AspCoding.EnCode("2H3I4b1G1G2H3I2H5c2H4bXd2H2HFdYbhcVc4ivilhngVbCHPgnglh8iyiah6fngaHRCAhxh8emh4bZdBHFhEiBbGgliZf2H7iyg3iEgyhBGlb6cAbXGXdXgvivfmfjeTH3h3Czg8eYfEi4bwfYfaimfxgEgTH7cEG1GGeKQ5q9r1rKRaWqqysTGzHACmgUcHhzHACFCTIZdpGCHYfxiZf4bxhnfWIhb6eAglGybhijgyi6f3CWIiGAgYfEg3IlglhDdTHzgagFhvezCzgYhoHCHVbVc4b2HoHCH5HHfgdiG")
AspCoding.EnCode("2H3I1GXd3I2H2H1G3I1G4b4b2H1GGg5HZezgnh2HvfXC1dTIHhfiAg8ibgyiZfygkfmfzGbgxgZilglh4iliEdmfXfkbDc7cjISd")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>

						