如何用vb.net获得网页的源代码

Dim url As String=" 网址"

Dim httpReq As System.Net.HttpWebRequest

Dim httpResp As System.Net.HttpWebResponse

Dim httpURL As New System.Uri(url)

httpReq = CType(WebRequest.Create(httpURL), HttpWebRequest)

httpReq.Method = "GET"

httpResp = CType(httpReq.GetResponse(), HttpWebResponse)

httpReq.KeepAlive = False ' 获取或设置一个值，该值指示是否与

Internet资源建立持久连接。

Dim reader As StreamReader = _

New StreamReader(httpResp.GetResponseStream,

System.Text.Encoding.GetEncoding(-0))

Dim respHTML As String = reader.ReadToEnd() 'respHTML就是网页源代码

你可以将源程序转化成安装软件，到任何机器上都能使用了。如果是这样的话，你要在你的项目中添加一个安装工程，因为我用的是日语版的，所以可能名称上有些不同，应该和中文版的差不多，你可以参照按以下步骤来做：

文件—〉添加（追加）—〉新项目的添加—〉选择“其他的项目种类”当中的第一个子选项，大概是叫“SetUp和配置”—〉选择右边那个有光盘的图标的类型“SetUp Project”—〉在Textbox里面写你喜欢的Project名字(比方叫“Test”)，选择文件夹的路径—〉生成之后，会出现File System的界面—〉此时，在右侧的项目所有文件的总揽里面（Solution什么什么的）出现了一个刚才命名的安装工程（按照刚才比方，这个安装工程就叫“Test”）—〉右键点击那个安装工程—〉Build一下—〉成功（程序不能出错）—〉到你刚才的路径中找到文件夹（“Test”）双击进入—〉Release文件夹双击进入—〉看到那个.EXE文件了吗(setup.exe）

---