15 мая 2023 года "Исходники.РУ" отмечают своё 23-летие!
Поздравляем всех причастных и неравнодушных с этим событием!
И огромное спасибо всем, кто был и остаётся с нами все эти годы!

Главная Форум Журнал Wiki DRKB Discuz!ML Помощь проекту


Как отправить письмо при помощи TNMSMTP.

Компилятор: C++ Builder

В заголовочном файле:

#include <NMsmtp.hpp>
#include <Psock.hpp>

Код:

TMemo* mInfo;
// Код
bool MyForm::sendMail ()
{
bool result = true;
if (mInfo->Lines->Count &&
!reg->getMailAddress ().IsEmpty () &&
!reg->getMailFrom ().IsEmpty () &&
!reg->getMailHost ().IsEmpty ())
{
TNMSMTP* SMTP = new TNMSMTP(0);
try
{
SMTP->PostMessage->FromName = "Argumentario";
SMTP->PostMessage->ToAddress->Add (reg->getMailAddress ());
SMTP->PostMessage->FromAddress = reg->getMailFrom ();
SMTP->Host = reg->getMailHost ();
SMTP->PostMessage->Subject = "Argumentario Report";
SMTP->PostMessage->Body->Text = mInfo->Text;
SMTP->Connect();
SMTP->SendMail();
}
catch (Exception& E)
{
report ("Imposible enviar e-mail: " + E.Message);
result = false;
}
delete SMTP;
} else
{
report ("No se encuentra configurado el env?o del mail.");
}
return result;
}