Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.09.19;
Скачать: 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 вся ветка

Текущий архив: 2004.09.19;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.055 c
1-1094081926
vidiv
2004-09-02 03:38
2004.09.19
Regular Expressions в Дельфи 7


4-1092074013
Gun_meN
2004-08-09 21:53
2004.09.19
Серийный номер CD


1-1094220978
bloodman
2004-09-03 18:16
2004.09.19
Еще 1 Легкий вопрос теперь про приведение типов.


1-1094043254
Subdigger
2004-09-01 16:54
2004.09.19
Excel


3-1092980124
Lika_d
2004-08-20 09:35
2004.09.19
Использование логики в создании вычисляемых полей