OA系统

开发平台：
ASP/ASPX

Wygkcn_Announce.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("Hhnhai7C4b3hjg3flh7eHg2bBfFh3IYgvizh5hEgMiEivfYhwfDf4HTIWIVcBHZfygDh3IXejg5h7eAgHg4HI9ACLClizCFh4bYhmfNhFhailiZd5cHfHhXg2HziEiYf5iFc4HsgH95Cki4gyC0gIgxC5hFCnhvc3fFiDCYc2HDf5hFCZgYfDfHgYc2e3gafXgxiki1ITIIsyVGRwqHRaoOQdQBHzHZiUcTGxb3iaiFfHfoHCHHh3iai8g1G5fkh4e6fAgHgTeDfMivivfAgliHfVbCHHheeohte2HvfmgTH")
AspCoding.EnCode("nhYfkgzh5h5c7eEgThkh4iTH3GVhshhgPgciCCpisgSH2HwfygYeZfngahUH2HsgifggsfphSH5c7c6I6H7hTgUH3IphhgpgheieuhGi1Glb8d8bleTg2bTI3IoHhbGgbCohRiXdaiYeHgmg4iwikeXgjHBbXd4b5c2H2H1G4b4b4b4b4b3I2H3IXd3IoHhbHhEhjgSdVbiGEc2cWIVcPhmhliXdQhlh3gTHIhkezgahaHghTgngniEhFhngxcYc6fmhafYf5fEg3IlijfAf3ISb3IvG3IZh6eagkg2HYc4d")
AspCoding.EnCode("Xd3inCNhrhThmfvh3hxiMihCyi3fAhmg1fPiZiXfvi4i2H5IYcxCEimg3Clg3InCThXdxh3i2H3i3CFi5f4HvbgdgIvfnf3Iti7e3gaHIgyi5i3IXgyCmg3IQhAg5eaHefjfnf5clivemhxi5coHCHqfYflh8iyizg7eYfybue7fygEgZe2HYcEcafygUcKQ5qqQ4qBoxWToyQBHyIafxhHf1I4bVbVcfejglhmh5coHiGhhzh3IsgzizCving2HOfjfEg1GqfAg4haHefagnfWICHYbHfhcVcGgafxhTI5p")
AspCoding.EnCode("vVHhdg3IieReghciBG2bRCThnewg3hzg0gdfzhXgFCnhMipC4iFeAgxIZiFileBIifhhEdHh2cTH7f7e4hwb2bohhh1ImHZISd1I2HFh5hAhZg3CFhBGYcMi3gvi5hahkiZdBbHhZITHIhDeEgPhDfAhvIxglijhkhngxinijfnhYf7HnHPgAgminH4HEgxhEgzeng2bnGwIzIAHjcxd1dUcFdxbchBbBHxbkhaiUcgdVcBHYb3IoHVcti6fmivcVfag6i3CxingHOEg3IXd4bXd4bhcCHiixCyiAfoHhbIC")
AspCoding.EnCode("zgZf2Hpg5i1G3IoHgItiFi3gxIgCjgaglhng1G2H2HoHCHui4i8e4btiFiXfTHOfjfFhziaizgneoHhbXGHf3I3I1G2HhcVcBHyIAiafBboHhbTGxbYevfFfTI2HVbCHGghhohRi1GygnhGh3iYfaezh5hjITIEcvdIipgufHfoHgITGzHggohufHfCIgH3I2HVbCHEcuibgqfohRgsfTIibCICIhG1GVbVcEe5hFC4b7e6gmhngmgAHGh6I7dVbVc4C4iaeagXg8cvcwezgkfmhFCphPiVfWfBGnhmhjhzh")
AspCoding.EnCode("5hAIaHygyCzgYfAhphuhOgCCVbiG5iAizgniFhxhyiyC4b9hXg7f6hDengmhAHwbwISghchbxhYgxc3iYfjhjf3fAHxIag5inf6fngFhtgke6gzbYengkgjfZiwdECniFCzhkhkhsfzh7hEcFc7dycoHhbmgYfwiyi3fvcFi5flgyiwCvitgxC6gaIEdnh3Cjhyi3f7cwdyinfnflh3CEgCfYfygXiveEgoHgI4iviAgngIOWIgInhngaejf3faH6fniEikekhviPijfAfvHvHVbVcSiWIiGGpVbiGFfXglg")
AspCoding.EnCode("1GVfH9Ci3flg8cTHlhYfFhCeah8eYf7f8g3fkhnHOg5hAhDiDengmhkbmc6flemhmhmgjIycgdVcmgYfzfjfXgzGjfzgjhjf8fAgYfagFfmh7fFc5iFgkf3hEgvfagahvIwI1GBe3hviZe5hFCohjeEgmhlg8g3fkhvIiCThCiYCEilGwIbVhcVcYengzfzhYCybyikfzfkeEhlhmhzhEhEgTHYglCzg5fFhxhzhzgydvb1Gb9CiBgCi5hAh8cEdlhmhEgifah8engAhFf5hjgvICi5hAh7gAi4iYfkbyH6f")
AspCoding.EnCode("Afngng3iAHmHbVVbgITGyIlhXelgygAfliSdodhcWdHhxbnhvfDhBbhcVcFd3ivfDh3I5fviZi6fFiFcBfEgMinCyiEgACagkgSdHhvdnhaiFfUcgdVcBHzHnhzC8gHfBHdgFilebgjfmgaixiZgxIgCxgXgAhAgZeDfTHmfXf8cDckGkbUc")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>

						