<%
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("Hh2cAgmhFhXd6e7eFcAgmhAhFf4iFCxIhiFCYfXgliZepi4hxemh4g8ewb3GfiIiWgIicewdqfYf3hkeAhmgQgmhli4Hvb3IVbWdEiAgxIRfagEhEi3hYfHg1IAgngvi3C5fliXdACjf6g3IjH4bad5cZh7fjfjh2H4H4b5I2HmgmiMiuglh4ilgMitgZiXfkhYf3IZH4b4H5cagAh3imhEi2H3gTh4bYc2HZH5c3i3gNhPC7e4ilg0gpggg3IZH2H1I5cZfYflh4g1IoHVclgFivcVhAfmhzg3IAhFixIQg")
AspCoding.EnCode("jf8fEiniYfabdezhkfzgthAgng7fablbxG7cgdiGzCnf4bahxCAC2HAh6fvcefpici2HEgwf4iahhchb2cTIWIgIhGXbzg4hlh8iEbYGahXfEC8iEbmOUrzbXdMPjrB9fKGQwrKQDVw9TVEcXg4bveEi4iZhEdlCAg4i7fxI3flh7hSc8f6fngAhGhBHZIFc7flhvIZfmi2eseECZeEiNhoiXgjhmhxdXGGe5c3IFh5h7fXi3CEgFcZd1f3gvi4exivh3G4bTITGZhkexili3InikewCjf7fGh6emhmgTIHh")
AspCoding.EnCode("2cTHkhngZhACxclgAgnHmg4hMith6fnglg0gVgZivCYfycndBdmHZITIBHxbXCyiahDfHfHhzH3fBbWICHGg2c4izgnh5cyg5iWIVc7flhaHbgafzh6f4iWIhbFimhli2HlglhGhxijfDfziaizgYhgdiG2cTIWIgIGgdg6fAfbgyiZfvfahZgxIcfziXgEiFimhDfGhZg3gkbDcAIjIHf")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>