當(dāng)然不行,那個是整個網(wǎng)頁的
谷城ssl適用于網(wǎng)站、小程序/APP、API接口等需要進(jìn)行數(shù)據(jù)傳輸應(yīng)用場景,ssl證書未來市場廣闊!成為創(chuàng)新互聯(lián)的ssl證書銷售渠道,可以享受市場價格4-6折優(yōu)惠!如果有意向歡迎電話聯(lián)系或者加微信:18980820575(備注:SSL證書合作)期待與您的合作!
要這樣
web1=webbrowser1
For i = 0 To Web1.Document.All.Count - 1
'要具體判斷是哪個控件還要看這兩個
'Web1.Document.All(i).TagName
'Web1.Document.All(i).Name
Text1.Text=Web1.Document.All(i).InnerText
Next i
System.Diagnostics.Process.Start("")
或者用 WebBrowser控件,代碼 WebBrowser1.Url = New System.Uri("")
Imports System.Net
Imports System.IO
Imports System.Text.RegularExpressions
Public Class Form1
Private Sub button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim stream As IO.Stream = WebRequest.Create(UrlAdress).GetResponse().GetResponseStream()
'注意urladress為你上面的網(wǎng)頁地址。
Dim sr As StreamReader = New StreamReader(stream, System.Text.Encoding.UTF8)
Label1.Text = Regex.Match(sr.ReadToEnd, "回答采納率").ToString
'sr。readtoend讀取網(wǎng)頁流到末尾,即使用正則表達(dá)式從網(wǎng)頁流中提取“回答采納率”,賦值給Label1.Text ‘沒有則為空
sr.Dispose() '關(guān)閉流
End Sub'要提取什么東西用正則表達(dá)式最好
End Class
'runFile是一個字符串變量,包含可執(zhí)行文件的路徑和文件名,或者是指定的網(wǎng)址
System.Diagnostics.Process.Start(runFile) '運(yùn)行文件或打開網(wǎng)站
你說的操作是像人一樣用鼠標(biāo)點擊網(wǎng)頁?
直接應(yīng)該是不行的,可以考慮先抓包分析數(shù)據(jù)包,在模擬瀏覽器發(fā)送請求獲取數(shù)據(jù),然后進(jìn)行相應(yīng)處理