国产探花免费观看_亚洲丰满少妇自慰呻吟_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ā)表

圖片精選

主站蜘蛛池模板: 临漳县| 宜兰县| 玉溪市| 楚雄市| 五河县| 永兴县| 扬州市| 盈江县| 天峻县| 延安市| 盐山县| 朝阳区| 会宁县| 峨边| 康马县| 平安县| 中山市| 体育| 江西省| 黑山县| 南华县| 娄烦县| 平江县| 宜川县| 喀喇| 温州市| 连州市| 东乌| 黔西| 三都| 大姚县| 宁远县| 武义县| 吉首市| 舒城县| 托克托县| 会宁县| 鄂尔多斯市| 嵊州市| 商河县| 兰州市|