Нажатие кнопки на вебстранице - VB

Формулировка задачи:

WebBrowser1.Document.getElementById("id").Click

нажимает кнопку на вебстранице. а если ID кнопки нет?

Dim Elements, Element
Set Elements = WebBrowser1.Document.All
For Each Element In Elements
    If Element.TagName = "TagName" Then
        If Element.Value = "Надпись на кнопке" Then
        Element.Click
        End If
    End If
Next Element

не работает. подскажите плз

Решение задачи: «Нажатие кнопки на вебстранице»

textual
                            Листинг программы 
                        

                            Set Elements = WebBrowser1.Document.All
For Each Element In Elements
'Text1.Text = Text1.Text & Element.Type & "   " & Element.Value & vbCrLf
If Element.TagName = "INPUT" Then
    If Element.Type = "submit" Then
        If Element.Value = "Опубликовать" Then
        'Element.Click
        End If
    End If
End If
Next Element

                        

Оцени полезность:

11 голосов , оценка 3.909 из 5

Похожие ответы