Imports system.web.mail


Public Class e_mail
    Dim yolla As New MailMessage




    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      Try
        SmtpMail.Send(yolla)
        MsgBox("Mail başarı ile yollandı")


      Catch
        MsgBox("Olası bir hata ile karşılaşıldı", , "Hata")

      End Try
    End Sub

    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
      yolla.From = TextBox1.Text

    End Sub

    Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged
      yolla.To = TextBox2.Text

    End Sub

    Private Sub TextBox3_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox3.TextChanged
      yolla.Subject = TextBox3.Text

    End Sub

    Private Sub TextBox5_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox5.TextChanged
      yolla.Body = TextBox5.Text

    End Sub
End Class

kodalr bunlar nerde hatam hatam var bilmiorum

smtp server dan kasıt yanı ekleme mı yapması gerekıoo aynı hatayı bnde aldım da !

Host umuz var diyelim bunu vb.net  de nasıl ayarlıcaz