Вниз
Скачать: CL | DM;

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

← →
newbie   (2004-06-29 08:00) [0]

Привет, Мастера!!!Помогите плизз с почтой...бадяга у меня такая:
edit1 -куда отправить письмо
edit2 -тема сообщения
edit3 -короткое сообщение
и конечно button (чтоб при нажатии отправлялось)...
ПОжалуйста помогите просто я с сетью вообще дуб..
Спаисбо


← →
Глеб ©   (2004-06-29 10:16) [1]

ShellExecute("open", PChar("mailto:"+edit1.text+"?subject="+edit2.text+"&body="+edit3.text"), 0, 0, 0);

Извиняюсь, если ошибся с количеством или типом параметров в процедуре ShellExecute, но общая идея такая.
Кстати, нужно подключить модуль ShellAPI.


← →
newbie   (2004-07-01 03:46) [2]

Спасибо, но всё равно не получается((((


← →
newbie   (2004-07-01 08:05) [3]

МОжет еще как-нибудь можно???


← →
Del_programmer ©   (2004-07-01 08:47) [4]

скинь коды, я скажу где очипка


← →
Reindeer Moss Eater ©   (2004-07-01 10:52) [5]

У него нет кодов вообще.
У него три едита и одна кнопка.


← →
Anatoly Podgoretsky ©   (2004-07-01 11:01) [6]

Reindeer Moss Eater ©   (01.07.04 10:52) [5]
Нет, у него еще есть не получается


← →
newbie   (2004-07-04 04:09) [7]

Del_programmer ©   (01.07.04 08:47) [4]
скинь коды, я скажу где очипка


ShellExecute("open", PChar("mailto:"+edit1.text+"?subject="+edit2.text+"&body="+edit3.text"), 0, 0, 0);


← →
borman   (2004-07-04 15:11) [8]

Приблизительно так...


NMSMTP1.Host := "smtp.mail.ru";
NMSMTP1.UserID := "user";
NMSMTP1.Connect;

NMSMTP1.PostMessage.FromAddress := "admin@microsoft.com";
NMSMTP1.PostMessage.ToAddress.Text := Edit1.Text;
NMSMTP1.PostMessage.Body.Text := Edit3.Text;
NMSMTP1.PostMessage.Subject := Edit2.Text;
NMSMTP1.SendMail;


← →
Orel   (2004-07-06 05:25) [9]

если

ShellExecute("open", PChar("mailto:"+edit1.text+"?subject="+edit2.text+"&body="+edit3.text"), 0, 0, 0);

то в Uses надо дописать ShellApi.


← →
Anatoly Podgoretsky ©   (2004-07-07 09:15) [10]

newbie   (04.07.04 04:09) [7]
У функции ShellExecute шесть параметров, а не пять.


← →
newbie   (2004-07-10 01:25) [11]

borman

Дык у меня delphi7 - nmsmtp нету!!!


← →
Fay ©   (2004-07-10 03:47) [12]

скачай synapse | ics


← →
Newbie   (2004-07-16 01:34) [13]

А мона как-нить через компонент SakMsg и SakSMTP..Если да то напишите код пожалуйста



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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.023 c
14-1093862267
Dimich1978
2004-08-30 14:37
2004.09.19
Решение нелинейных ур-ий методом Нютона и половинного деления


1-1094154898
SelloutS
2004-09-02 23:54
2004.09.19
нужен компанент для скажтия/расжатия файлов...


14-1093637597
Cobalt
2004-08-28 00:13
2004.09.19
Лицензии :)))


14-1093701485
Князь Мышкин
2004-08-28 17:58
2004.09.19
Как вы считаете, были ли американцы?


3-1093131142
Sigetta
2004-08-22 03:32
2004.09.19
Закрыть все базы




   Наверх