I am curently trying to find a way of sending out mass emails from access. I have located VBA for generating emails directly into outlook but I have to click send on each one. Is there a way so the emails will automatically be sent?
Since security issues were tightened with installed service packs the word 'automatically' means '
not so automatically' nowadays if you are using 'Outlook'. (You will find a security prompt for the send process unless your send method uses 'redemption' in outlook or other third party workarounds to get round this horribly intrusive behaviour )
If you choose however to use the windows CDO library reference to send emails outside the curtilage of outlook in other words directly to an SMTP server you will not receive prompts
The generics for sending mass emails are simple enough in that you grab all of the emails addresses as a 'single string' separating them with a semi colon and then use the string value in the recipients section of the mail message in code.
The usual method for grabbing email addresses is to loop through a recordset in code and concatenate the value of each email address to one another separating them with a semi colon. You then use this string in the sendto/recipients section of vba code. It might also wish to look at validating/resolving each email address in the recordset to prevent you receiving replies back 'not found' etc (
particularly if the email addresses from any recordset has been manually input to a table ie subject to typos and not derived from a fixed point server like exchange where valid email addresses should exist already)
Look at methods of looping through recordsets and if you get stuck for the code come back. There are numerous examples on here how to do this if you search the forum.
I replied recently to a thread for someone and even created a small db demonstrating how to do it surrounding their requirement. If you would like the demo db then PM me your mail address and I'll send you a copy.
Regards
Jim
34
