Zugriff auf SMTP verweigert?

  • VB.NET

Es gibt 3 Antworten in diesem Thema. Der letzte Beitrag () ist von beate.

    Zugriff auf SMTP verweigert?

    hi leute,

    in meienr app muss an einer stelle eine email versendet werden...

    dazu gibt es genügend Beispiele im Web wie der code dazu aussieht!
    Ich abreite mit System.net.mail und nicht mehr mit dem alten Webmail

    VB.NET-Quellcode

    1. Imports System.Net.Mail
    3. Public Class Form1
    5. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    6. Try
    8. Dim Message As MailMessage = New MailMessage()
    9. Dim Smtp As New SmtpClient()
    10. Dim SmtpUser As New System.Net.NetworkCredential()
    11. '-- Build Message
    12. Message.From = New MailAddress("matthias_just(at)gmx.de", "matthias")
    13. Message.To.Add(New MailAddress("aphofis87(at)gmx.net", "matthias"))
    14. Message.IsBodyHtml = False
    15. Message.Subject = "Mein Emailbetreff"
    16. Message.Body = "Hallo! ich bin der Inhalt der Email!"
    17. '-- Define Authenticated User
    18. SmtpUser.UserName = "matthias_just(at)gmx.de"
    19. SmtpUser.Password = "*****"
    20. SmtpUser.Domain = "mail.gmx.de"
    21. '-- Send Message
    22. Smtp.UseDefaultCredentials = False
    23. Smtp.Credentials = SmtpUser
    24. Smtp.Host = "mail.gmx.de"
    25. Smtp.DeliveryMethod = SmtpDeliveryMethod.Network
    26. Smtp.Send(Message)
    27. Catch ex As Exception
    28. MsgBox(ex.Message.ToString)
    29. End Try
    31. End Sub
    32. End Class


    die Antwort ist immer:

    VB.NET-Quellcode

    1. Postfach nicht verfügbar. Die Serverantwort war: 5.7.0 Need to authenticate via POP3 first {mp005}


    Die Emails, Servernamen und PW sind richtig...
    Kennt jemand den grund?

    bzw weiß ein funktionierendes Beispiel?

    gruß
    matthias

    Keine Ahnung, was bei Dir falsch ist. Ich habe grade mit folgendem Code getestet. Funktioniert problemlos.

    VB.NET-Quellcode

    1. Dim client As New Net.Mail.SmtpClient("mail.gmx.net")
    2. client.Credentials = New Net.NetworkCredential("myAdressByGmx@gmx.de", "myPasswd")
    4. Dim message As New Net.Mail.MailMessage("myAdressByGmx@gmx.de", "empfaengerAdress@domain.tld", "Testmail", "Testmail, gesendet mit Hilfe VB.Net ...")
    5. client.Send(message)


    Lass versuchshalber bei deinem Code folgende Zeilen weg.
    - Smtp.UseDefaultCredentials = False
    - Smtp.DeliveryMethod = SmtpDeliveryMethod.Network
    Mit den beiden Einstellungen hatte ich früher Problem bei einigen Smtp-Servern Problem gehabt. Ich kann Dir momentan aber nicht genau den Grund sagen ...

Facebook
Telefonspende