Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2003.11.27;
Скачать: [xml.tar.bz2];

Вниз

Отправка почты (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, а так написал номер выбрал оператора и все.


 
panov   (2003-09-24 14:02) [8]

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

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


 
Doctor Deejay   (2003-09-24 21:19) [9]


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


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


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

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



Страницы: 1 вся ветка

Форум: "Сети";
Текущий архив: 2003.11.27;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.009 c
4-90178
Kair
2003-10-01 11:18
2003.11.27
ReadDirectoryChangesW


1-89900
Bokus
2003-11-15 10:00
2003.11.27
Криптография


3-89742
robert
2003-11-07 22:37
2003.11.27
помогите с sql


4-90167
Serega____
2003-10-03 14:32
2003.11.27
API


3-89702
phan
2003-11-10 15:58
2003.11.27
Сохранить картинку в поле MEMO





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский