*
Tofu is made of excellent products
Http://www.asp888.net bean curd technology station
If you post this article, please retain the copyright information
*/
In previous articles, tofu used PHp and Asp to capture pages of other sites. Today we will test asp +
How does one capture pages of other sites?
Code Listing
<% @ Assembly Name = "System. Net" %>
<% @ Import Namespace = "System. Net" %>
<% @ Import Namespace = "System. IO" %>
<Script language = "VB" runat = "server">
Sub Page_Load (Src As Object, E As EventArgs)
Dim HttpWResp as HTTPWebresponse
Dim sr As StreamReader
Dim STRtemp as string
Text1.text = ""
HttpWReq = WebRequestFactory. Create ("http://www.asp888.net ")
HttpWReq. KeepAlive = false
HttpWResp = HttpWReq. GetResponse ()
Sr = new StreamReader (HttpWResp. GetResponseStream (), Encoding. ASCII)
Try
Line = sr. ReadLine ()
Do while line <> null
Line = sr. ReadLine ()
LineENC = server. HTMLencode (line) & vbcrlf & "<br>"
Text1.text = text1.text & lineENC
Loop
Catch ex As Exception
Text1.text = "error:" & ex. Message
End Try
End Sub
</Script>
<Html> <Title> cross-site </title>
</Head>
<Body bgcolor = "# FFFFFF">
<H3> <font face = "Verdana"> capture data </font> <Asp: TextBox id = "text1" Width = "600px" Textmode = "multiline" rows = "40"
Runat = "server"/>
</Body>
Author: tofu ()
Start building with 50+ products and up to 12 months usage for Elastic Compute Service
1 on 1 presale consultation
24/7 Technical Support 6 Free Tickets per Quarter Faster Response
Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.
A comprehensive suite of global cloud computing services to power your business
Payment Methods We Support
