Hello I'm making a personal bot for adf.ly but I'm not very sure how to make the program react to the skip button showing up after the countdown or to detect the countdown somehow so it starts its loop after the countdown finishes or button displays. Because asking it to invoke a click on the skip button before the time is done glitches adf.ly. Please help? Here's my code: I'm also going to add a proxy but i do not know how to make it automatically switch proxies in between loops.
Code
Public Class Form1
Dim done = False
Dim navigating = False
Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
done = True
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
WebBrowser1.Navigate(TextBox1.Text)
End Sub
Private Sub WebBrowser1_Navigating(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserNavigatingEventArgs) Handles WebBrowser1.Navigating
navigating = True
End Sub
Private Sub WebBrowser1_NewWindow2(ByVal ppDisp As Object, ByVal Cancel As Boolean)
Cancel = True
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Do
WebBrowser1.Document.GetElementById("skip_ad_button").InvokeMember("Click")
WebBrowser1.Navigate(TextBox1.Text)
MsgBox("youhavelooped")
Loop
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub