Vb.net VB：使webbrowser1单击网页上的按钮

嗯，我想标题说明了大部分。我已经知道如何在浏览器中单击按钮，但该代码在这个按钮上不起作用。我希望此代码在这里是允许的，如果它不是

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Button3.Enabled = True
    Dim allelements As HtmlElementCollection = WebBrowser1.Document.All
    For Each webpageelement As HtmlElement In allelements

        'AMF Email
        WebBrowser1.Document.GetElementById("Email").InnerText textbox1.text

        'AMF Password
        WebBrowser1.Document.GetElementById("password").InnerText = textbox2.text

        'AMF Login Button
        If webpageelement.GetAttribute("value") = "Login" Then

            webpageelement.InvokeMember("click")
        End If
    Next

    'Navigates to FB likes to begin the process
    WebBrowser1.Navigate("http://addmefast.com/free_points/facebook_likes")
    Button2.PerformClick()

End Sub

好的，所有这些代码都工作得很好，但现在我希望它单击此链接上的“喜欢”按钮：

但是，我找不到正确的值。有人能帮我找到页面上“喜欢”按钮的正确值吗

VB2012

当我尝试在按钮上“检查元素”时，它显示的就是这些

    <div class="btn3">
        Like
    </div>

喜欢

您可以使用以下代码执行此操作：

For Each elem as HtmlElement in WebBrowser1.Document.All
    If elem.GetAttribute("class") = "btn3" Then
        elem.InvokeMember("click")
    End If
Next

如果这里有任何错误，很抱歉。我习惯于使用IDE作为我的代码。。。 我希望这有帮助

---

Rodit

嘿，我真的不知道答案。。但是firefox imacros有一个addmefast自动脚本。。检查emout@Bone谢谢，我有。但我正试图通过webrequests使多线程安全地免受反禁令…在我成功完成我请求的任务之后。检测到要减速的宏。：o。。也给我这个应用程序XD这是imacros用来点击like按钮的，TAG POS=1 TYPE=INPUT:SUBMIT ATTR=ID:&&VALUE:likeah这些都没用：（谢谢大家的尝试，不过我会在最后找到答案的lol。