OA系统

开发平台：
ASP/ASPX

Rm.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("pGCHEcWCQCVf9gTIBHVifefihhHfBHuhifsfOhhgHf6VYsQsaRQh4iXgviRgvi3fThqQoRbQdKGgwctgohPiOhICHfVbhbHhCihgsffi5c4gzhyCDf4iahEgHg1IEgYfTgEgwcxgDfjhjgFI2HnixgYCEilhngliGhZg4h8ckIAIAH4H5caCDflilezbYf7gAiyg8gHgIhzhjeli3CjeACxHuhThDCZeHfVbCHEcafaixixf3I7f4iviFcYcFiFhBgkhYflhxgmh4ili2b1GFhUfDC4iGh3GlimhHODfwcni")
AspCoding.EnCode("lh6fYc2HxgEing5iHg2b7eailimhwdmCAgFi4HTIWIhbHhuicfPgohqhuh2Hng6iYfahEgTHyijeXezevfnivh5cYgzhAhEdOeyeXdjgZiahmflCYCZg4iEdpfXg6i3fui3h7fxh7h8eUcpGVc5c3I7iweyCmgjf8haHAhngEgEhFCkfshXgkhDe3C3IGh2HAhyb6i5hafFgngnI1Izc3GvHmiwd7C3fjgFgYfac3Gzc2bvH5fybFf3fkhFgYfnIZdad1Imb3ixI6iXgvi8fmhvH1IwH2bnI4ixIDhZikhlC")
AspCoding.EnCode("Yfmb2bnbYcnInfvc6iXgkhlCYfac2bmI1InIZgaH8gXgviFgYfVbgI3I2H7iygyC3izhDgvc3hjgzhFingvImHUHhcWdBHwcqeIhqfpgritgTIWIhbHh7eniFCweDCDfBbVbWdme8fah5flivfyixi2Hpg6fIiaiXiailiwbwIVbCHUhWIhb5c5cAhZeFh8fFCxi4bmGxcmh7CYfxiliybxf4iUfbgyimg4i3IBbBG5cjcSbxdXd5I3c2HvIngDhmhxiDfxIvhmhThcfag3iYf4bGgTH5c7GDGnGmHHiVbVc")
AspCoding.EnCode("bVVbhbFdaG7emClgai7hDfSdgdgIEcvdCfhgfiffUcVbCHHhbhOeIiKe5cmiZghikewCag7fGhzfmhzgFgBbgdCHHhYgzh6evC3Iah3fjhmhFcAhzfTIGg3glgUcpGCHEcACYCXfjgng2H7iwe3iFhwfTH2bAHkHAb1I2H3gxCFCmgmhEiHgYclIYc2H3hYfjgaflh6gZi4gxhxiYhEd4Hlb2b4bningafvi8iXgnh4CvfxiYhHg1IlI1IHfWIgI5c3IBHFhlgTIoHVc3IXd5c4bGglinhTIXbxi3gAgAfUH")
AspCoding.EnCode("EcvdDf3iGeVbCH3I5c3I3IGgFhnhGeEcXCwe3Cafnhlh3C8eHf4boHVc2H5c5c2H3I2HEcvi4iXi4iahmgBb7fmhXgkh9rerdqetFWypMsZrHhaGvimh5CYfxi3iBboHVc2H3I5c3I5c3IHh8eZimikh3CXdDgaiZfEgxgGh2bDc7H6I2b4b4hjflg3iYfAhHg4H6c3G1GXeYfvikhFi6g5h3hzCjeneEd1I7c2b2HmC3CjgviDC3fmg3ivfxiYhTH2bAb3GUcpGVc5c3I5c1GXd3IBHFh7fBbWIgI4bXd2H")
AspCoding.EnCode("4b3I4b1GXdGgFhZf4b8hainhDfxgHg1I6IBc3G2Hzi3CzCmfxgEgTHYclGkc2b2H3fkhvfmfahHg4H4g3CyCEgmhEi1I5c8gZiafxhmfzgTH2bkgaimgnhvimhZdHfQqpqdqILgRZQJrWrGgxbACZfUcVbgI3I3I3I2H3I3I5c3IBHFhmg3IEfaimgACziGh1I8c8blI2b5cxgngvfmfziACTHYclG8b4HTIEcpgegPgch9hfe5cyC4evCYfGh5h4C1G6fAh5fFc4HAi8izfng7HvcziliwiYc4bYgAh3fjh")
AspCoding.EnCode("ngbhyiEinhZeAhTH7d5c8hwe3iFhaCTHYc7cAbkH2c4H3IFi4gEiagkhzeaixiYhEdyCag5coHgIxgmhxhXiwfEgGhkbkbHfGgwciffhPgIfCifeGeTGzHlinhUcWIhb4bXd1G1GXd3IEcxbDfFCSdWIVcXd2H3I5c2H5cHhDfAhBbpGVc1G5c5c3I5c1GXd3IBHFhZf4bxgngxh5CwfFhHg2blGjd1I4b3fkhxhXiahTH1I4gngzgliZe7fYcXd7C3fjgygmfxiBGYcjhvfZfnhafYf2bTIqQoRBObMSV2q")
AspCoding.EnCode("trFVEcyIliZfBboHgI2H4b3I5c3I4b5c4bFdDfnh4byh4iygmfziliHg2bDd6HYcBbGgygzg6g8fEg3IxiXgzfmhHglg2HaimgEdEi4bAgliThjgmhFcXIDgvfZfliaCSH8cjGAbYH3IliygEgjgmhGhZGHrPsLPEOIQrqWqZsVPjQRqHuQrRQti4i3fjgQfviZiH99rerdqcJUWCQUW1RKqD9w9AWHPDqtQPsQrPqEoA96WWssQTrurMqSpa9DpGJQrGJting5hzerivi5hGOOsoRT9fuSVoRUW2qtrUpXI")
AspCoding.EnCode("4bDh5hafFg4iTH5bXI2HFiweTeZeTHYckb6c1IBbVbWd1G1GXd3I5c4b7fvCmO5VEiYCzfGgwcDf3iBboHhb4b1G5c1G5c5cGgwc8eFCTIoHhb2H4b3I3I4bXdBHFhlgBbpGWd3I4b2H4b4b5c4b2HGgEgmg3IziZevfXiaCACTH1IjI6HYc1GZikhvfmfahTH4H3hngkfEg3CFC1I4b6iXgviygXikfGh4Hkgvfnhmgving2bUcQqfsbQdKJqXWRrqRBHwclimgBbgdCH5c4b3I3I3I3I2H3IGglimg2Hyh")
AspCoding.EnCode("ngygmfziEgEdYckbDIYcBbGgxhxi6gFgDf2HxiYCzf4iBGYh2Hyg3iHgZg3IlhFhSevi3CBG3dEfxhnhACveSHkbkH6cYH5clivfEgaf4iFc4cIrprJq5VWqPQcqyVJqrr89jWqPMqOQHsrr0qRPerdqbMEperOrfqUpB9YH3IFiygI9ngGh3G8c6c2bSdFdyIliZfTIWIhb4b5c2H3I4b4bHhzHEgEiHfVbgI2H5c1G1G1G2HEcFhEiTIVbhbXd1G1GXd3I5c4b2HFdACmg5caCYfygXiwfliGh4Hkb8b3G")
AspCoding.EnCode("5c4eviaiZgxiBGZd4gYfahDfmhlg1I4b7C3fkhygYhjeEd1Ijhvfnhnhvimh4HTIhR5VcR698ompD9esFdzHEgmgHfhciG5c4b2H2H4b2H2H4bGgDfmgXdaCngxhXixgliHgYcAH8b4HTIBHlhngving3hli4byC3fjhmhGhYcAgYfvi4i4gFhZd2HainhHg3gTIWICH3I3I5c3I2H4b3I3I2H5c3IXdEczh6glixhagah5c8gXgaf8f4iEd4HnckG2bHfVRhrWIgI3I4b4b1G5cXd1GXd2H4b4bXdTGjf7h")
AspCoding.EnCode("Dfaijfxi5cFfXgafAi4iFcYc6c2bTIEW8QVbgI4b5c5c4b1G4b2HXdEcxb7e4ikh3C5fliUcHhzHliZfTIhcgI5c3I4b1G5c5cHhvdAClgUcoHgI3I4b4b5c2H3IHhFhAhHfWIVc2H4b3I2H5c1G1G1GBHlinh5cxgmhxh5Cve8eEd1I8c8b4HXdYCjgai5CkfHgYc5f4iahDfmhAh3G5cEeZiviygXijeEd1IzfxhZfnhjgng2bSdqQpqcRdKRPcsJReqBHxbFh3iBboHgI3I3I3I5c1G2H5cXdFdDfmg3I")
AspCoding.EnCode("wf4iweXiyhDfTH2bAH6H2bTIBHAg3CwCng3hli3IxiXgwiYfGh4HAgYfkhngniEg2b5cxh4CTHnhBbVbVc3I2H5c5c3I4bXd2H5c4b3I3IGgagAfEgygyizg2HDhXgjg8f4iHgZdvimhYgli2bTIbqMrKRDRoHCH5cXd2H5c1G4b2H3I5c3I3I3IHhzhlelizCkeyC2HDh5hwCDeYfGh4HniYfxiliYflg4HUcGrMrtrJrVbgI4b2H4b3I4b5c5c4b1G4b2HXdEczhlelixhxCkf5c6i5hafAiYfHgYclgai")
AspCoding.EnCode("Zgyh8eYcUcbqLsLsrRhcCH3I3I4b4b5c2H3I4bHhxb6fngviYf3hEgHfEcaG8eYeHfhchb5c3I4b4bXd1GTGvdEgEiBboHWdXd3I5cXd2H3IEcDfEiBboHhb4b1G5c1G5c5c3I5cTGACmg2HyhYfxhZgxgFhEd4HkbDI2b1GYCjgxhmfahGhYc3hYfzgEgnglgYc1GFfZiwCzCmfzgHg4Hwiwe3inhafYf2bHfDpvWFViQGR1sDO9RHhwcEg3iTIhcCH4b2H3I2H4b3I5c3IHhlinhXdwfmhxhYhziEgTHYc")
AspCoding.EnCode("8cDI2bSdBHaiah6gFgEg3IkfXgkg4iHg4Hohzg6g8fli1IXdainhHg4i4bAgFhH9jgngTHYH7izCZfliveFb6HlI4c3IWgVgihghKeriuCfetCRfGh2b3CEeYfahDfvc7f4ili8flgkfRiZiviAi4iGhpglhffxhZgxhlixcvbSG2b2H7CZikhDe4iGh3dAHjc6c5b2HFivfUg4iHgYcjIAb3GUchchbXdXd3I5c2H3I3I4b4b5cDpwVEWoqIqlQEVPrYpBWWICH5c1G1G1G2H5c4b5c3I4b4bXdTGweyC6g")
AspCoding.EnCode("AiFh2HyCYCkg4iEd4HpgxiAfAiFh4H4bxhYeFcme5cFiEgH9ze3CHgYH8hvfnhEgxgFbjdkH5b3IVh9e9ChgLhQfQhghuiPhTH1Ing8gngxi8eaHEi3CAC8flgzgufZizeAimhTHiflhffvfYhygDfvIxdGC1I4b6iXgviFg4iTH5blHDIAH5b3IFiygSh4iGhZdAHAb2bBbEcyIDf3iUcWIhbXd2H5c4b3I3IGgyIDflgTIhcgI2H4b3I3I2H5cGgACEiBbWIVc4b3I4b5c3I3I2H2HEcACZf5cvemhvfZg")
AspCoding.EnCode("ziEgHg1Ikb8b3G5cYCzezCmfahGhZdXeYfahDf4i7fYc5cFfXgafaiXixiFcYcjhygnhZfkhng2bUcKrlWHPEWDp5OD9oqTGwcFh4CHfhcVc4b2H5c2H3I5c3I5cGgFhYe5czimhzC5CxgliTH1IjI8b2bUcBHAgmhkhmh5fEg5ckf5hkgYfFc3G7eZeaf4i3hli1I4bxh4CBGXeSdWIVc4b2HXdXd3I5cXd2H3I5c2H5cHhjf7hFhweyije5c6iXgviDe3CHg4HzbjH2bTIVRiqgdCH4b3I4b1GXd3I4b2H")
AspCoding.EnCode("4b4b5c4bBHag6gEgygyije2H6iYCwC8fngHg4H6c3GUcEW8QoHhb2H2H4b3I2H3IXdXdGgxbFingvingniDfBbBHyIDfnhTIhcgI4b5c4bXd2H4bHhxblilgHfhcVc3I4bXd2HEcxbEgXg3gjgYfTI3IhcgI2H4b3I3IBHwcYgzC4ikhmgFimhEgBb5cGgyIDfZfUcgdCH5c1G4b2HGglimgTI5Iah4h7e8iGCTGvdDfnhBbgdiG2H4b2H5cBHli3iHfWICH5c5c5c5c5c4b3I4bBHxhzg7hAili4bje5hzf")
AspCoding.EnCode("3CFc2b5eAiFhACjfxiYc4bDfH9AfngFc3gAiEgFhkexi5cxh4CEdWgki2HEgygFhkh4iTHXIUWYqTWTQZVE9Dpxq9RjQn97o6oEoiQX95Wx9LR0q8WwsIPkohsSRtruqDpYsQsaRIrosqfngZiafrikh3fThQqiPT9et4c5c8gZizelCngTH5b2H7WyR3I4bQsjQ4bXIBbpGWd3I4b2H4b4b5c4b2HGg3glgTIhciG2H5cXdXd2H3I3I2HEc5eEiBbBHvfahAf8fFh3I5fjgYCECAgGhmiFgliEgyikf4bDf")
AspCoding.EnCode("BgAfmhHgmiFgFhlizhyC2HzhahIhviyg5fkiFcXI8hzCkf3izhDgxI4gjgjfAgngxcwIUH5b3I8g3fviFg3CFc2b3IPrYWZVYWOrHJ3I4H2HxiYCzf4iBG2bXfFgliEgagzg2bBbpGVcXd1GXd2H4b4bXd1GBH4h7fUcoHVc5c2H3I2HEcwcli3iUcVbgI4b2HHhyIFhEiUcVbiGHhzHACZi4hze4iBbgdCHhcVcHhzH5ijflgwiTIhcgIHhbeFi8iIhxC4CygximfxIbgyh5hEi6fngFhGhYhXfjIDcjHkb")
AspCoding.EnCode("TI")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>

						