AW: Authentication rejected/ Autehnticaion failed
Es geht um diese Zeilen:
Delphi-Quellcode:
Mach daraus mal folgendes:
IdMessage1.From.Text := 'mail@t-online.de';
IdMessage1.Sender.Text := 'TestEmail';
Delphi-Quellcode:
Also beide Einträge gleich im "From" und im "Sender".
IdMessage1.From.Text := 'mail@t-online.de';
IdMessage1.Sender.Text := 'mail@t-online.de'; |
AW: Authentication rejected/ Autehnticaion failed
das "Problem" mit idMessage.Sender(..) eine gültige EMailadresse? (s.#4) hab ich behoben, kann man ja auch im Objektinspektor anpassen und ändern. TIdMessage --> From --> Address: Mail@t-online.de den Rest füllt er dann ja selber.
--> Erhalte immer noch die Fehlermeldung. Zitat:
|
AW: Authentication rejected/ Autehnticaion failed
Wenn Du das im OI anpasst, aber im Quellcode wieder überschreibst,
greift letzteres. Zeig doch ggf. noch mal den aktuellen Code. |
AW: Authentication rejected/ Autehnticaion failed
Delphi-Quellcode:
im OI:
procedure TForm1.btnEinloggenClick(Sender: TObject);
var slText: TStringList; begin IdSMTP1.Host := 'smtpmail.t-online.de'; IdSMTP1.Username := 'Mail@t-online.de'; IdSMTP1.Password := 'Mailpasswort'; IdMessage1.Sender.Name := 'Mail@t-online.de'; IdMessage1.Sender.Address := 'Mail@t-online.de'; IdMessage1.From.Text := 'Mail@t-online.de'; IdMessage1.Sender.Text := 'Mail@t-online.de'; IdMessage1.Recipients.EMailAddresses := 'Mail@t-online.de'; IdMessage1.Subject := 'Hallo Ich'; slText := TSTringList.Create; slText.Add('Hier werden die Daten später stehen'); IdMessage1.Body := slText; IdSMTP1.Connect; try IdSMTP1.Send(IdMessage1); finally IdSMTP1.Disconnect(); end; slText.Free; end; TIdMessage --> From: Address: Mail@t-online.de Domain: t-online.de Name: Mail@t-online.de Text: <mail@t-online.de> User: mail |
AW: Authentication rejected/ Autehnticaion failed
Bemüh doch auch mal die Delphi-Hilfe und such nach
TIdEMailAddressItem Zitat:
Domain leer lassen (Domain is a read-only String property that indicates the host name) In Name steht nur der Name (hier z.B. "John Mail") Text leer lassen (wird aus address u. Name zusammengesetzt zu "John Mail" <mail@t-online.de> ) User leer lassen (User is a Public read-only String property) |
AW: Authentication rejected/ Autehnticaion failed
Habe es so geändert, aber funktioniert immer noch nicht -.-
Hab gleich Feierabend, dann schau ich heute Abend vielleicht nochmal drüber. Falls ihr noch Ideen habt, oder nen funktionierenden Code habt, ich freu mich :)
Code:
TIdMessage --> From:
Address: Mail@t-online.de Domain: t-online.de Name: Mailname Text: Mailname <Mail@t-online.de> User: Mail |
AW: Authentication rejected/ Autehnticaion failed
Im OI werden die Inhalte im "FROM"-Teil automatisch gesetzt.
In Deinem Fall sollte der "Name" aber leer bleiben. Es sei denn, er wird tatsächlich benötigt. Fällt mir nur noch ein, slText als TStrings zu deklarieren und den Rest so zu lassen:
Delphi-Quellcode:
In meinen Anwendungen habe ich die idMessage nicht auf der Form
var
slText: TStrings; sondern erstelle sie im Quellcode:
Delphi-Quellcode:
HTH
var
idMessage : TIdMessage; begin ... idMessage := TIdMessage.Create(); try idMessage.IsEncoded := True; idMessage.From.Text := FromAddr; idMessage.Sender.Text := FromAddr; idMessage.Recipients.Clear; for i := 0 to High(Main.aMy_Email) // Array mit Empfängern begin with idMessage.Recipients.Add do begin Name := PChar(''); Address := PChar(Main.aMy_Email[i]); end; end; idMessage.ContentType := 'multipart/mixed'; // wichtig !!! idMessage.Encoding := meMIME; idMessage.AttachmentEncoding := 'MIME'; idMessage.CCList.Clear; // usw. ... finally idMessage.free; end; |
AW: Authentication rejected/ Autehnticaion failed
Hast du denn, wie schon vorgeschlagen mal "POP before SMTP" ausprobiert? Also vorher die Mails abrufen, was eine Anmeldung erfordert und dann mit dieser Anmeldung die Mail zu verschicken?
|
AW: Authentication rejected/ Autehnticaion failed
zu GHorn:
gibt noch ein paar sachen die beim Compilieren angemeckert werden.
Delphi-Quellcode:
zu Luckie:
procedure TForm1.FormCreate(Sender: TObject);
var idMessage : TIdMessage; i: Integer; begin cbSystem.Items.Add('.Punkt 1'); cbSystem.Items.Add('.Punkt 2'); cbSystem.Items.Add('.Punkt 3'); btnEinloggen.Enabled := False; idMessage := TIdMessage.Create(); try idMessage.IsEncoded := True; idMessage.From.Text := 'Mail@t-online.de'; idMessage.Sender.Text := 'Mail@t-online.de'; idMessage.Recipients.Clear; for i := 0 to High(Main.aMy_Email); // Array mit Empfängern --> Was mus ich in dieses MAin.aMy_Email reinschreiben? begin with idMessage.Recipients.Add do begin Name := PChar(''); Address := PChar(Main.aMy_Email[i]); // --> auch hier, was muss ich reinschreiben? end; end; idMessage.ContentType := 'multipart/mixed'; // wichtig !!! idMessage.Encoding := meMIME; idMessage.AttachmentEncoding := 'MIME'; idMessage.CCList.Clear; // usw. ... finally idMessage.free; end; end; procedure TForm1.btnEinloggenClick(Sender: TObject); var slText: TStrings; begin IdSMTP1.Host := 'smtpmail.t-online.de'; IdSMTP1.Username := 'Mail@t-online.de'; IdSMTP1.Password := 'Mailpasswort'; IdMessage1.Sender.Name := 'Mail@t-online.de'; IdMessage1.Sender.Address := 'Mail@t-online.de'; IdMessage1.From.Text := 'Mail@t-online.de'; IdMessage1.Sender.Text := 'Mail@t-online.de'; IdMessage1.Recipients.EMailAddresses := 'Mail@t-online.de'; IdMessage1.Subject := 'Hallo Ich'; slText := TSTringList.Create; slText.Add('Hier werden die Daten später stehen'); IdMessage1.Body := slText; IdSMTP1.Connect; try IdSMTP1.Send(IdMessage1); finally IdSMTP1.Disconnect(); end; slText.Free; end; Wo konnte man das nochmal einstellen? (: (: (POP statt SMTP) oder meinst du direkt mit ner POP3 Komponente? |
AW: Authentication rejected/ Autehnticaion failed
Genau, erst mit einer POP3-Komponente anmelden und dann die E-Mail verschicken.
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:33 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