Registriert seit: 5. Feb 2010
Ort: Bad Kissingen
293 Beiträge
Delphi XE Architect
|
AW: Authentication rejected/ Autehnticaion failed
29. Sep 2010, 15:38
oooooh man.
Delphi-Quellcode:
procedure TForm1.btnEinloggenClick(Sender: TObject);
var
slText: TStrings;
s: String;
begin
s := 'zwerg7@t-online.de';
IdSMTP1.Host := 'smtpmail.t-online.de';
IdSMTP1.Username := 'Mail@t-online.de';
IdSMTP1.Password := 'Password';
IdPOP31.Host := 'popmail.t-online.de';
IdPOP31.Username := 'Password@t-online.de';
IdPOP31.Password := 'Password';
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';
with IdMessage1.Recipients.Add do
begin
Name := PChar('');
Address := PChar(s);
end;
IdMessage1.Subject := 'Hallo Ich';
slText := TSTringList.Create;
slText.Add('Hier werden die Daten später stehen');
IdMessage1.Body := slText;
IdPOP31.Connect;
try
IDSMTP1.SendMsg(IdMessage1);
finally
IdPOP31.Disconnect();
end;
slText.Free;
end;
Springt mir bei IdPOP31.Connect raus und meint Ivalid Login
-.-
|
|
Zitat
|