Config.Logging = True 'HIER IST SCHON DER FEHLER
        Config.Password = "xxxxxxxxx" 
        Config.Username = "Ich@du.de"
        Config.Port = "25"
        Config.Host = "smtp.web.de"

 
 
        Dim IPMail As Smtp ' EMail Deklaration
        Dim Config As SmtpConfig ' Konfiguration
        Dim ArrayAdressen
 
        Config.Logging = True 'HIER IST SCHON DER FEHLER
        Config.Password = "xxxxxxxxx" 
        Config.Username = "Ich@du.de"
        Config.Port = "25"
        Config.Host = "smtp.web.de"
 
 
        ArrayAdressen = New System.Collections.ArrayList 'Emailadressen in 
        ' Array Speichern
        ArrayAdressen.Add(New ESUsoft.Smtp.Email("ICH@du.de", "Receiver"))
 
        IPMail.Config = Config
 
        With IPMail.Message
 
            .To = ArrayAdressen
            .Body = "Text"
            .Subject = "new E-mail"
 
        End With
 
        IPMail.SendMail()
        End
        End Sub

_______________________________________________________
Gib jeden Tag die Chance , der Sch?nste Deines Lebens zu werden .
Mark Twain .