jueves, 24 de octubre de 2019

hacer click botón página web

Private Sub btn_consultar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_consultar.Click

        Dim elc As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("input")
        For Each el As HtmlElement In elc
            If el.GetAttribute("Name").Equals("ACEPTAR") Then
                el.InvokeMember("click")
                Exit For
            End If
        Next
    End Sub

No hay comentarios.:

Publicar un comentario