objstream.Close()
Set objstream = Nothing
End Function
%>
<%
NowDir = server.mappath("/")
Call Save2Local("http://www.baidu.com/img/logo.gif", NowDir & "baidulogo.gif")
Call Save2Local("http://flash.jninfo.net/images/banner.swf", NowDir & "banner.swf")
Call Save2Local("//www.jb51.net.com/", NowDir & "jb51.htmll")
response.Write getHTTPPage("//www.jb51.net/")
%>
