Slowing down automated emails (VBA w/ Lotus Notes) 1

[RosieMP]

Can anyone suggest some code for slowing down the sending of multiple emails?

I built an email sender in Excel that sends through Lotus Notes. We'd sent up to 500 with no problem, but the user's file has expanded to 1500 addresses and today Lotus Notes had a small panic attack and choked.

Is there a handy tidbit of code I can add to the loop so that after the send there's a moment where the loop takes a breather, without reworking the whole thing?

Thanks so much.

 

[Bong]

say, wait 10 seconds:

Application.Wait(Now + TimeValue("0:00:10"))

_________________
Bob Rashkin

 

[Andrzejek]

It is from VB6, but give it a try:

SLEEP API

make the following declare:

Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)

call it thus:

Sleep 1000 ' causes 1 second delay

Hope this is what you need

But if you put it in the loop of 1500 records, that will take about 1500 seconds, which is about 25 minutes.


Have fun.

---- Andy

 

[RosieMP]

Awesome.

Thanks for the responses.