ich möchte mein Auftragsbearbeitungsprogramm mit einer Mailoption erweitern und habe alle bekannten Programme ( Xmailer, Synapse, INet) ausprobiert, keines läuft aber wie ich es mir vorstelle. Im Detail :
Wenn ich z.B. mit Xmailer eine Mail von A nach B oder A nach C schicke, kommt sie auch an, super. Wenn ich nun Sender und Empfänger tausche ( C nach A oder B) erscheint die Fehlermeldung
'Sendmail : SMTP error SMTP login success, other undefined status 220, ready to start TLS'.
Hier scheint jeder Mail Provider eine andere 'Kennung' zu benötigen oder liege ich da falsch ?
Ich bin kein Experte in Mailprogrammen, benötige aber natürlich eine Sicherheit das alle mails an Kunden auch ankommen.
Wie kann ich da weiter vorgehen?
System : Win 10 Professional, 32 Bit, Lazarus 1.6.4, FPC 3.02.
XMailer code :
Code: Alles auswählen
var Mail: TSendMail;
begin
Mail := TSendMail.Create;
try
Mail.Sender := 'emailAdresse1';
Mail.Receivers.Add('emailAdresse2');
Mail.Subject := 'Testmail';
Mail.Message.Add(MemoMailText.Text);
// mail.Attachments.Add(FileNameEdit1.Text); // for send files, optional
// SMTP
Mail.Smtp.UserName := 'user';
Mail.Smtp.Password := 'passwort';
Mail.Smtp.Host := 'Smtp.xxx.de';
Mail.Smtp.Port := '587';
Mail.Smtp.SSL := true;
mail.Smtp.FullSSL:=false; // thanks rvk
Mail.Smtp.TLS := true;
Mail.Send;
ShowMessage('Mail erfolgreich gesendet' );
{except
on E:Exception do
end;}
finally
Mail.Free;
end;
end;