使用net classes访问其他网站内容

访问

<script language="VB" runat="server">
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>