VB.Net，无法点击按钮，没有ID或名称

我想获得Adnooka的平衡检查器，但我甚至无法通过登录。这里的HTML：VB.Net，无法点击按钮，没有ID或名称

 </div> 
      <div class="control-group row-fluid"> 
      <label class="row-fluid " for="inputPassword">Password <div class="pull-right"><a class="muted"><small><a href='http://adnooka.com/recover'>Forgot your password ?</a></small></a></div></label> 
      <div class="controls row-fluid input-append"> 
      <input type="password" id="inputPassword" placeholder="Password" name="password" class="row-fluid" value=""> <span class="add-on"><i class="icon-lock"></i></span> 
      </div> 
     </div> 
     <div class="control-group row-fluid fluid"> 
      <div class="controls span6"> 
      </div> 
      <div class="controls span5 offset1" style=''> 
      <button type='submit' class="btn btn-default" style='float:right'>Login<i class="gicon-chevron-right"></i></a> 
      </div> 
     </div>

但按钮没有ID或名称，我怎么可以点击它？如何返回余额的价值？

这里是我到目前为止有：

WebBrowser1.Document.GetElementById("email").SetAttribute("value", textbox1.Text) 
    WebBrowser1.Document.GetElementById("password").SetAttribute("value", pass.Text) 
    Dim allelements As HtmlElementCollection = WebBrowser1.Document.All 

    For Each webpageelement As HtmlElement In allelements 

     If webpageelement.GetAttribute("type") = "submit" Then 

      webpageelement.InvokeMember("click") 

     End If 

    Next 

End Sub 

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
    WebBrowser1.Navigate("http://adnooka.com/login") 
End Sub

来源

2013-08-28 user2726518

你可以调用窗体本身上submit，你没有找到一个按钮单击。

如果页面上只有一个表单，这应该起作用。如果不是这样，调整是需要无论[0]到：

WebBrowser1.Document.Forms[0].InvokeMember("submit")

详情请参阅http://msdn.microsoft.com/en-us/library/system.windows.forms.htmldocument.forms.aspx。

来源

2013-08-28 18:17:27

非常感谢你的回答，但你的意思是GetElementByType（“form”）。 – user2726518

非常感谢您向我介绍此功能。我找到了一种方法来使它工作，你的方法不起作用 – user2726518

VB.Net，无法点击按钮，没有ID或名称

回答

相关问题