Sending emai via access form

[tara99]

Let say I have a form (MS Access) with the list of people and their email addresses and a text field which I can write my message.
I have button that when I press the button I want it to send email to all email adressess in this form.

Is this possible.

Or there is a better way of doing this, please help.

[MMcCarthy]

Let say I have a form (MS Access) with the list of people and their email addresses and a text field which I can write my message.
I have button that when I press the button I want it to send email to all email adressess in this form.

Is this possible.

Or there is a better way of doing this, please help.

Do you want to send the message to everyone in the list or only those selected?

[tara99]

Do you want to send the message to everyone in the list or only those selected?

Thank you for your help
The selected ones

The one I have availabe in the form becuase I run qurey on the backgroud which only displayes those emails I need.

Thanks

[MMcCarthy]

Sorry Tara

I understood from your first post that these people were in a list. Are they just separate records on the form and therefore the list is based on the query behind the record source of the form?

Thank you for your help
The selected ones

The one I have availabe in the form becuase I run qurey on the backgroud which only displayes those emails I need.

Thanks

[tara99]

Sorry Tara

I understood from your first post that these people were in a list. Are they just separate records on the form and therefore the list is based on the query behind the record source of the form?

Hi

Yes they are part of the list
you see I have this table which hold the list of name and their email addresses.

The form shows selected email address based on some criteria.

I hope this helps.

[MMcCarthy]

Sorry Tara

Still trying to clarify.

Is there an actual ListBox on your form with a RowSource of the names and emails

OR

have you designed a form to return names and emails of specified people based on a query?

Hi

Yes they are part of the list
you see I have this table which hold the list of name and their email addresses.

The form shows selected email address based on some criteria.

I hope this helps.

[tara99]

Ok
lets go a stet back,
I have a form that have a list box contaning the list of items that are availabe in my database, and a button next to it.
When a user select a item from the list and click on the button it will open a new form with information about that selected item in my case contacts name and email address. (there may be 1 contact per item or could be 100 contacts per item), now I have a button called send email, when I press it I want it to send email to those contacts.
I hope it is clear now, let me know if it is not

Thanks

[MMcCarthy]

OK, try this:

Put this function in a module:

 
Function sendEmail(emailAddresses As String, subjectLine As String, message As String)
    ' send the email
    DoCmd.SendObject acSendNoObject, , , emailAddresses, , , subjectLine, message, False
 
End Function
 
 

Go to the Data tab and set the Bound Column to 2 (Assumes 2 columns Name and email in the listbox).
Put a second text box on your form to enter the Subject Line, I'm calling it subjectTxt for this example
I'm calling the message textbox messageTxt.
Note in your listbox in the email column all email addresses have to be separated using semi colons

Then behind the email button put the following code.

 
sendEMail(lstBoxName, subjectTxt, messageTxt)
 
 

[tara99]

OK, try this:

Put this function in a module:

 
Function sendEmail(emailAddresses As String, subjectLine As String, message As String)
    ' send the email
    DoCmd.SendObject acSendNoObject, , , emailAddresses, , , subjectLine, message, False
 
End Function
 
 

Go to the Data tab and set the Bound Column to 2 (Assumes 2 columns Name and email in the listbox).
Put a second text box on your form to enter the Subject Line, I'm calling it subjectTxt for this example
I'm calling the message textbox messageTxt.
Note in your listbox in the email column all email addresses have to be separated using semi colons

Then behind the email button put the following code.

 
sendEMail(lstBoxName, subjectTxt, messageTxt)
 
 

Thank you so much Mccarty

I will try this, and please keep an ey open for this subject I may be back soon

Thanks again heaps

[tara99]

Thank you so much Mccarty

I will try this, and please keep an ey open for this subject I may be back soon

Thanks again heaps

I tried that code, it gave me error, some thing about sendobject
???