I’d probably do it something like this:

lcEmails  = ""

Select Clients
Go Top
Scan
    lcEmails = lcEmails + Alltrim (email)

    If Len (lcEmails) > 150
        SendBulkEmail (lcEmails)
        lcEmails  = ""
    Else
        lcEmails = lcEmails + Iif (!Eof(), ",", "")
    Endif
Endscan

SendBulkEmail (lcEmails)


-----------------------

Basically, send the E-mails in spurts.  Unless there's some reason not to, 
it's probably better that way anyway - some E-mail services can get cranky 
if you send the same E-mail to a lot of people at once.


Joel 


_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: 
http://leafe.com/archives/byMID/profox/98097B644D044E3C8167C29C99683C4B@ASUS1
** All postings, unless explicitly stated otherwise, are the opinions of the 
author, and do not constitute legal or medical advice. This statement is added 
to the messages for those lawyers who are too stupid to see the obvious.

Reply via email to