Kommt der Fehler "Sender Adress is not allowed" beim IdSMTP1.Connect;
oder später beim Senden der Mail?
Guten Tag Sir Rufo,
die Fehlermeldung kommt später beim Senden.
Delphi-Quellcode:
if not MeldeAmServerAn then
begin
Application.MessageBox('Es konnte keine Verbindung zum' + #13#10 +
'Mailserver aufgebaut werden!', 'BPS . . .', MB_OK +
MB_ICONSTOP);
Exit;
end;
pBody := TStringList.Create;
pBody.Clear;
pBody.Append('Sehr geehrte Damen und Herren,'
+ sLineBreak
+ 'dies ist eine Testmail vom Konto'
+ sLineBreak
+ 'an Konto ' + edtSendeTestMail.Text
+ sLineBreak + sLineBreak
+ 'Mit freundlichem Gruß');
idmsgSendeMessage.Recipients.EMailAddresses := edtSendeTestMail.Text;
idmsgSendeMessage.Subject := 'Test E-Mail';
idmsgSendeMessage.Body := pBody;
idsmtp1.Connect;
idsmtp1.Send(idmsgSendeMessage); // hier kommt nun die Fehlermeldung
idsmtp1.Disconnect;
Aber warum gerade dort?
Mit Gruß
HPB