e-mail fehler

  • VB.NET

    e-mail fehler

    Hi,

    habe folgendes Problem habe diesen code :

    Imports System.Net.Mail

    Quellcode

    1. Dim Msg As New MailMessage
    2. Dim myCredentials As New System.Net.NetworkCredential
    3. myCredentials.UserName = "Das.ist.egal@web.de"
    4. myCredentials.Password = ";);););););););)"
    5. Msg.IsBodyHtml = False
    6. Dim mySmtpsvr As New SmtpClient()
    7. mySmtpsvr.Host = "smtp.web.de"
    8. mySmtpsvr.Port = 25
    9. mySmtpsvr.UseDefaultCredentials = False
    10. mySmtpsvr.Credentials = myCredentials
    11. If RichTextBox1.TextLength > 50 Then
    12. Try
    13. Msg.From = New MailAddress("das.ist.egal@web.de")
    14. Msg.To.Add("der.empfänger@web.de")
    15. Msg.Subject = "Hallo"
    16. Msg.Body = RichTextBox1.Text
    17. mySmtpsvr.Send(Msg)
    18. RichTextBox1.Text = " "
    19. Catch ex As Exception
    20. RichTextBox1.Text = " "
    21. End Try
    22. End If

    könnt ihr euch erklären warum keine e-mail versandt wird ? ..
    oke hat sich geklärt ;)

    MfG mrman

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