![]() |
Mails mit Indy10
Hallo Leute,
ich bin zu blöd, mit indy 10, release 5328, mails zu verschicken... Folgender Code - SSL vergessen wir jetzt erstmal: ich hab den Mail-Versand in eine Klasse gepackt, da ich das mit den gleichen Daten im Programm öfter brauche.
Delphi-Quellcode:
So schwer ist's doch gar nicht, ..., hätte ich gedacht.
constructor TeMail.create;
begin inherited create; smtp := TIdSmtp.Create (Application); // SSLHandler := TIdSSLIOHandlerSocketOpenSSL.Create(Application); // SSLHandler.MaxLineAction := maException; // SSLHandler.SSLOptions.Method := sslvTLSv1; // SSLHandler.SSLOptions.Mode := sslmUnassigned; // SSLHandler.SSLOptions.VerifyMode := []; // SSLHandler.SSLOptions.VerifyDepth := 0; SMTP.IOHandler := nil; // SSLHandler; smtp.host := 'bla'; smtp.port := 25; // SMTP.UseTLS := utUseExplicitTLS; SMTP.AuthType := satDefault; smtp.username := 'x'; smtp.password := 'x'; smtp.connect; if not smtp.Connected then fehler ('Mail is nich - der Server will mich nicht...'); end; procedure TeMail.senden (mitBCC: boolean); var m: TIdMessage; begin m := TIdMessage.create (Application); m.clear; m.from.text := '"<info@l-becker.de>'; M.Recipients.EMailAddresses := fEmpfaenger; m.subject := fBetreff; m.body.text := fMailtext; // im fEmpfaenger, fBetreff und fMailtext steht was drin. smtp.send (m); m.free; end; Es knallt, mit der üblichen Windows-Exception lesen von Addresse 000x bla bla an folgender Stelle: smtp.send (m) ruft TIdSMTPBase.Send auf, dann send zum zweiten, TSMTP.internalSend und bei der Zeile
Delphi-Quellcode:
rappelt's, und mir ist echt nicht klar, warum.
AMsg.ExtraHeaders.Values[XMAILER_HEADER] := MailAgent;
Kann mir hier bitte jemand helfen, ist die 5328 evtl. buggey, oder was hab ich hier übersehen? mit der alten 10.0.52 ging alles noch... :-( Viele Grüße Marco |
AW: Mails mit Indy10
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 00:15 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz