TUT - Create a simple login 'BOT' + Add features to it in VB + Source!

Hello guys,

As a lot of you are asking about 'how can I create a bot' and those questions, I wanna share a little and very basic project made in visual studio using VB.net with you!
I made a simple login bot on darkorbit, and I'll tell you how you can make it better and give it more functions.

Don't expect anything Client related, this bot is just on hpptwebrequest.

So let's start,

You first need to add 2 Textboxes (for username and password), a button (to let the bot navigate to the website -> this is not really needed, but I'll add it), and ofcourse, a webbrowser. Which should look like this:

Spoiler

To start, go to Form1.vb under public class and type in this code:

Code:

Dim didWeNavigated? As Boolean = False                                                                  'This adds the feature 'didWeNavigated' to the source.
    Dim gottheserver? As Boolean = False                                                                    'This feature will be added later, auto select the server.

2nd, you'll need to double click on your 'Login button' and paste the following code:

Code:

WebBrowser1.Navigate("http://www.darkorbit.com")                                                    'This will navigate to the darkorbit website and fill in all the information.
        didWeNavigated = True                                                                               'If it is true, it will send instructions to the WebBrowser to fill in everything.
    End Sub

For the following step, we're abou to create the bot itself... Double click your webbrowser and use this code:

Code:

If didWeNavigated = False Then                                                                      'If we could not connect to darkorbit due no internet connection/darkorbit website is down, it will stop.
            Exit Sub
        End If
        If didWeNavigated = True Then didWeNavigated = False
        Dim username As String = TextBox1.Text                                                              'It will make it be able for the bot to fill in the username with the right values
        Dim password As String = TextBox2.Text                                                              'It will make it be able for the bot to fill in the password with the right values
        WebBrowser1.Document.GetElementById("loginForm_default_username").SetAttribute("Value", username)   'This will search for the Username box, and paste the username information into that text field.
        WebBrowser1.Document.GetElementById("loginForm_default_password").SetAttribute("Value", password)   'This will search for the Password box, and paste the password information into that text field.
        WebBrowser1.Document.GetElementById("loginForm_default_loginButton").Focus()                        'This one will Focus (search) on the page for the login button...
        WebBrowser1.Document.GetElementById("loginForm_default_loginButton").InvokeMember("click")          'This one will click the login button, when it has been found.
        Dim htmlel As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("input")
        Dim el1 As HtmlElement
    End Sub

So what this code does, it basicly searches for every button and text field we need... And after the bot found it, it will paste the information from the textboxes we've added to the website, and it will press the login button...

After that, we have our own very basic login bot, this one won't select the server yet, but you can add those features and even make a good working skylab/auto-bid bot!

Open the spoiler to know how to add more features to the bot:

Spoiler

The source code (Made in Visual studio 2010 Ultimate) Has been added in the attached files, please don't make it public on another site without my permission, it's like respect for my work...

I hope this guide helped a lot of people out with their bot making questions, and they can see even a httpwebrequest bot isn't that easy to create!

Bye,

Joever11

EDIT: VirusTotal: [Only registered and activated users can see links. Click Here To Register...]