What you need:
2 Textboxes
1 Button
1 Timer with intervals set at about 10000 milliseconds
1 Webbrowser
This bot only checks if the member is registered, not a sub.Code:Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click WebBrowser1.Document.GetElementById("navbar_username").SetAttribute("value", TextBox1.Text) WebBrowser1.Document.GetElementById("navbar_password").SetAttribute("value", TextBox2.Text) For Each Unit As HtmlElement In WebBrowser1.Document.All If Unit.GetAttribute("tabindex") = "104" Then Unit.InvokeMember("click") End If Next Timer1.Start() End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick If WebBrowser1.DocumentText.Contains("Notifications") = True Then MessageBox.Show("Auth Passed!", "Auth") Form2.Show() ElseIf WebBrowser1.DocumentText.Contains("Notifications") = False Then MessageBox.Show("Auth Failed! Please register at www.TrueCheaters.com to access this program.", "Auth") Me.Close() End If Timer1.Stop() End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load WebBrowser1.Navigate("http://truecheaters.com/forums/index.php") End Sub End Class


LinkBack URL
About LinkBacks
Reply With Quote
