/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
InstallerSamples/NETLibraries/System.Net/MailSend.pas
17 строк
505 B
Artem Pelenitsyn
change encoding for all *.pas and *.cs files: cp1251 -> utf-8
28 дек 2015, 14:25
28 дек 2015, 14:25
49378a6
Код
Авторство
О чём код?
// Исправьте имя SMTP-сервера SMTPServerName и адрес получателя toReceiver! uses System.Net.Mail; const SMTPServerName = 'mail.spark-mail.ru'; begin var fromSender := 'ivanov@mail.ru'; var toReceiver := 'petrov@yandex.ru'; var subject := 'Proba'; var body := 'Hello!' + NewLine + 'I am robot!'; var message := new MailMessage(fromSender, toReceiver, subject, body); var mailClient := new SmtpClient(SMTPServerName); mailClient.Send(message); end.