Re: E-mail- Batch is SLOW

Paul,

Try setting your own local SMTP server which then routes to the outside ISP server. Then point the 4D Email blast at the local in-house server.
You didnt mention which OS this is running on - XP or Vista?

 sincerely,
mehboob alam




Electricity is actually made up of extremely tiny particles called electrons,
that you cannot see with the naked eye unless you have been drinking.
- Dave Barry



----- Original Message ----
From: "TennP@..." <TennP@...>
To: 4d_tech@...
Sent: Wednesday, July 1, 2009 5:12:37 PM
Subject: E-mail- Batch is SLOW

I posted a question about this 1-2 months ago and thanks for the feedback  
then. I have further isolated the problem.

I am using 4D Runtime 2003.6.  When my clients send group e-mails  
(100-500) short e-mails (less than 500 characters), it can take hours when they  are
using authentication. When the few that don't have to use authentication  
(they can do it either with or without), it take about 15 minutes.

So here is the scenario:

One of my customer sends 100 e-mails ( 500 characters) with authentication:
takes 2-3 hours.
Same customer sends 100 e-mails(500 characters) without authentication:  
takes 10 minutes.
Same customer send 100 e-mails(500 characters) with authentication from  
OUTLOOK: takes 10 minutes.

Below is my code that I loop when authentication is required. Am I missing  
something? I have also tried just using the authentication on the first
e-mail  and not the subsequent ones but get an error message on the subsequent  
ones.

  If  (vEmailResponseTimeOut<5)
$Error:=IT_SetTimeOut  (15)
Else
$Error:=IT_SetTimeOut  (vEmailResponseTimeOut)
End if  

Case of
:  (Not(ErrorCheckingMail ("New";SMTP_New ($smtp_ID))))
:  (Not(ErrorCheckingMail ("Set Port";IT_SetPort  (2;vEmailPort))))
: (Not(ErrorCheckingMail  ("Auth";SMTP_Auth  
($smtp_ID;vEmailUserName;vEmailUserPassword;0))))
:  (Not(ErrorCheckingMail ("Host";SMTP_Host  ($smtp_ID;vEmailSMTP;0))))
: (Not(ErrorCheckingMail  ("To";SMTP_From ($smtp_ID;vEmailFromDefault;1))))
:  (Not(ErrorCheckingMail ("New";SMTP_To  ($smtp_ID;$1->;1))))
: (Not(ErrorCheckingMail  ("Body";SMTP_Body ($smtp_ID;vEmailText;1))))
:  (Not(ErrorCheckingMail ("Subject";SMTP_Subject  
($smtp_ID;vEmailSubject;1))))
: (Not(Attachments  ($smtp_ID)))
: (Not(ErrorCheckingMail ("Send";SMTP_Send  ($smtp_ID))))
: (Not(ErrorCheckingMail ("Clear";SMTP_Clear  ($smtp_ID))))

End case

Thanks for any help.

Paul  Ziegler
President
Mt. Taylor Programs
Private Advantage  Software
privateadvantage@...
www.privateadv.com
**************It's raining cats and dogs -- Come to PawNation, a place
where pets rule! (http://www.pawnation.com/?ncid=emlcntnew00000008)
**********************************************************************
Register for 4D Summit 2009 Today
Early Bird Pricing Ends August 28th - http://www.4d.com/summit

4D Internet Users Group (4D iNUG)
FAQ:  http://www.4D.com/support/faqnug.html
Archive:  http://lists.4D.com/archives.html
Options: https://lists.4d.com/mailman/options/4d_tech
Unsub:  mailto:4D_Tech-Unsubscribe@...
**********************************************************************



     
**********************************************************************
Register for 4D Summit 2009 Today
Early Bird Pricing Ends August 28th - http://www.4d.com/summit

4D Internet Users Group (4D iNUG)
FAQ:  http://www.4D.com/support/faqnug.html
Archive:  http://lists.4D.com/archives.html
Options: https://lists.4d.com/mailman/options/4d_tech
Unsub:  mailto:4D_Tech-Unsubscribe@...
**********************************************************************