e-mail fehler

  • VB.NET

Es gibt 8 Antworten in diesem Thema. Der letzte Beitrag () ist von RodFromGermany.

    e-mail fehler

    hi
    mein programm sollte mir eig ne e-mail zusenden aber wenn ich es starte kommt diese Fehlermeldung: Die angegebene Zeichenfolge besitzt nicht das für eine E-Mail-Adresse erforderliche Format. bitte helft mir
    mfg

    *Topic verschoben*

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Marcus Gräfe“ ()

    Wo ist meine Glaskugel?
    Wie sieht denn die angegebene Zeichenfolge aus?
    Wie sieht der Code aus?
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    Email Adresse ev falsch geschrieben zb ohne @ oder .at , de , com etc....???

    Code wäre von Vorteil!

    MFG
    GOOGLE ist mein Meister :)

    VB.NET-Quellcode

    1. Imports System.Web.Mail
    2. Imports System.Net
    3. Imports System.Net.Mail
    4. Public Class Form1
    5. Inherits System.Windows.Forms.Form
    7. Private Sub Button1_Click(ByVal sender As System.Object, _
    8. ByVal e As System.EventArgs) Handles Button1.Click
    10. Dim oMail As New MailMessage()
    12. ' SMTP-Server (z.B. T-Online)
    13. SmtpMail.SmtpServer = "smtp.web.de"
    15. With oMail
    16. ' Absender
    17. .From = "meineE-mail@web.de"
    19. ' Empfänger
    20. .To = "Empfänger@web.de"
    22. ' Betreff
    23. .Subject = "Test-Nachricht"
    25. ' Nachricht
    26. .Body = "Dies ist eine Test-Nachricht"
    28. ' Anlagen?
    29. ' .Attachments.Add(New MailAttachment("Dateiname"))
    30. End With
    32. Try
    33. SmtpMail.Send(oMail)
    34. MsgBox("Nachricht wurde versandt.")
    36. Catch oEx As Exception
    37. MsgBox("Fehler: " & oEx.Message.ToString)
    39. End Try
    40. End Sub


    Edit by Dodo:
    VB-Tags eingefügt, nächstes Mal bitte selbstständig dran denken.

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Dodo“ ()

    RodFromGermany schrieb:

    Wie sieht denn die angegebene Zeichenfolge aus?

    In welcher Zeile kommt der Fehler?
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    hi ich habe ein Problem bei einem progamm das mir eig eine mail senden sollte kommt dieser fehler: Smtp Exception wurde nicht behandelt. Fehler beim senden von Mail.
    das is der code

    VB.NET-Quellcode

    1. Dim smtpserver As New SmtpClient
    2. Dim email As New MailMessage
    3. smtpserver.Credentials = New Net.NetworkCredential("McGoofy1@web.de", "passwort")
    4. smtpserver.Port = 25
    5. smtpserver.Host = "smtp.web.de"
    6. email = New MailMessage
    7. email.From = New MailAddress("McGoofy1@web.de")
    8. email.To.Add("McGoofy1@web.de")
    9. email.Subject = "Betreff"
    10. email.Body = erhaltenerText.Text
    11. smtpserver.Send(email)
    12. End Sub


    Edit by Dodo:
    -> Beiträge zusammen gefügt

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „jobi“ ()

    Sieh Dir mal meinen Code an, der läuft:
    Spoiler anzeigen

    VB.NET-Quellcode

    1. Imports System.Net.Mail
    3. Public Class Form1
    4. Sub Mail()
    5. Dim mail As New MailMessage()
    6. Dim SmtpServer As New SmtpClient
    7. SmtpServer.Credentials = New Net.NetworkCredential(tbMailAbsender.Text, tbMailPassword.Text)
    8. SmtpServer.Port = CInt(tbSmtpPort.Text)
    9. SmtpServer.Host = tbSmtpHost.Text
    10. SmtpServer.EnableSsl = True
    11. mail.To.Add(tbMailEmpfänger.Text)
    12. mail.From = New MailAddress(tbMailAbsender.Text)
    13. mail.Subject = tbBetreff.Text
    14. mail.Body = tbInhalt.Text
    15. SmtpServer.Send(mail)
    16. End Sub
    18. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSend.Click
    19. BackgroundWorker1.RunWorkerAsync()
    20. Me.Enabled = False
    21. End Sub
    23. Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
    24. Mail()
    25. End Sub
    27. Private Sub BackgroundWorker1_RunWorkerCompleted(ByVal sender As Object, ByVal e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles BackgroundWorker1.RunWorkerCompleted
    28. MessageBox.Show("E-Mail erfolgreich gesendet!", "Gesendet!")
    29. Me.Enabled = True
    30. End Sub
    31. End Class
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

Facebook
Telefonspende