Re: Email per AUTH SMTP versenden
Hallo zusammen!
ich habe eine frage ! und zwar habe ich einen Programm geschrieben das e-mails sendet , dazu habe ich die Indy componeneten benutzt! das Problem ist dass wenn die ToAddress gar nicht existiert wird die mail trotzdem gesendet und ich bekomme weder eine Fehlermeldung noch einen Reply-mail!!!!!! könnte mir jemand sagen woran das liegen konnte :?: danke |
Re: Email per AUTH SMTP versenden
hallo, :hi:
ich hab mir den kram hier mal durchgelesen und ausprobiert. nun hab ich folgendes problem: EIdSocketError with Message "Socket Error Nr #10060 Connection Timed out." :wiejetzt: Sry, aber hab echt kein plan was das sein kann. mfg freak :coder: |
Re: Email per AUTH SMTP versenden
Hallo,
ich habe eure Sachen auch Mal ausprobiert, aber ich bekomme follgenede Fehlermelgund: Zugriffsverletzung bei Adresse 004584A9 in Modul '..'. Schreiben von Adresse 0043237C. Der Quelltext ist der follgenede:
Code:
Var idSMTP:TIdSMTP; idMessage:TIdMessage;
Code:
begin
idMessage.Clear; idSMTP.AuthenticationType:= atLogIn; idSMTP.Host := 'smtp.web.de'; idSMTP.Username := 'meine [email]Eaddi@web.de[/email]'; idSMTP.Password := 'mein Passwort'; idMessage.Sender.Text:= 'Hallo'; idMessage.ReplyTo.EMailAddresses:= 'Text1'; idMessage.Subject := 'Betreff Test'; idMessage.Body.Add('Huhu'); idMessage.Recipients.EMailAddresses:= 'Email an [email]mich@web.de[/email]'; idMessage.From.Address:= 'gdufzguzdfgudgfud'; idSMTP.Connect; idSMTP.Send(idMessage); idSMTP.Disconnect; end; |
Re: Email per AUTH SMTP versenden
Ich wollte nur nochmal auf mich aufmerksam machen ;-).
|
Re: Email per AUTH SMTP versenden
--------------------------------------------------------------------------------
E-Mail senden mit Indy -------------------------------------------------------------------------------- Beschreibung Die Porcedure erklährt sich von alleine :)
Delphi-Quellcode:
ich hab auch ma sowas gecodet vielleicht hilft dir das weiterSource procedure sendNewsLetter(an: Tstringlist; att, Text: Tstrings; vonMail, Betreff, Priority, CT, SMTPServer, SMTPUsername, SMTPPass: string; SMTPPort, SmtpAuthType: integer); var IdMsgSend: TidMessage; SMTP: TidSmtp; i: integer; s: string; begin IdMsgSend := TidMessage.Create(nil); SMTP := TidSmtp.Create(nil); with IdMsgSend do begin ContentTyp := CT; Body.Assign(text); From.Text := vonMail; ReplyTo.EMailAddresses := vonMail; Subject := Betreff; Priority := Priority; s := ''; for i := 0 to an.Count - 1 do begin s := s + BccList.EMailAddresses + an.Strings[i] + ';' end; BccList.EMailAddresses := s; ReceiptRecipient.Text := vonMail; end; if att.Count >= 1 then begin for i := 0 to att.Count - 1 do begin TIdAttachment.Create(IdMsgSend.MessageParts, att.Strings[i]); end; end; case SmtpAuthType of 0: SMTP.AuthenticationType := atNone; 1: SMTP.AuthenticationType := atLogin; end; SMTP.Username := SMTPUsername; SMTP.Password := SMTPPass; SMTP.Host := SMTPServer; SMTP.Port := SMTPPort; SMTP.Connect; try SMTP.Send(IdMsgSend); finally SMTP.Disconnect; end; IdMsgSend.free; SMTP.free; end; greetz Cyrus |
Re: Email per AUTH SMTP versenden
Zitat:
Bei Server-Server Kommunikation kommt heutzutage meist TLS zum Einsatz (zumindest richten das aktuelle Sendmail/Exim/* MTA's sich gleich so ein) - allerdings werden hier wohl abgesehen bei großen Unternehmen selbstsignierte Zertifikate angewendet was das ganze wieder anfällig für man-in-the-middle-attacks anfällig macht (bzw. hab ich auch noch nie ne Mail gesehen die wegen einem ungültigen Zertifikat zurück kam). |
Re: Email per AUTH SMTP versenden
Moin webby !
Ne blöde Frage ... Hast Du auch im GMX Konto SMTP Auth aktiviert? Gruss Michi |
Re: Email per AUTH SMTP versenden
Hallo.
Ich möchte gerne ein Memo aus meinem Programm an meine E-mail Adresse versenden. kann mir jemand helfen?? Ich habe keine Ahnung wie ich das anstellen soll. Hat das vielleicht schon jemand gemacht und könnte eine "Schritt für Schritt" Erklärung posten?? |
Re: Email per AUTH SMTP versenden
Hi!
Such mal nach "Indy" - mit dieser Komponentensammlung ist sowas möglich. Auch bei einer Suche hier im Forum wirst du einiges zum Thema finden... Ciao Frederic |
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:01 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz