Hallo,
ich versende Sammel-EMails. Abgesprochen mit dem EMail-Provider.
Im Beispiel (Quellencode unten) funktioniert es im Normalfall ohne Probleme.
Nun passiert es aber, dass bei der Übergabe der EMail-Adressen eine Adresse
übergeben wird, die im
dann der Fehler im
Eigentlich der richtige Weg. Nur ist es leider so, dass nicht die
falsche EMail-Adresse angezeigt wird und der ganze Sendevorgang nicht durchgeführt wird.
Optimal wäre es, wenn die fehlerhafte EMail-Adresse angezeigt wird um diese zu speichern
und der Sendevorgang dann einfach mit der nächsten EMail-Adresse durchgeführt wird.
Dazu habe ich leider keine Idee.
kann mir dazu jemand etwas sagen oder muss ich die EMail's einzeln ohne .Bcc versenden?
Gruß George
Code-Tags eingefügt. ~Thunderbolt
ich versende Sammel-EMails. Abgesprochen mit dem EMail-Provider.
Im Beispiel (Quellencode unten) funktioniert es im Normalfall ohne Probleme.
Nun passiert es aber, dass bei der Übergabe der EMail-Adressen eine Adresse
übergeben wird, die im
smtp.Send(eMailmessage)
nicht akzeptiert wird unddann der Fehler im
Catch ex As Exception
aufgefangen wird.Eigentlich der richtige Weg. Nur ist es leider so, dass nicht die
falsche EMail-Adresse angezeigt wird und der ganze Sendevorgang nicht durchgeführt wird.
Optimal wäre es, wenn die fehlerhafte EMail-Adresse angezeigt wird um diese zu speichern
und der Sendevorgang dann einfach mit der nächsten EMail-Adresse durchgeführt wird.
Dazu habe ich leider keine Idee.
kann mir dazu jemand etwas sagen oder muss ich die EMail's einzeln ohne .Bcc versenden?
Gruß George
VB.NET-Quellcode
- Imports System.Net.Mail
- '------
- ...
- ...
- Private Sub EMailSenden_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EMailsSenden.Click
- Dim eMailmessage As New MailMessage
- Dim Ausgangsserver As String = '...... wird aus einer DB gelesen
- Dim Port As Integer = '...... wird aus einer DB gelesen
- Dim EMailAdresse As String = '...... wird aus einer DB gelesen
- Dim AngezeigterName As String = '...... wird aus einer DB gelesen
- smtp.EnableSsl = '...... wird aus einer DB gelesen
- Dim Kennwort As String = '...... wird aus einer DB gelesen
- Dim smtp As New System.Net.Mail.SmtpClient(Ausgangsserver, Port)
- smtp.Credentials = New System.Net.NetworkCredential(EMailAdresse, Kennwort)
- eMailmessage.Subject = TextBetreff.Text
- eMailmessage.From = New System.Net.Mail.MailAddress(EMailAdresse, AngezeigterName)
- eMailmessage.Bcc.Add(TextAnBcc.Text) 'hier sind einige hunderte eMail-Adressen zusammengefaßt
- Try
- smtp.Send(eMailmessage)
- ' Daten wurden gesendet...
- TextAnBcc.Text = ""
- Catch ex As Exception
- ' Fehler! Daten wurden NICHT gesendet
- End Try
- smtp = Nothing
- End sub
Code-Tags eingefügt. ~Thunderbolt
Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „Thunderbolt“ ()