Einzelnen Beitrag anzeigen

Christian18

Registriert seit: 9. Dez 2003
Ort: Hamburg
1.279 Beiträge
 
#1

Email senden --> brauche erläuterung

  Alt 6. Aug 2006, 20:50
Hallo,

ich versende eine E-Mail folgendermaßen. Kann mir jemand je Zeile erklären. Ist wirklich wichtig. Ich habe morgen Prüfung.
Delphi-Quellcode:
      mailMsg.Date := now;
      mailMsg.From.Text := DM.TPraxis.FieldByName('Email').AsString;
      mailMsg.ReceiptRecipient.Address := e;
      mailMsg.Recipients.Add;
      mailMsg.Recipients.Items[0].Address := e;
      mailMsg.Recipients.Items[0].Name := e;
      mailMsg.Subject := DM.TDokumentationen.FieldByName('Dokumentationen').AsString;
      mailMsg.Priority := mpHighest;
      mailMsg.Sender.Address := DM.TPraxis.FieldByName('Email').AsString;
      mailMsg.From.Address := DM.TPraxis.FieldByName('Email').AsString;
      mailSMTP.Host := DM.TPraxis.FieldByName('SMTP').AsString;
      mailSMTP.Port := 25;
      mailSMTP.AuthenticationType := atLogin;
      mailSMTP.Username := user;
      mailSMTP.Password := pass;

  mailSMTP.Connect(30000);
  mailSMTP.Send(mailMsg);
  mailSMTP.Disconnect;
Was bedeutet z.b.

mailMsg.Recipients.Add;
mailMsg.Recipients.Items[0].Address := e;
mailMsg.Recipients.Items[0].Name := e;

oder

mailSMTP.Connect(30000);

was bedeutet die 30000


MFG Christian18
  Mit Zitat antworten Zitat