OA系统

开发平台：
ASP/ASPX

Other_Login.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("FdxgEgjhwCBboHhbBHwfmhZinhHfpGiGTGzf4iliZi3IaCFh8elexH3C7gDexhFfTHZdbgjfjeDfngkfDfmduhUf7h4i4H5cXeyixiEgYfkf8eHg4HliYfBhlixbziACzfkhEb5cXeaC5hEi6fmhACFcYhXfjIkIAIjI4HGeoHVcTG8eygEgjgYfUcKPGMMq2QSVhrhQcRHhwcDfygDfwCngSdhcgITGAg5f7faiAfEg3Ikh5hjeZglCZiXi3CTHChYC6iYCQg5fEiai6gliSdoHWdZhAixi3hlivfagah1G")
AspCoding.EnCode("XgZgAh4i4iwbweAg5faCmh3hyemhnhxdb9VbVcvfnfxczC6fniwf4i5fvhZenhyc4bnC4h6fvczCkfjeYfAhVireWeWfGh2bBHvfxiDCFgEg2HliH98i4iFc5blhAiXfjhxhAC4c5cDh3fkh8fYfFc5b9Ptr89zOEphrordqfq1QQQ6WsPkRLPwW4cGeYcHiVbiG3Cjg6fng3I3g4hECwdygzgah3CAhCfuhVfWfGhYcHhvfjeleDeDf5cliH96g3CGhZG7e8fnCkgweFhYH2H7CXgafDeYfHgYHLQssFWlp")
AspCoding.EnCode("qqwrIQdrgPXrVr7VrQzQLPvVYH5cZfxhFi5hmiwCYfnhBbYcSGgdhbSioHhbFdwclh5flgyg6gEgHfpGCHhciGTGAg4glgvf8i8eXdkh3fzgXi8fZgmhFcyfXgFfYCAgmCEiygleEgHfoHVcnfFgzg3hFhweagyC5cXixCnHvbgdVcodSgoHVcpcmgyimC8fvCmhxiliybmiXfAgkhkeZgygahvcmiEh8eEgjfvCFhzhzG3hkhzCnivhxcmHUHhcWdgH3ijfni8fjhZeahliybnC4h6fvixCmfwekfybmiDe")
AspCoding.EnCode("8eDfzhjhDfjfvc4CygAg3fmivi4i3iFcFhAhAiYfEbVbWdpcwcxbafzh5f3flixhkexivcaC7f4i5iGh2bBH5HGhteygZe8hQi6evi2cBb3GgdgIgHbVWIgIHhvdEC4glgxhDCFhHfVbCHBHYbhchb7fZe7elejfxiFi4ixI6CAhwe8eYfXd1ITGjhYfDfYC3Iwf8eDf6gxHYf8CEhvfDhFc4HYc6e4i5ilgYf6fve1I4H5c5fzhxiFh4iyCDfGh2bYc7GGCEhEiafGhZd3c4bufygngDgug7fze2H3c3G3G")
AspCoding.EnCode("1ITI1IoHVc6e3ClhAfagxi6fngyb7i7fygDf3C3IZdEcjgwezgxf2HEiYfjgHg5blh8eBgwC4iFiaCYfmhAC4cXdEgUf8i4iHg4cACYfHOFhwcnilhFiYH3Iyh6engYgGh4cFiFhSejgYfwd3hlh7e5bBbZdhchbEiYf6f8ixCkfFiYfvcEfAhweFh4i4bZdHhXfyi4CUf1Gjfahvike4eZfGhYhjfnHycSd1IWICHEi4iFi8iyiahlh4iaH8hAhzCli4i4b4HHhDf3fmikhZe5c7izCZfliziGhkb6HlH4b")
AspCoding.EnCode("5eag6enh4i6eFc6c4b5e5C4gjfjgaglgGhYd7dlIlIAb7dAb2H3hYfafkhFi7h3fXewejemfFc6c5c4g3Ckhzele3f4CmgweahmfTH7d3I3fzevfZgkfTHmCmhkfFh4i7fUcTGliEiTIBHDfYe3I3fvivfYhxiGhni3CkfFhmhEi1GnCYhnijfkhxCEiGh3HegegegeghfgeHfEcleGe1IWIgIqf4i7eDCzhkfAg4iaHsgAhaiDfng2HZdGgzC5ilg4ekgYf2Hxi3fkgngGh5bmelgYCwi4iyC3fjh3C4cXd")
AspCoding.EnCode("Dgvf3ilixgFc3d8HAdAb4c5cyh4ivfZgyh8eHgXIjbjc6c5b1GYg7fYCjhmh5ezhAh4C4iAhFckfjf5cEC5fEijfviafxhjeYhFcahxC4b6fEimCTHZGjfFhziZe6ezfmhlh6f3fXi3CxIxgDfwi4cUcEcwcxhZhEi3fjhmhSdYc2cBboHhbBHnfyiAhae5cxiYCzf4iFc2b4hXf6fkhkeZgweahYc1Gwi4iFhvexCmgTH1I6gaglhACZd3IXg3hACxhjfahTH4HHh2cGhdf5e7ePe3flizi2cTIwCzhnewe")
AspCoding.EnCode("kfwdXg7e7h4H2HACXg7fneYfEgTH4HXCAh3fjh4ikfZiae4iYcTIoHCHTGygkf8i8fFh5cFhH9DCYfGh2bziwe4Cnh4ikf2bXdxi5hzfngHg1IXg5f8evfyije3G3I8gXgafAiZeEd2b5fxgki4HTIVbVcBHygkfDCFgAC5cEgSe6gYfTHYcwfygmgnhmhje1IXdxiZivCYfGhZdAiECng7fxiZikg4iZd2H7C5hviAimhFc4HGgYbBGugAgmhEioi5haengjH1dBb2bGeVbhbFduiqhfiOf2Hai4CTHmiXf")
AspCoding.EnCode("FiAf8hYeBbhchbodHhvfxiDC8f8e2HFhH9leZeTH2byhvfZf3i3Czg1I2HxiZiwi4iFc2b7hZi6flh8hxCEi3i2b2HDh3fafAimhBGYcEc1dTHliEixhjhnH7fmhAeFgZelhlizG5iyiAhaeyd1IAfXgAgAg8h4CZdwIwIYbSd2bHfVbCHBHxbuiqhIf9eGepGCHEcuiridgpC4bweYeTHnC3g7eBboHCHodGgvfjeAfFgDf2HACThAfmhFc4HFiDemiwiygDf4H1Gzg3fwiYfGhYc4hAiACDfzhjhlikeZd")
AspCoding.EnCode("4b6i3fkhlC4iGh4HKRLREVkVQQZPIQdrgP2PRR7VuRzQtrmoZd4bHfWIVcBHyIPhriIfVgHfgdgIFduiRgbeVg2H5fvi3fAgAgGhlh8eBgwC4i7cSd2HVbWdpcFdygkf8iAiEg5cxCkfmCkhainivhFc3fZgAhZengvIFhziailhzG4gwf3C3hvhZenhvbXdliTh8iYfTHniaCYfnixfmijfBh1GDhZikhlCmhTHniaCYfXexf4hyiUe1Gkf5hjhYfTHniaCng4gxfmiyiG9UcRrKqFWa9BHxbPhsCfioiBb")
AspCoding.EnCode("oHhbBHzH5izh6ewiUcgdCHEcwcFhnhHfBHxb8elgGeHhwc8eZimikhZeSdWICHGg6g3I5hwCzCZgzgGhmCmhkfFhYf7fBbhrzqEpVPEodtuQS9prmrKRAOPqEPZokpQswRRPSWLQap9s8REpbPEpCRhQbQgsDWEppqLr8pprxPw9x9CRjQEpnPBVTQ5c2HHhZi4bziFCYfZhGhYcTG1dGhRivfmh6CQiAhafZITI1ITIJQmPfQkrTGaGXgTI3I2Hn9ZoFdxbAfTIhcCHGgxbmijfmgUfSdWIWdEcyIveEgzf")
AspCoding.EnCode("afUcBHdgAg7hIhkemgzCxiXiwdcfyhYCEiECngDfFcXi3g8c8djHDdBb")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>

						