快精灵印艺坊 您身边的文印专家
广州名片 深圳名片 会员卡 贵宾卡 印刷 设计教程
产品展示 在线订购 会员中心 产品模板 设计指南 在线编辑
 首页 名片设计   CorelDRAW   Illustrator   AuotoCAD   Painter   其他软件   Photoshop   Fireworks   Flash  

 » 彩色名片
 » PVC卡
 » 彩色磁性卡
 » 彩页/画册
 » 个性印务
 » 彩色不干胶
 » 明信片
   » 明信片
   » 彩色书签
   » 门挂
 » 其他产品与服务
   » 创业锦囊
   » 办公用品
     » 信封、信纸
     » 便签纸、斜面纸砖
     » 无碳复印纸
   » 海报
   » 大篇幅印刷
     » KT板
     » 海报
     » 横幅

关于如何读取别人的网站使用NGWS NET classes

<%@ Assembly Name=\"System.Net\" %>
<%@ 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

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>\"
STRtemp=lineENC
do while line <> null
\\\'response.write (lineENC)
line = sr.ReadLine()
lineENC = server.HTMLencode(line) & vbcrlf & \"<br>\"
STRtemp=STRtemp & lineENC
loop
Catch ex As Exception
Response.Write(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>
<%response.write (STRtemp)%>
</body></html>


返回类别: 教程
上一教程: 第十二章 委托[《.net框架程序设计》读书笔记]
下一教程: .NET之ASP Web Form迅速入门(2)

您可以阅读与"关于如何读取别人的网站使用NGWS NET classes"相关的教程:
· 如何使用.net操作ddeml?
· 如何使用.NET配置文件(一)
· 关于如何操作其他窗体的控件或变量的方式!
· asp.net中的vb7中如何使用socket作一个传送时间的server
· 学习使用.NET IO流.
    微笑服务 优质保证 索取样品