OA系统

开发平台：

ASP/ASPX

TopUser.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("HhEg5h5ewCmh4bXfzhEi3imh7fHg1IAI2bXdXeYfvizeleXgmgmgygximfEd2bkI1I5c5fngkhkh6f7h4eXexhah5CHgYclIZd2HFiDfBgjg4iHgYc4hyiEi3i3ClgzbniyiwCjgXg8iECmhFb1G5fxCkhjg5h6glhYf1I4b7iygmgFhxgGh1IBcUIXGZd4byg3iGh1IfilCFhzhVgFgwi5eYfEilHYc2Hyh4ixhYhxgliFc4HkclG4HGeWIhbHh8e6eHfhcgIodgHEcACmg4b3fwCaiXixiFckhngZhDf5c")
AspCoding.EnCode("3I7iai3iFhwfFc1IDG7d2c4HXdUcTGdfUcMreqBVZ9fRGKS9iREcxbbhHfEcwcliYeGeWIVcCICIGgFhnhXdXgjgxhXiahTHAhzCmfyhFh3IXdEfvfZfDfaCFcZdjb6c2c3G2HHfTGIgUcJq5RBOoPGgvdceTIHhvdDf4CBboHhbHhzHli7fUcgdgIodBHXGAgngli2HAhlhAIAbEd6fmhlgDhZeFCyb3h7fmhZilimhjf3gvgng3hACmG4HZiYekemg3gxIlg4i5fxCAhmgAg4iDf1IvbVbCHib7eAekhlb")
AspCoding.EnCode("7dHgYcAg3Caf4i5fEg3Iliag8i4bYc5c3cXdEgzh8iAiECnglg5c4d4b2b1GwHXdZhlgzhkg4b4H5I4b3i3g0gthAgmhlgMitg4enCkhng5cXb1I5c6Cyhmhlgng5cje8fwiXf4i7fBbFclb4bagEi3iYfEi1GXfSe3IahEhae5eYfEi3I4CYfFimCzI2b2H4d5c3imiMithAgmh7fMipg3i5c3c2b2H3ing7emCYcoHWdpc6e6f7c6cybag8ingah5cAgDikhlbkHmchiyijejeugFinglgzIlbab6dWIgI")
AspCoding.EnCode("ibaiZh2HahxCDf4bAhAg6dkHaHef9fdC5cACyh4ixipGCHgHFexgaikhngXdjeagAC1Glglh6dkHwdgh9ffhVbCHpc5HUcgdgIodBH8elgTIhcCHibibGgFh4C2H5hjgxhneyCGh2bafmh5ili2b2HDgygmgFhaCBG4HAcjGXG1ITIGgXg5cwfFCmhYgHgYc8fAgmhAhaH5h7eleTbEhECngEiHgFd5HFc7fAgAI6cvI3i4hMiQiFi3ClgNhoiZivCngwI2cSd2b4b8e3fFCYhngFhHg2b1f3gkhZizgwg2b")
AspCoding.EnCode("3IBbGg2cHg6eEClblIxcnh3gMiPClhmhlg0goi4ezf4imH2cHfHhwc5hBbGgwcliZfUcpGCHhGCIHhFhYe1G3fviyg5CkfFcZdlgxhmfaCliYc5c7ixhmgFhwfFc1IDc6c2c2bHfEcZIBGFCFijH7dxc3GkfAiwi4hngEi1Ivb2cTIEcxb5hHfEcwcliYeGeWIVcCIGgyIFhAhSdWIgIibEcYb7flh6dkHyb9hag7CYfOfYfSfAChcWdib7i4ijeZfoHiGCI4iahmgXdweYggdiGCIAhECjH7dyb5fkhzh6f")
AspCoding.EnCode("4ioHVcodAg3CDf1GlgAg7ckHGhahagFhaCvfahZgVbiGodYbBboHhbpcEcFh7fTIWIgIibodTGDf3i1G4ejgygZgzgFc7fzCYhxgEg5c2HDgxhnhDfyhBG3G6b8b1d1I5c4gxCafFiAfXgzgFc1I8c2bUcEcZiXd3IyhEi4iXCHg1IqiGOYhvhXekfLCchjgkhuglhYflgybZiAg6g2bTIHqeJ89mRTGvd5hTIEcxbEg3iSdVbhbCIGgwc8e7fUcoHVcBHxbli5h4hjg4iUcBHfi7eAfdeagnhxhjeneaHhi")
AspCoding.EnCode("xgYC7fFi3CEgGhmfnC8cDc7c8cBb")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>

						