FrmContratGite->QuickRep1->Prepare();
FrmContratGite->NMSMTPGite->Host = "smtp.hotmail.fr";
FrmContratGite->NMSMTPGite->Port = 25;
FrmContratGite->NMSMTPGite->UserID = "tonio";
FrmContratGite->NMSMTPGite->Connect();
if (FrmContratGite->NMSMTPGite->Connected)
{
FrmContratGite->NMSMTPGite->PostMessage->FromAddress = "toto@hotmail.com";
FrmContratGite->NMSMTPGite->PostMessage->FromName = "duga";
FrmContratGite->NMSMTPGite->PostMessage->ToAddress->Add("tata@hotmail.com");
FrmContratGite->NMSMTPGite->PostMessage->Subject = "test envoi mail LOCAPRIO";
FrmContratGite->NMSMTPGite->PostMessage->Body->Add("Contenu du mail");
FrmContratGite->NMSMTPGite->PostMessage->Attachments->Add("???");
FrmContratGite->NMSMTPGite->SendMail();
FrmContratGite->NMSMTPGite->Disconnect();
}
Partager