Öncelikle yeni bir form oluşturun. Daha sonra: 1 Adet Button 2 adet textBox ekleyin. Textboxların isimleri ile oynamayın eğerki değiştiricek olursanızda aşağıda verdiğim kod'a göre uyarlayın .. Şimdi ekledigimiz button'a cift tıklayarak Kod penceresini acıyoruz. ve şu kodları yapıstırıyoruz. ama once en üst satıra Imports System.Net.Mail yapıstırın.. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim kuflucom As New MailMessage() Try kuflucom.From = New MailAddress("xxxxxxxxxx@gmail.com") kuflucom.To.Add("xxxxxxx0@gmail.com") kuflucom.Subject = TextBox1.Text kuflucom.Body = TextBox2.Text Dim SMTP As New SmtpClient("smtp.gmail.com") SMTP.Port = 587 SMTP.EnableSsl = True SMTP.Credentials = New System.Net.NetworkCredential("Mail adresimizi buraya", "mail sifresini buraya yazıcaz") SMTP.Send(kuflucom) TextBox2.Text = "" MsgBox("Mesajınız iletilmiştir.") Catch ex As Exception End Try End Sub End Class Örnek Görünüm: Bu verdigim tabi Görüldüğü üzere g-mail icin gecerli bir form eger farklı mail sevisleri kullanıyorsanız kullandıgınız servisin smtp - port ayarlarınızı girmeniz yeterli olucaktır.. Çok faydalı bir kod Gerek iletişim kutusu gerek fake programlamada kullanılır.:saygilar:
