Add Email Strings

Results 1 to 2 of 2

Thread: Add Email Strings

  1. #1
    Dano Guest

    Default Add Email Strings

    I have some code that reads an email address from a database, sends the email, then reads the next email address, sends, etc. But I want to send all the emails out in a mass mailing. The current code is as follows:<BR><BR>Do Until MailList.EOF<BR> MyMail.To = MailList("email")<BR> MyMail.Send<BR> MailList.MoveNext<BR>Loop<BR><BR>My vb is a bit rusty, can someone please help to add the email addresses together and when at eof, send all the email at once.

  2. #2
    Harish Guest

    Default RE: Add Email Strings

    Try this <BR>Do Until MailList.EOF <BR>ToString=ToString & MailList("email") & "," <BR> MailList.MoveNext <BR>Loop <BR>MyMail.To = ToString<BR>MyMail.Send <BR><BR>try ";" in this place of "," above<BR><BR>Hope this helps<BR><BR><BR>

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts