OT: Je tu nejaky programator v DELPHI ?
Ondra hwnews
caha010 na gmail.com
Neděle Leden 19 23:48:04 CET 2014
ZprávaDiky vsem za pomoc, nakonec jsem sel cestou externiho exe, ktery email s prilohou dokaze pripravit a ten si volam.
O.
----- Original Message -----
From: Slavomir Skopalik
To: 'HW-news'
Sent: Sunday, January 19, 2014 2:10 PM
Subject: RE: OT: Je tu nejaky programator v DELPHI ?
Podle vseho, pro odeslani pres OE jsou dve moznosti:
1. MAPI (asi lepsi volba, nez uzka navaznost na OE).
2. Ulozit E-mail do slozky "posta k odeslani"
rozhrani je zde:
http://msdn.microsoft.com/en-us/library/ms710250%28v=vs.85%29.aspx
http://msdn.microsoft.com/en-us/library/ms710214%28v=vs.85%29.aspx
http://www.codeproject.com/Articles/9166/Reading-and-Writing-Messages-in-Outlook-Express
Slavek
Ing. Slavomir Skopalik
Jednatel spolecnosti
Elekt Labs s.r.o.
Sber a vyhodnoceni dat ze stroju a laboratori
systemem MASA (http://www.elektlabs.cz/m2demo)
----------------------------------------------
Adresa:
Elekt Labs s.r.o.
Chaloupky 158
783 72 Velky Tynec
Czech Republic
----------------------------------------------
Mobil: +420 724 207 851
icq:199 118 333
skype:skopaliks
e-mail:skopalik na elektlabs.cz
http://www.elektlabs.cz
-----Original Message-----
From: Hw-list [mailto:hw-list-bounces na list.hw.cz] On Behalf Of Robo
Sent: Sunday, January 19, 2014 10:06 AM
To: HW-news
Subject: Re: OT: Je tu nejaky programator v DELPHI ?
ještě vyzkoušej
http://delphi.cz/post/Zasilani-mailu-1-MAPI.aspx
v příspěvku dole. Vyzkoušel jsem a funguje bez problému
Dne 18.1.2014 19:45, Ondra hwnews napsal(a):
1.Mam uses ComObj, ale pri zavolani se dozvim: raised exception class EOleSysError with message 'Nesprávný řetězec třídy'. Process stopped.
2.Verze s ShellAPI chodi, ale neumi to prilohu, tedy s retezcem &att:filename="c:\autoexec.bat" sice mam pripraven email s prilohou, ale ta priloha neodpovida...
----- Original Message -----
From: Robo
To: HW-news
Sent: Saturday, January 18, 2014 7:18 PM
Subject: Re: OT: Je tu nejaky programator v DELPHI ?
a mas v uses ComObj
jeste zkus
uses
ShellAPI;
begin
ShellExecute(0,'open','mailto: email na email.cz?subject=Predmet&body=text emailu',
NIL, NIL, SW_SHOWNORMAL);
end
Dne 18.1.2014 17:31, Ondra hwnews napsal(a):
Ja tajne doufal, ze tolik na verzi OE nebude zalezet.
Robo poslal odkaz, ze ktereho kopiruji:
2. create a message in Outlook using OLE:
const
olMailItem = 0;
var
Outlook, MailItem: OLEVariant;
begin
try
Outlook := GetActiveOleObject('Outlook.Application');
except
Outlook := CreateOleObject('Outlook.Application');
end;
MailItem := Outlook.CreateItem(olMailItem);
MailItem.Recipients.Add('mshkolnik na scalabium.com');
MailItem.Subject := 'your subject';
MailItem.Body := 'Welcome to my homepage: http://www.scalabium.com';
MailItem.Attachments.Add('C:\Windows\Win.ini');
MailItem.Send;
Outlook := Unassigned;
end;
Ovsem tam neprojdu pres OleObject.Ted poradte... :) O.
------------------------------------------------------------------------
_______________________________________________
HW-list mailing list - sponsored by www.HW.cz
Hw-list na list.hw.cz
http://list.hw.cz/mailman/listinfo/hw-list
__________ Informace od ESET Smart Security, verze databaze 9307 (20140118) __________
Tuto zpravu proveril ESET Smart Security.
http://www.eset.cz
_______________________________________________
HW-list mailing list - sponsored by www.HW.cz
Hw-list na list.hw.cz
http://list.hw.cz/mailman/listinfo/hw-list
__________ Informace od ESET Smart Security, verze databaze 9307 (20140118) __________
Tuto zpravu proveril ESET Smart Security.
http://www.eset.cz
------------------------------------------------------------------------------
_______________________________________________
HW-list mailing list - sponsored by www.HW.cz
Hw-list na list.hw.cz
http://list.hw.cz/mailman/listinfo/hw-list
------------- další část ---------------
HTML příloha byla odstraněna...
URL: <http://list.hw.cz/pipermail/hw-list/attachments/20140119/7a5fb57f/attachment.html>
Další informace o konferenci Hw-list