Отправка почты (SMS)

← →
Garin (2003-09-11 12:33) [0]

Народ, подскажите как можно отправить почту (а точнее SMS) из проги на делфи, чтобы не указывать свое мыло, а просто написать какое-нить имя в поле отправителя.

И как можно программно узнать адрес сервера через который отправлять почту. Или как можно отправить почту не знаю адреса сервера почтового (такое реально или нет) ?

← →
Verg © (2003-09-11 12:43) [1]

Надо как минимум знать адрес DNS сервера (ну, например из регистри).
У него по e-mail адресу можно узнать адрес(а) SMTP сервера(ов), который может доставить письмо адресату.
Даже если сеть проксеванная (теневой сегмент-шлюзвинет), грамотный DNS дасть тебе IP адрес местного почтаря, который уже о дальнейшем позаботится сам.

← →
Garin (2003-09-19 13:35) [2]

Хорошо, знаю я адрес ДНС сервера, и как можно узнать оттуда где стоит майл-сервер ?

← →
Verg © (2003-09-19 13:59) [3]

Надо послать DNS запрос: Вот тебе домен e-mail-а, дай MX записи для него

- Это открываешь UDP сокет и отправляешь в адрес DNS-а запрос:
Блок информации состоящий из заголвок+запрос

вспомогательная фунция:

function EncodeWord(V: Word): string;
begin
Result := Chr(Hi(V)) + Chr(Lo(V))
end;

Заголовок:
EncodeWord(случайное число)+
EncodeWord(256)+
EncodeWord(1)+
EncodeWord(0)+
EncodeWord(0)+
EncodeWord(0)

Запрос:
EncodeName(Domain)+ // Domain - это и есть то, что после @ в email-е
EncodeWord(QType)+ // QType в данном случае=15
EncodeWord(1);

Тут надо сказать что такое EncodeName....
Брр... Это упакорвка доменного имени или IP адреса, где "точки" заменяются на байт длины того что после него.......

Не не влезет сюда описание этого всего.
Короче читай протокол DNS (не помню RFC №).

В общем, вернет он тебе список серверов, которые смогут доставить почту до адресата...
Во! Пока писал вспомнил - этож теперь все есть в пакете Синапса:
http://www.ararat.cz/synapse/

Там все в исходниках и даже с коментариями :))

← →
Garin (2003-09-19 16:00) [4]

Спасибо.

← →
panov © (2003-09-19 20:52) [5]

>Verg © (19.09.03 13:59) [3]
Убивать надо спамеров и троянописателей, а не помогать им.

← →
Verg © (2003-09-20 09:58) [6]

> panov © (19.09.03 20:52) [5]

На самом деле есть две жизненные концепции:

1. Все плохие, пока не докажут обратного.
2. Все хорошие, пока не докажут обратного.

> Убивать надо спамеров и троянописателей, а не помогать им.

Хорошо сказано....

← →
Garin (2003-09-24 13:06) [7]

> panov © (19.09.03 20:52) [5]

Ты неправ. С чего ты взял что я спамер и троянописатель ?
Мне просто влом писать эти длинные мыльные адреса когда отправляю SMS, а так написал номер выбрал оператора и все.

Garin (24.09.03 13:06) [7]
Мне просто влом писать эти длинные мыльные адреса когда отправляю SMS, а так написал номер выбрал оператора и все.

А ввести один раз адрес SMTP-сервера влом?

> Убивать надо спамеров и троянописателей, а не помогать им.

Я вот тоже не доганяю... И зачем все пытаются отправлять по почте, если есть намного более доступный способ... :) И файерволы отдыхают :)

← →
Deff (2003-10-01 14:27) [10]

Удалено модератором

Отправка почты (SMS) Найти похожие ветки