sub page_load(src as object, e as eventargs)
try
dim objresponse as system.net.webresponse
dim objrequest as system.net.webrequest
dim theurlresult as string
dim theurl as string = "http://www.funinspace.com"
objrequest = system.net.httpwebrequest.create(theurl)
objresponse = objrequest.getresponse()
dim sr as new system.io.streamreader(objresponse.getresponsestream())
theurlresult=server.htmlencode(sr.readtoend())
page.controls.add(new literalcontrol(theurlresult))
catch ex as exception
page.controls.add(new literalcontrol(ex.message))
end try
end sub
</script>
<html><head>
<title>scraping a website</title>
</head>
<body bgcolor="#ffffff">
<h3><font face="verdana">scraped data</font></h3>
</body></html>
文章整理：站长天空 网址：http://www.z6688.com/
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!
