vb点虐如何查源代码 vb源代码怎么导出

vb点虐中如何利用api函数获取网页源代码？？？

Dim MyClient As WebClient = New WebClient

Dim MyReader As New System.IO.StreamReader(MyClient.OpenRead(url), System.Text.Encoding.Default) '定义新的文件流并读取网页文件数据，url表示需要打开的网页地址

Dim longTxt As String = MyReader.ReadToEnd 'longtxt存储了网页的源码

MyReader.Close()

VB如何通过工程查看源代码，如图，这个样子的

如果这个程序带工程文件，你找到.vbp文件双击打开，然后在各窗体双击查看代码。

如果没有工程文件，你可以自己建一个工程文件，然后把这些窗体文件加入。

如果不想建你可以直接双击某个窗体文件，也能打开，打开后双击窗体，可以看到代码。

如何用vb点虐获得网页的源代码

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就是网页源代码

如何用vb点虐获取网页源代码

使用webbrowser控件来加载网页，然后再

Private

Sub

WebBrowser

1_DocumentCompleted下通过使用WebBrowser1.Document.Body.

InnerHtml

来获取网页的源代码，或使用

WebBrowser1.Document.Body.InnerText来获取网页中的文本。之后可以通过字符串控制指令或者

正则表达式

来精确获取到你所需的数据。

声明：本文内容由网友自发贡献，本站不承担相应法律责任。对本内容有异议或投诉，请联系2913721942#qq.com核实处理，我们将尽快回复您，谢谢合作！