Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Сети > Отправка Мейла

Автор: Gigabyte 1.11.2004, 14:15

Как мне легче всего отправить письмо без ведома хозяина компа на указаный адрес????

Автор: Полудненко Олег 1.11.2004, 17:10

Юзай компонент NMSMTP. Очень удобно и надёжно

Автор: ~FoX~ 2.11.2004, 10:40

Код


Uses NMsmtp;

type
TMainForm = class(TForm)
...
SMTP: TNMSMTP;
...



SMTP.PostMessage.FromAddress:=
SMTP.PostMessage.FromName:= 
SMTP.PostMessage.ToAddress.Clear;
SMTP.PostMessage.ToCarbonCopy.clear;
SMTP.PostMessage.ToBlindCarbonCopy.clear;
SMTP.PostMessage.Body.clear;
SMTP.PostMessage.Attachments.clear;
SMTP.PostMessage.Subject:=:=setup.LocalProgram.text;
(*Mon, 27 Nov 2000 12:37:46 -0700*)
SMTP.PostMessage.ReplyTo:=
SMTP.PostMessage.ToAddress.text:=
SMTP.PostMessage.ToCarbonCopy.text:=
SMTP.PostMessage.ToBlindCarbonCopy.text:=
SMTP.PostMessage.FromAddress:=
SMTP.PostMessage.FromName:=
SMTP.PostMessage.LocalProgram:=
SMTP.PostMessage.ReplyTo:=
SMTP.SubType:=mtPlain;
SMTP.PostMessage.Body.Assign(temp);
SMTP.PostMessage.Attachments.add(File);
SMTP.SendMail;

Ну вот как то так

Автор: Гость_Felt 8.11.2004, 19:51

А теперь, если можно на WinSock без компонентов

Автор: Vit 8.11.2004, 21:32

См. FAQ - там есть пример SMTP сервера

Автор: Felt 9.11.2004, 16:22

Чего то я не заметил чтобы на API (Winsock) было...

Автор: Vit 9.11.2004, 17:02

Цитата(Felt @ 9.11.2004, 07:22)

Чего то я не заметил чтобы на API (Winsock) было...

Там пример через ICS библиотеку - это высокоуровневая реализация протоколов, в том числе и SMTP. Работает на сокетах, только там обрабатываются дополнительно многие вещи как ошибки, запросы DNS и т.п. На Indy тоже есть примеры - там есть реализация SMTP протокола. С нуля писать на сокетах дело неблагодарное, очень, а точнее так ОЧЕНЬ много разных ситуаций которые требуют правильной обработки. Берите на выбор или Indy или ICS реализацию SMTP протокола и используйте, это и будет реализация на сокетах в чистом виде без каких-либо промежуточных серверов.