Jul 6, 2009 11:59 AM
(This post was last modified: Jul 6, 2009 12:00 PM by Apple.)
Add this one :P
"Send Email"
"Send Email"
Code
Dim mail As New MailMessage()
Dim SmtpServer As New SmtpClient
SmtpServer.Credentials = New Net.NetworkCredential("[email protected]", "password")
SmtpServer.Port = 587
SmtpServer.Host = "smtp.gmail.com"
SmtpServer.EnableSsl = True
SmtpServer.EnableSsl = True
mail.To.Add("reciever@anything")
mail.From = New MailAddress("[email protected]")
mail.Subject = (TextBox1.Text)
mail.Body = (TextBox2.Text)
SmtpServer.Send(mail)

![[Image: l8foq.png]](https://i.imgur.com/l8foq.png)

![[Image: hf-sig.png]](https://deadswitch.com/assets/img/misc/hf-sig.png)