繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > ASP.NET实现HTTP方式获取功能
- ASP.NET
- 如果操作EXCEL提示没有权限？
- 不让别人保存你的网页
- 从C#转到VB .net
- 创建虚拟目录的常用属性
- visual studio 2005又一新增功能
- Com与.Net互操作(二次业务开发及插件开发总结)
- Wap页面使用asp.net中移动控件List分页(原创)
- 关于如何操作其他窗体的控件或变量的方法！
- C#版MultiSelected DataGrid
- 使用非托管代码直接修改字符串
- 如何让一个函数返回多个值（C#）
- (原创)C#编写的windows计算器----源代码
- (原创)C#获取本地计算机名,IP,MAC地址
- 用C#读取sina天气预报到wap页面(一)(原创)
- 窗体问题--拖动无标题栏的窗体
- 写在VB.NET公共论坛的开篇语！
- 在VB6中动态创建使用ADO控件访问数据库
- 使用Visual Basic 6实现真正实用的多线程处理
- 设计模式之Facade：家庭篇
- 如何设置tabcontrol控件的tabPage的text内容显示成竖着的字体
ASP.NET实现HTTP方式获取功能
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 136 ::
收藏到网摘: n/a
<%@ Import Namespace="System.Net" %>
<%@ Import Namespace="System.IO" %>
<script language="VB" runat="server">
dim STRtemp as string
Sub Page_Load(Src As Object, E As EventArgs)
Dim HttpWResp as HTTPWebresponse
Dim sr As StreamReader
'dim STRtemp as string
dim build as new stringbuilder
HttpWReq = WebRequestFactory.Create("http://www.funinspace.com")
HttpWReq.KeepAlive = false
HttpWResp = HttpWReq.GetResponse()
sr = new StreamReader(HttpWResp.GetResponseStream(), Encoding.ASCII)
Try
line=sr.ReadLine()
lineENC = server.HTMLencode(line) & vbcrlf & "<br>"
build.append (lineENC)
do while not IsNothing(line)
line = sr.ReadLine()
lineENC = server.HTMLencode(line) & vbcrlf & "<br>"
build.append (lineENC)
loop
Catch ex As Exception
problem.text =ex.Message
End Try
labelscrape.text=build.ToString()
End Sub
</script>
<html><head>
<title>Scraping A Website</title>
</head>
<body bgcolor="#FFFFFF">
<h3><font face="Verdana">Scraped Data</font></h3>
<asp:label id=problem runat="server"/>
<font face="courier new" size="2">
<asp:label id=labelscrape runat="server"/>
</font>
</body></html>
评论 (0) All
