国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

asp+ 如何跨站抓取頁面

2019-11-18 22:01:07
字體:
供稿:網(wǎng)友
如何用 phpasp 跨站抓取別的站點(diǎn)的頁面,今天我們來測試一下 asp+
是怎么實現(xiàn) 跨站抓取 別的站點(diǎn)的頁面
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 = "發(fā)生錯誤: " & ex.Message
End Try

End Sub
</script>
<html><head>
<title>跨站</title>
</head>
<body bgcolor="#FFFFFF">
<h3><font face="Verdana">抓來得數(shù)據(jù)</font></h3>
<asp:TextBox id="text1" Width="600px" Textmode="multiline" rows="40"
runat="server"/>
</body></html>





發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表

圖片精選

主站蜘蛛池模板: 马龙县| 谢通门县| 博野县| 抚宁县| 聂荣县| 西贡区| 上蔡县| 宿州市| 东莞市| 同心县| 青冈县| 清河县| 汕尾市| 象州县| 托克逊县| 曲沃县| 任丘市| 金平| 都安| 离岛区| 景洪市| 汝城县| 安西县| 响水县| 博湖县| 长宁县| 平谷区| 南安市| 波密县| 娄烦县| 岱山县| 达州市| 小金县| 江城| 彰武县| 武义县| 陵川县| 白河县| 清丰县| 台安县| 綦江县|