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

Вниз

D6 как оправить сообщение через smtp с уведомлением о доставке ?   Найти похожие ветки 

 
Leopold ©   (2004-03-11 19:38) [0]

хотел реализовать функцию The Bat-a уведомление о доставке (в Оутглюке есть только уведомление о прочтении - это не то)... долблюсь уже две недели ... результат нулевой

procedure TForm1.Button1Click(Sender: TObject);
begin
smtp.Port := 25;
smtp.Host := "192.168.0.1";
smtp.UserID := "leopold";
smtp.connect;
if smtp.Connected then showmessage("connected");
smtp.PostMessage.FromAddress := "leopold@***.ua";
smtp.PostMessage.ToAddress.Add("leopold@***.ua");
smtp.PostMessage.Subject := "testing";
smtp.PostMessage.Body.Add("it is a good day to die");
smtp.PostMessage.LocalProgram := "leo mailer";
smtp.FinalHeader.Clear;
smtp.FinalHeader.Add("X-Priority");
smtp.FinalHeader.values["X-Priority"] := "3 (normal)";
smtp.FinalHeader.Add("Return-Receipt-To");
smtp.FinalHeader.values["Return-Receipt-To"] := "leopold@usb.sat.poltava.ua";
smtp.SendMail;
close;
end;

что подскажете господа программеры ?


 
Verg ©   (2004-03-11 20:09) [1]


> результат нулевой


Что, так и пишет "результат=0"?
А чего хочешь, чтоб писал?

Да, блин,..... ну что можно посоветовать - звездочки убери перед .ua ну чес-слово...

Люди делают то, сами не зная чего хотят, вообще...., а хотят сами не зная чего делают....


 
Fay ©   (2004-03-12 07:42) [2]

Не пробовали вместо smtp. писать sMtP. ?
Если нет, признавайтесь - что это за ...
Я догадываюсь, что не TDBCOmboBox, но всё же...



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

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

Наверх




Память: 0.45 MB
Время: 0.023 c
14-1081487155
Dmitriy O.
2004-04-09 09:05
2004.05.02
Люди кто нить делал в Дельфях расчет корреляции ?


11-1065608167
Stargazer
2003-10-08 14:16
2004.05.02
JpegObj & FPC


6-1078278714
Slym
2004-03-03 04:51
2004.05.02
TIdMessage гонит... сохранил, загрузил и снова сохранил данные по


1-1082095979
kostik78ua
2004-04-16 10:12
2004.05.02
Инсталляция компонент


1-1082291310
killer
2004-04-18 16:28
2004.05.02
перевод из строки в TStringList





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский