Скачать: CL | DM;
E-mail Найти похожие ветки
← →
mate © (2003-01-10 16:31) [0]Люди помогите, как из моей проги отправить сообщение на e-mail, пусть даже через OutLook, но чтобы там ничего не вводить и не нажимать (т.е. сразу засунуть в папку Исходящие)
← →
handra © (2003-01-10 17:16) [1]Работает под 2k и XP, шлет письма от дефолтного аккаунта Outlook/Outlook Express
program w2kmail;
uses
Windows,
ComObj,
ActiveX;
{$R *.RES}
var Msg: OleVariant;
begin
if ParamCount<>4 then begin
MessageBox(0,
"W2k Mail Sender (based on CDO)"#13#13+
"Usage:"#13+
#9"w2kmail <sender> <recipient> <subject> <body>"#13#13+
"(c) 2002, HomeLab",
"Information",0);
Exit;
end;
CoInitialize(nil);
Msg := CreateOleObject("CDO.Message");
try
Msg.From := ParamStr(1);
Msg.To := ParamStr(2);
Msg.Subject := ParamStr(3);
Msg.TextBody := ParamStr(4);
Msg.Send;
Beep(500,50);
except
end;
Msg := NULL;
end.
← →
Boriska (2003-01-10 21:50) [2]Я раньше, тоже не знал как это делать, пока не нашёл, компонент,который лежит во вкладке fastnet он называется NMSMTP-Если возникнут проблемы с написанием проги, то пиши мне на
Boriska2002@fromru.com
Страницы: 1 вся ветка
Скачать: CL | DM;
Память: 0.45 MB
Время: 0.012 c
Imshanya
2003-02-05 16:50
2003.02.24
Посоветуйте, как
14-76155
Anatoly Podgoretsky
2003-02-07 07:41
2003.02.24
Именинники 7 февраля
3-75781
ДмирийК
2003-02-06 10:00
2003.02.24
Заполнить дату в MS SQL
14-76139
ZeroDivide
2003-02-06 15:45
2003.02.24
Примеры красивого кода
9-75739
Drunken Cat
2002-09-12 19:05
2003.02.24
DelphiX, обработка сообщений в не активном приложении...