Send a recurring E-mail to multiple recipients

[Michael]

I can't figure out how to add the additional recipients, also how to send to
a distribution list.

code is as follows:

Sub Item_PropertyChange(ByVal Name)
Select Case Name
Case "Status"
if Item.Status = 2 then '2 = Completed
Set NewItem = Application.CreateItem(0)
NewItem.To = "(e-mail address removed)"
NewItem.To = "(e-mail address removed)"
NewItem.To = "(e-mail address removed)"
NewItem.To = "mailing_list1"
NewItem.Recipients.ResolveAll
NewItem.Subject = "Test Subject message"
NewItem.Body = "This is a test."
NewItem.Display
End IF
End Select
End Sub

Any help would be greatly appreciated.

Thanks,
Michael
(e-mail address removed)

 

[John Blessing]

Please try our email scheduler (http://www.repeatmail.com) which will allow
you to send multiple individual emails, html or plain text, with
attachments, either as a one-off or regularly at a specified time and
interval. The recipients list can be drawn from your Outlook Contacts, a
plain text file,database or spreadsheet.

--
John Blessing

http://www.LbeHelpdesk.com - Help Desk software priced to suit all
businesses
http://www.room-booking-software.com - Schedule rooms & equipment bookings
for your meeting/class over the web.
http://www.lbetoolbox.com - Remove Duplicates from MS Outlook, find/replace,
send newsletters