E-mail

← →
Anar © (2002-10-26 15:56) [0]

Можно ли через свою программу послать e-mail?
Например, вводишь в поле edit адрес и он посылает на этот e-mail сообщение.

Вы знаете как это осуществить? Если да, то поделитесь плиз...

← →
Hlor (2002-10-26 21:00) [1]

Вообще есть такие компоненты как smtp и pop... Посмотри
в помощи. Там наглядно расписанно как их использовать!

← →
olphi © (2002-10-27 13:41) [2]

NMSMTP1.Port:= 25;
NMSMTP1.Host:= "smtp.mail.ru";
NMSMTP1.UserID:="admin"; //
if not nmsmtp1.Connected then NMSMTP1.connect;
NMSMTP1.PostMessage.FromAddress:= "admin@mail.ru";
nMSMTP1.PostMessage.FromName:= "admin";
NMSMTP1.PostMessage.ToAddress.clear;
NMSMTP1.PostMessage.ToAddress.Add("admin@ukr.net");
NMSMTP1.PostMessage.Body.clear;
NMSMTP1.PostMessage.Body.Add("Привет UkrNet!");
NMSMTP1.PostMessage.Subject:= "Тема";
NMSMTP1.SendMail;

← →
Anar © (2002-10-27 18:54) [3]

2 olphi

почему у меня всегда так: после того как я уже всё сам сделал мне приходит ответ на форуме :(

Но всё равно спасибо!

Может ты ещё подскажешь как аттач прикрепить?

← →
Anar © (2002-10-28 15:25) [4]

БЕДА!!!
Установил Delphi 7, а там нет компонента TNMSMTP
Как быть?

← →
Mischka © (2002-10-30 16:01) [5]

Добавить из шестой. Если не лень ковыряться :)

← →
Anar © (2002-11-03 17:16) [6]

Как из шестой добавить? Что конкретно куда скопировать?

← →
MK © (2002-11-03 21:07) [7]

Попробуй TidSMTP. Принцип тот же.

← →
Anar © (2002-11-04 08:35) [8]

У IDSMTP нет свойтва PostMessage, т.е. фактически письмо послать невозможно.

зато там есть SendMsg...

← →
ILYA1 (2002-11-04 10:49) [10]

2 Anar
В Д7 отправить письмо можно, используя библиотеку InDy
В ней есть компонент (точно не помню, сейчас нет под рукой Д7, этот компонент находится на закладке InDy) TidSMTP у него метод QuickSend(host,subj,to,from,text:string);
Вот и все.
Конечнео, есть и свои минусы токого применения. Эта процедура и поэтому ничего не возвращает. Чтобы узнать об ошибке нужно применять исключения. Да и пристегнуть ничего, увфы, не получиться.

А может просто ShellExecute() ?

← →
Як-40 (2002-11-04 20:49) [12]

можно через mapi
CreateOleObject("Outlook.Application");
можно через сокеты, если без VCL прога на 15кb

E-mail Найти похожие ветки