2012-06-16 31 views
0

我試圖訪問某些HTML按鈕。我正在使用vb.net 2008平臺以編程方式單擊這些按鈕。問題是全部17個按鈕都沒有id,並且具有相同的名稱類型和值,並且形式相同。因此,請指導我如何單擊每個按鈕。這是這些按鈕的HTML代碼。通過vb.net訪問具有相同名稱和值的HTML按鈕

回答

0

可以說的是,你有一個WebBrowser控件
和HTML是:

"<button id=namee>Click</button><button id=namee>Click</button><button id=namee>Click</button>" 


你可以改變butoons的id的+單擊其中:

WebBrowser1.Navigate("") 
Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete 
    Application.DoEvents() 
Loop 
WebBrowser1.Document.Body.InnerHtml = "<button id=namee>Click</button><button id=namee>Click</button><button id=namee>Click</button>" 
For i = 1 To 3 
    WebBrowser1.Document.Body.InnerHtml = Replace(WebBrowser1.Document.Body.InnerHtml, "namee", "n" & i.ToString, , 1) 
Next 
WebBrowser1.Document.GetElementById("n1").InvokeMember("click") 
WebBrowser1.Document.GetElementById("n2").InvokeMember("click") 
WebBrowser1.Document.GetElementById("n3").InvokeMember("click") 
+0

但按鈕沒有ID ...所以如何點擊它們沒有ID ??? –

+0

當你在頁面的html上使用replace時,你可以在替換它之後替換

0

有另一種方式:

Dim Elems As HtmlElementCollection 
Dim WebOC As WebBrowser = WebBrowser1 
Elems = WebOC.Document.GetElementsByTagName("button") 
For Each elem As HtmlElement In Elems 
    elem.InvokeMember("click") 
Next 
相關問題