<%
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("TG3iyg8g5c4gjgZilhAgGh3fZflh7cGeVbWd4b1GGgyi3gwhngniEgXd3hviYCFi7eyg3iFcYcXekhAgzCYeFbIiAH8Hdehhbh7bghzbdggh7bbCaIAI7c3hZhaITd7bdfEGncDbkdjc8bkcAG8bDblIlI7dkH1I5c5fyimgmhnC5hlhmhFcYcwfACDfAfSHyIwc3ijfEfzgviag4emgwdaeXg3hlgkevC3C3izCZiybnijfwixb8ilCnCwc6fziag5fye7i3fEe4izH4gYCnCFiyIXCjg5hECyhvdlh7inf")
AspCoding.EnCode("wCYCFiwfaH3hYC3g1b8g4iEi7eygzhahFcAczIAbxGAIBcablI3G2HEfvfmg8eziBG2blc6c7H4H2HwfmhaiXixg8eTH2bFGkH1IBbpGCH1G5c3I5cEcAfYC7fYCae4bje3fzfmhHgYckgyiDhxh4i3G3I6i5hvi8fZeGh2bJgyixi5CXiyIEh7hxhjhnezHjI7dkHDHAIlbkbjI6d6H7GBcjIAIkcjIkIjc8bxIlhEfnf2b5caGBbgdhb1G3I5c3IHh6gZilgYCjh5cyCZiaengFcYcDiDe5hjgzC8eThYc")
AspCoding.EnCode("2HFf4ekhEhmhGh2bxgxhYhaC1I3IwcBbVbgIXd4b2H1GEcmhvCmimh3i1GlhAh4gHgZdMfagximfXiyIEhDCxhjhYhwc8ckH7dDHjHjHjI8c7c6H6HSI8cAI7GjI8d6GDIybAgFeXCZd5c8CAi5hvivfliThFcZdaCaimfzi1I2Hlevi8fneaikfAgDCYCXingEd1IyhACFhDCFbwczH6C6C7iaHzf5hmClgzhkg4i3iweXgyb3hyiwiyIYhkeyIXimhEgmeaf3f6fxglevi4eTh4iEi4H2HDfUf7h4iFc1I")
AspCoding.EnCode("4eAf7hzevf4g5h8evfkexiyIG9nc6faCjfmCye8h4eFfYfzbYgviXgFiyh2b5cFeyg3iFhziTH3G7bAb8IYc5caC4iygYhyhFhGh3GEHlIZdHfBHyImhjh3g3CZfGehcgI3I5cGgyIyi4hvgmh5fDfBbhciGHhvdnhwe8gUcGgchAg8ibgxCnhaiyCXizGbgziZiEi7emhEgEdne4h8clHjHlGBb")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>