Einzelnen Beitrag anzeigen

F.Art

Registriert seit: 12. Jan 2003
26 Beiträge
 
Delphi 7 Enterprise
 
#33
  Alt 22. Jan 2003, 10:28
Ich empfehle dir nim die Indy Kombonente damit habe ich auch gute erfolge gehabt.

Delphi-Quellcode:
idMessage.Clear;
idSMTP.AuthenticationType:= atLogIn;
idSMTP.Host := Host.Text;
idSMTP.Username := Username.Text;
idSMTP.Password := Passwort.Text;
idMessage.Sender.Text:= (AbsenderName.Text)+' <'+(AbsenderEmail.Text)+'>';
idMessage.ReplyTo.EMailAddresses:= ReplyTo.Text;
idMessage.Subject := Betreff.Text;
idMessage.Body.Add(Nachricht.Text);
idMessage.Recipients.EMailAddresses:= EmfaengerEmail.Text;
idMessage.From.Address:= AbsenderEmail.Text;
idSMTP.Connect;
idSMTP.Send(idMessage);
idSMTP.Disconnect;
  Mit Zitat antworten Zitat