OA系统

开发平台：
ASP/ASPX

other_search.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("Ec3ixh6i2H4gkh4eAgAgGhYcyiFhveng7fLClhmh4eAh3haCmiYhYcHfoHVcFdnfyi7fwi2HjhZeFhzizh4CGh4H8ixC6f8e4H4bxi4eaeYfGh2bzfUf5ixClgkg4H5cZiniliaizhahFc4HQhmhECAiviFhaH5h6fAfYc4b8eZiEi5CYfliFc2bahYfEf8hwezgYezh7i3G5cnikh4eECAgTH1IjgagYhzCyC1ITIHhAC5hXfkhYf2H8hainhDfveBG3GAH6cDcYc3IaCmhwenewfACHg3GlbjHjHZd3IXf")
AspCoding.EnCode("ke7fmgYf7fEd2bkH2b5c3fviweXixiHg4H5fZezgDf4i7f2b5c3h4iwCaf7h5h3iYezCahXiTH2b7dYc4b5fngjgjgAgAf4e5faijeneHg1IlI4HUcpGWd4b2HGgli7fTIVbVc2H3I2HXdGgAC3i3IFeygZfDfziTH1IjIlbDb3G3IaC4iai5CwfFhEdYc6dSI4H5cZijgai5CkfEd2bvi4iZhli4HTIVbiGCIGgxhwiXi4bvengvf5CyhFhBG2bkb8dYc4b5c6f7fniEd4HaizfZimfmh7exbI9ZhHOBhmf")
AspCoding.EnCode("kiLC6fke8flhAikezGmfxhZh4H2H7izCmgEgwfFcYc7clcjc2b4bwcHfHhxbAC3iUcVbCH4b2HBHwcFh6eUchcWd2H5cEcFhAhHfoHhb1G3I1G4bEc8e3i5cyhZezCZgwfEgHg1IlbTdZd3IXgkhzCYhkfGh4Hafmh5iFh4HGepGiGgHEcFi4ijg3C3h8e1GkfYCkgZeGh4H3fmCEgvfkekf1I2H6fACThafmhFc4HmikeEi3ing7fSHkG3I6fyiafxh3i4bZc7dkHAbAb6cjGGC4b7ivfnhACziFbjH6IDI")
AspCoding.EnCode("6gTgUHmejfxi8eyGAgygUgYfGiFGDCFhUH3Imi3f4gvhXi7fag8fyCmgmdniagzeag7fSHZcnfYgYgZhZhme1ImOn9FizCBfmhEdYc6d1IHfhcVc3I5cXd2HXd4bEcyi7hlivfagah1G8gXgkhAi4iGh3G1IHfmd4bOqao4b7WGs5cpq5r2HWQ0rXdxHEczHyiAfFhwezhxiBbgdhb2H5cXd2H1G2HHhyile8evfzhah2HFfZiwCFgngTHYcliailivimh2bUcxH4bDW7O5cF9aq2HqqnQ2HncHhaGyi8iAC")
AspCoding.EnCode("vfyixiBbVbCH2H4b1G3I1G4bEcke8ilixhkeyC3IFfXgjgFgmhEdZd4gagahACmhkfFh4HHfzb5cDWFp1GiP1P2HPr0r5caIFdxbkeleDfzCagjeBboHCHXd3I2H1G2H3IBHjfDCFhvfzhxi2H6i4eviAingTH4HZemgvflijfAhYcBbncXd7pSW4burBPXdLq2r2HzbFdwczhAfEgygagzgHfpGCH5c1G1G3I3I3IBHyileACxhjfzg5cFfXgkhAiYfHg4HYC3gxCAiEg3GTIxH2HE9Fp3IHR2q4bIPeJXd")
AspCoding.EnCode("urtrXdxHHhvdyiDCEgvfyixiTIhcWd2HXd4b5cEcxbFiYfjgmhXeEgTIHhwclinhGeWICHXd4bHhaGFhAhSdhchb5c2HBHliFCHfhcCH5c2H4b1GHhlinhXdyhYfai5Cwf8eTH2bDc7G3G2H5hkhvfmfxiEd1IjgYf5iliYcUchchbHhaikf7hEhAC5cliThAfmhTH4HlimhUeliYcXdkfZiwimhGh4HxfmhSeDgkeAh3i3G5cnikh4eECAgTH1IjgagYhzCyC0gFglh3CAhkf5hzfYf2b5czhkfaekeDe6f")
AspCoding.EnCode("4iyi6ingFC4bBG3GDfaCyg7eyb6fDfGOjgYfzGXfXg5fxf5CAhjfEhxiZfhikeviyilgTHYH4GegffciDHghAc5bYcXdjfahjhyiDeECmhyi8fFhXdFc2bDfxgygAgxI6f8eUfviZezG3gXg4gxfXi6exCEhkfmghijfjgzhEiTHXI3HdCegdCcieggeXI4H2HFivfUgngGh2bkG6IZd5c6iYCafEh3CFcZdHR0QT9GLKRtrZdjfyCZhyiniEhFiTH1Ixhme3IvIDhZiviEhZe3ITHEd5bGqNPdqfKtstr5b")
AspCoding.EnCode("ycTfFfZiwC8f4i2HFcYH5bHo2byiahnCkh8fEiEd4Hwenf4bxcEe4eafEhmh2HTHFc3dXIwITf6iZiviAi4iGh5bbr0QdqfKtstr4cIW4H4bzf3fG9khZexiXiACwfFcYc8bAb4HHfVbiG3I1G4b5c1G5cEcxhjeDCFgDf3IEgBg7h3CEd1IAgEhnCjhvfFh4H2HahZijhYfBG3Gqe8fmiwiaiEgZd4bEe4eaflCngBG2b9QrQRsSR4H1G2H4gaf3fEClhTH2bvijfXiwexiMiFg6fYf6ezg3fwiYf2b5czh")
AspCoding.EnCode("xivCjfEhlh4ike7CmhEi2HGhZdliyhvfAgxIAgEgUfzeYfvc5e4e4gwgZg7fyiDeyCnhcfagvijflgGh4c3HegffdC6IICAcXI3G3IjfkfwijfFgAgmhzhDeEgXdFcYcACwfxhECvcECEgUfvi4ixImiYC5fjCYhEiyiEhxiZfbgzhzeaglgGh4cZcfhgeeghfdCfh5b3GBbibFdwcFh3iHfoHVcXd2HEczHli7fBbpGhbEcxbAC5hXfvi3CHf1GBHxb5ike6ezfBbiboHCHEcvdmgygFfUcEcfiFi8iIhzh")
AspCoding.EnCode("3ivfahYhwdhizi5h7flhYfDfFcYh5e8cDc6dAHUc")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>

						