❶ VB 獲取網頁源碼 你的這個是怎麼解決的.能和我說一下嗎.謝謝
1、提取:用這個vb小程序可以!
❷ vb怎麼提取網頁源代碼的指定內容
先得到源代碼:這里用WebBrowser1控制項
text1=WebBrowser1.Document.documentElement.outerHTML
下面是篩選實例
自編函數Getin
範例
GetIn(字元串, 起始, 結束)
GetIn(text1, ">", "<") '截取中間
GetIn(text1, "<", "") '截取後半段
GetIn(text1, "", ">") '截取前半段
Function GetIn(ByRef Str As String, St As String, Ed As String)
If InStr(1, Str, St) <= 0 Then
If InStr(1, Str, Ed) > 0 Then
Str = Left(Str, InStr(1, Str, Ed) - 1)
Else
Str = ""
End If
GetIn = ""
Str = ""
Exit Function
End If
If InStr(1, Str, Ed) <= 0 Then
If InStr(1, Str, St) > 0 Then
Str = Right(Str, Len(Str) - InStr(1, Str, St) - Len(St) + 1)
Else
Str = ""
End If
GetIn = Str
Str = ""
Exit Function
End If
Str = Right(Str, Len(Str) - InStr(1, Str, St) - Len(St) + 1)
If Ed = "" Then
GetIn = Str
Str = ""
Exit Function
End If
GetIn = Left(Str, InStr(1, Str, Ed) - 1)
Str = Right(Str, Len(Str) - InStr(1, Str, Ed) - Len(Ed) + 1)
End Function
❸ 如何用vb webbrowser獲取帶框架網頁的全部源代碼
用vb webbrowser獲取帶框架網頁的全部源代碼,指令如下:
WebBrowser1.Document.frames(0).Document.documentElement.outerHTML
遍歷框架就可以得到所有的(回WebBrowser1.Document.frames(0).count框架個答數)。
❹ VB怎麼獲取網頁源碼
1)使用MICROSOFT INTERNET TRANSFER CONTROL的,代碼如下:
Dim strhtml As String
Dim STRURL As String
STRURL="http://www.sijiqing.com"
strhtml = Inet1.OpenURL(STRURL)
2)用System.Net命空間下的HttpWebRequest來取得,代碼如下:
Dim url As String=" http://mgxx520.blog.com.cn" ' 網址
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得到網頁的源代碼
1 先載入網頁:
Private Sub Form_Load()
WebBrowser1.Navigate "http://..com/question/123877723.html"
End Sub
2 載入完成後取字元串到文本框:
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Dim doc As Object, objhtml As Object
Dim strhtml As String
On Error GoTo errorsub
Me.Caption = WebBrowser1.LocationName & " 載入完成"
If MaxWebNum <= 0 Then
Set doc = WebBrowser1.Document
Set objhtml = doc.body.createtextrange()
If Not IsNull(objhtml) Then
strhtml = WebBrowser1.Document.body.innertext
Text1.Text = strhtml
End If
End If
Exit Sub
errorsub:
Text1.Text = "錯誤!!!"
End Sub
❻ 如何用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就是網頁源代碼
❼ 請問如何用VB獲取網頁源碼
使用Inet控制項獲取網頁源碼。
Internet Transfer 控制項實現了兩種廣泛使用的 Internet 協議: 超文本傳送協議(HyperText Transfer
Protocol)(HTTP) 和文件傳送協議(File Transfer Protocol) (FTP)。使用 Internet Transfer
控制項可以通過 OpenURL 或 Execute 方法連接到任何使用這兩個協議的站點並檢索文件。
PrivateSubCommand1_Click()
DimstrhtmlAsString
DimSTRURLAsString
STRURL="http://www..com"
strhtml=Inet1.OpenURL(STRURL)
Text1=strhtml
EndSub
❽ 如何用vb.net獲取網頁源代碼
使用webbrowser控制項來載入網頁,然後再
Private
Sub
WebBrowser
1_DocumentCompleted下通過使用WebBrowser1.Document.Body.
InnerHtml
來獲取網頁的源代碼,或使用
WebBrowser1.Document.Body.InnerText來獲取網頁中的文本。之後可以通過字元串控制指令或者
正則表達式
來精確獲取到你所需的數據。
❾ VB:如何通過VB獲取某個網站的所有頁面源代碼
兩種實現方式:
1、先用WebBrowser控制項、iNet控制項或xmlhttp組件獲取網站首頁代碼(這個網上有一大堆介紹,就不啰嗦了),然後分析代碼,找出其中的超鏈接,然後再逐個獲取其頁面代碼,這里要注意的是,要區分外鏈和內鏈,外鏈就不要去獲取代碼了(否則的話如果網站上有個網路的鏈接,那麼你的程序就要去獲取網路的頁面了);另外還要控制獲取的層數(比如說一級子頁面是第二層,二級子頁面是第三層),否則的話遇到大型網站你的程序很可能進入死循環。
2、利用瀏覽器的緩存來獲取,主要是IE的緩存。windows系統有專門的對IE緩存進行讀寫操作的API函數。要想獲取某個網站的源碼,可以用IE打開這個網站,然後把裡面的鏈接都手工點擊一遍,使頁面代碼能被IE自動放入緩存文件夾中即可。當然,如果網站比較大,這個過程可能會比較繁復。然後再通過程序遍歷IE的整個緩存系統,把與該網站相關的所有資源都提取出來。通過這種方法,不但可以提取HTML代碼,還有js代碼、css代碼,以及頁面上的所有圖片、動畫、視頻等資源。我個人比較喜歡這種方法。