Text von Textbox an E-Mail senden von Anfang bis Ende

  • VB.NET

Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von Hannes77.

    Text von Textbox an E-Mail senden von Anfang bis Ende

    Hallo zusammen,
    ich bin ziemlich neu in dem Gebiet Visual Basic und habe deswegen folgende Frage:
    Wie kann ich den Text von einer Textbox an meine E-Mail senden lassen, wenn ich auf einen Button klicke?
    Am besten wäre es wenn jemand eine Kinderleichte Erklärung hätte.
    Danke schon im Vorraus.
    Gruß Hannes77

    VB.NET-Quellcode

    1. Option Strict On
    2. Imports System.Net.Mail
    4. Dim m As New MailMessage
    5. Dim c As New System.Net.NetworkCredential
    6. c.UserName = " x@y.de" 'Absenderadresse
    7. c.Password = "*****"
    8. ' Ich würde empfehlen, die E-Mail Adressen und das PW über eine InputBox o.ä. abzufragen
    9. m.IsBodyHtml = False
    10. Dim s As New SmtpClient()
    11. s.Host = "smtp.web.de" ' für andere E-Mail Adressen musst du natürlich einen andern smtp angeben, je nachdem welchen e-mail dienst der absender verwendet
    12. s.Port = 25 ' oder welche Portnummer auch immer für den email dienst gebraucht wird
    13. s.UseDefaultCredentials = False
    14. s.Credentials = c
    15. Try
    16. m.From = New MailAddress("x@y.de")
    17. m.To.Add("a@b.de") 'Empfängeradresse
    18. m.Subject = "Betreff"
    19. m.Body = TextBox1.Text
    20. s.Send(m)
    21. MsgBox("E-Mail gesendet.", MsgBoxStyle.Information)
    22. Catch ex As Exception
    23. MsgBox(Err.Number & ex.Message & ex.StackTrace.ToString) ' Fehler = Meldung
    24. End Try
    25. End Sub

Facebook
Telefonspende