Limiti invio newsletter su aruba

[zetaweb]

Ragazzi sapete se Aruba ha imposto dei limiti per l'invio di una mailing list?
Fino a qualche giorno fa il mio script( che vi ripropongo di seguito) funzionava tranquillamente, adesso invece non va più.
Se non sapete di qualche cambiamento, sapete dirmi se notate qualcosa che non va sullo script che utilizzo per la newsletter?
Le email prelevate dal DB sono un migliaio circa.

nomeDominio 				= Request.ServerVariables("HTTP_HOST")
indirizzoIp					= Request.ServerVariables("REMOTE_ADDR") 
modulo						= Request.ServerVariables("HTTP_REFERER")
browserSistemaOperativo		= Request.ServerVariables("HTTP_USER_AGENT")



	'* creo gli oggetti cdosys sul server e li gestisco
	
DIM iMsg, Flds, iConf

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields

Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "smtp.aruba.it" 
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update

	'* voce da modificare con il proprio indirizzo email

do while not rs.eof
email = rs("email")
destinatari = email


invioA =  destinatari

	'* voce da modificare con un indirizzo email che funga da mittente: 
	'* in caso di errore riceverete notifica a questo indirizzo un MAILER-DAEMON
	'* dato che cdosys supporta questa notifica
		
invioDa =  "pippo@pluto.com"

With iMsg
   Set .Configuration = iConf
   .To = ""
   .From = invioDA
   .Bcc = destinatari
   .Sender = invioDa
   .Subject = titolo
   .TextBody = messaggio 
   .HTMLbody = html
   .Send
End With

rs.movenext
loop

Grazie a tutti!

[Roby_72]

Lo script si blocca?
Da errore?
Invii 1000 email tutte d'un fiato?

Roby

[zetaweb]

Dunque mi da errore nell'invio, cioè proprio alla riga
.send

Beh no, come vedi dal codice, prima creo gli oggetti cdosys e dopo ciclo i risultati presi dal DB inviando una email per volta.

Sai dirmi se faccio qualche errore in particolare?
Grazie!

[Roby_72]

Ma se ne mandi 5 di email ti da errore lo stesso?

Roby

[zetaweb]

no, ho appena provato inviando 246 email, tutte ovviamente con il mio indirizzo per fare la prova, e ha fatto l'invio correttamente.

[Roby_72]

Non vedo l'utilizzo dell'istruzione:

server.scripttimeout

Roby

[zetaweb]

sta sopra tutto alla pagina, avevo postato solo il cuore del codice credendo che ci potesse essere qualche errore:

<%
server.ScriptTimeout = 1000000

e poi dopo continua con il resto.

[Roby_72]

Beh non è che il timeout possa essere un numero alto a piacere...
Evidentemente per mandare le tue email superi il tempo che aruba concede al timeout (indipendentemente da quello definito da te).
Manda le email a blocchi di 100 e vedrai che non avrai problemi.

Roby

[zetaweb]

quando dici a blocchi di 100 intendi un invio con 100 destinatari nel BCC oppure 100 invii da un destinatario l'uno?
cosa consigli, semmai ci fosse una preferenza fra questi due metodi...

[Roby_72]

Se il BCC ti ha sempre funzionato continua ad usarlo.
Ma fai in modo ti mandare una email ogni 100 destinatari in BCC.

Roby