|
Guest
Guest
|
Hi, I have not bought the VCL yet and have the following question:
Is it possible to iterate throught all mail-(sub-folders, collect a list of all attachments with info in which mail they were, the attachment name and save them to disk?
Thanks,
Uwe |
|
Posted 21 Feb, 2005 09:20:02
|
|
Top
|
|
Eugene Starostin
Guest
|
|
Posted 21 Feb, 2005 09:38:14
|
|
Top
|
|
Guest
Guest
|
Can I access the "normal" object-properties of MailItem?
Are those somehow documented in your help-files?
--Uwe
|
|
Posted 21 Feb, 2005 09:59:32
|
|
Top
|
|
Eugene Starostin
Guest
|
Can I access the "normal" object-properties of MailItem?
We have integrated Add-in Express with the MS Office wrappers that are delivered with Delphi Professional and higher.
Are those somehow documented in your help-files?
No, we have documented Add-in Express but not Outlook. :-) |
|
Posted 21 Feb, 2005 10:04:51
|
|
Top
|
|
Guest
Guest
|
Ok, so I can get attributes like Subject, ReceivedByName and all the stuff from MS? |
|
Posted 21 Feb, 2005 10:08:57
|
|
Top
|
|
Eugene Starostin
Guest
|
Yes as well as all Outlook objects published in the Outlook type library. Have you ever used Office wrappers? |
|
Posted 21 Feb, 2005 10:13:17
|
|
Top
|
|
Guest
Guest
|
I'm not sure, but currently I have a stand alone application in which I use something like
if Folder.Items[j].Attachments.Count > 0 then
begin
anzahlDerEMails := anzahlDerEMails + 1;
Memo1.Lines.Add('Folder:' + #9 + ParentFolderName + #13#10 +
'Betreff:' + #9 +VarToStr(Folder.Items[j].Subject) + #13#10 +
'Absender:' + #9 + VarToStr(Folder.Items[j].SenderName) + #13#10 +
'Eingang:' + #9 + VarToStr(Folder.Items[j].ReceivedTime) + #13#10 +
'Empfänger' + #9 + VarToStr(Folder.Items[j].ReceivedByName) + #13#10 +
'Id' + #9 + VarToStr(Folder.Items[j].EntryID) + #13#10 +
'ReplyTo' + #9 + VarToStr(Folder.Items[j].To) + #13#10 +
'Size' + #9 + VarToStr(Folder.Items[j].Size) + #13#10 +
// 'Body' + #9 + VarToStr(Folder.Items[j].Body) + #13#10 +
// 'HTMLBody' + #9 + VarToStr(Folder.Items[j].HTMLBody) + #13#10 +
'CC' + #9 + VarToStr(Folder.Items[j].CC) + #13#10 +
'BCC' + #9 + VarToStr(Folder.Items[j].BCC) + #13#10 +
'Anlagen:' + #9 + VarToStr(Folder.Items[j].Attachments.Count));
Now I want to have it all inside MS OPutlook and accessible with buttons etc.
--Uwe
|
|
Posted 21 Feb, 2005 10:23:14
|
|
Top
|
|
Eugene Starostin
Guest
|
As I see from your code you use Office Wrappers. Look at the uses clause in your unit. I think you will find a reference to Outlook2000, Outlook2002 or Outlook2003. :-)
That is why you will be able to use your current code inside an add-in on Add-in Express. |
|
Posted 21 Feb, 2005 10:28:13
|
|
Top
|
|
Guest
Guest
|
That's very good for me -- then I think I know how to work with your components.
There's only left the problem regarding V7.1-update since there seems to be a problem with the update for the German Delphi 7. Thus I didn't install (see my pre-sales mail).
--Uwe
|
|
Posted 21 Feb, 2005 10:34:35
|
|
Top
|
|
Eugene Starostin
Guest
|
As I answered you we do not support special setup packages for developer and professional subscribers but we have several special packages for our premium subscribers. |
|
Posted 21 Feb, 2005 10:49:06
|
|
Top
|
|