email_send2() list length limits?

[Pat Bremkamp]

I have a created a real estate application, and one of the processes is to email listing changes to all of the realtors. I'm using email_send2() for that.

Here's the strange part: Right now, there are about 14 realtors on the list. I put the list in the "To" field and send it. The first 8 or 9 emails are received, but the rest are not.

The emails that are received show the entire list in the To blank, so the entire list is there. Then, if we copy that list to outlook and send a test email, everyone receives the email, so the list is good and there is nothing in the receiving email systems that is blocking or putting the emails into a spam folder.

The code is:

 
dim vEmailList as c
dim vMessage as p
vMessage.From="[EMAIL="[email protected]"][email protected][/EMAIL]"
vMessage.From_alias="Dalhart Board of Realtors"
vMessage.Subject="Dalhart MLS Listing Changes"
vMessage.Message=vBody
'==== get list of email addresses
vEmailList=table.external_record_content_get("[PathAlias.ADB_Path]\realtors.dbf","alltrim(email)")+" "
vEmailList=vEmailList+crlf()+"[EMAIL="[email protected]%22+crlf"][email protected]"+crlf[/EMAIL]()
vEmailList=remove_blank_lines(vEmailList)
vEL=crlf_to_comma(vEmailList)
vMessage.To = vEL
dim i as n = 0
dim j as n = 0
'for each EAdr in vEmailList
'vMessage.To = EAdr
vSuccess=email_send2(vMessage,"dbor",.f.,.f.,.f.)
if vSuccess = .t.
 i=i+1 
else
 j=j+1
end if
'sleep(1)
'next
session.EmailResult=str(i,2,0)+" emails were successfully sent, and "+str(j,2,0)+" emails could not be sent"
end if

Some interesting things... The function is supposed to accept a crlf list, but I had to convert it to a comma delimited list for it to work. Also, you'll see the remnants of code to send them one at a time. This also did not work. It gave me an error that was clearly coming out of the innards of the function.

Has anyone seen either a length limitation or a number of addresses limitation in email_send2()?

Pat

[Jay Talbott]

Re: email_send2() list length limits?

Pat,
I am not sure if this is exaclty what you want, but even if it is not, it will be "crude but effective".
Why don't you loop through the table and send one email at a time. With fewer than 20 emails, it should take but a few minutes.
I sent out over 2,000 emails last week by looping through the table. I creatd a logical field and marked it True when the email was sent. I filtered the table to exclude the records with that field marked True, so that when the process stopped, as it did a few times, I could start it again with no risk of sending out duplicate emails.
It took about 20 hours, but all I had to do was sit back and watch the computer work.
Hope this helps.

[Pat Bremkamp]

Re: email_send2() list length limits?

Jay,

Thanks for your suggestion. I did end up sending them one at a time.

As I mentioned, I had trouble with using For Each...Next picking the addresses out of a crlf list, so I converted it to a comma delimited list and picked them out with word() and a loop.

That takes a bit longer than sending one email, but it does work.

Pat

[Tom Cone Jr]

Re: email_send2() list length limits?

Pat have you checked with your ISP to see if they are limiting the number that can be bunched together? -- tom