Extract Lotus Notes Email Attachments Using Excel VBA

[Yiyi]

Hello,

I have been assigned a project using Excel VBA to programically:

1. Open a Lotus Notes database

2. Search every folder in Lotus Notes where emails were saved in (emails are being saved in several folders depending who sent them, so I need to programically loop thru every folder and every email in each folder)

3. Extract every attachment in each email

4. Save the attachments in a named location giving each attachment a unique auto created sequential name (I want to rename each attachment using the folder's name and the email's received date ex. AD062111-1 (first attachment in email), AD062111-2 (second attachment in email)).

Attachments are sent in Excel and Adobe formats.

Have searched the web and this forum. All that I have found is on sending emails from Excel through VBA. I don't know where else to go. I am despirate.

Kind regards,
Yiyi

 

[John_w]

2. Search every folder in Lotus Notes where emails were saved in (emails are being saved in several folders depending who sent them, so I need to programically loop thru every folder and every email in each folder)

Loop through the Views property of the Notes database to get each folder - see http://publib.boulder.ibm.com/infoc...esigner.domino.main.doc/H_VIEWS_PROPERTY.html - and for each folder (Notes view) loop through the documents (Notes emails) in that folder.

For the other parts of your project, there should be examples of VBA code in this forum and elsewhere. Restrict your search to just the words in each part and develop the whole task bit by bit.