Purtroppo questa è una domanda che ho fatto infinite volte:
Mi si inchioda la spedizione dopo circa 150-200 email da un server unix con Qmail , ecco il codice:


Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from email"
rs.open sql ,conn,1,2
do while not rs.eof

Dim jMail
email=rs("email")
Set jmail = Server.CreateObject("JMail.Message")


jMail.From ="test@test.it"

jmail.AddRecipientBcc email

jMail.Subject = "test"

body=request("testo")

jMail.HTMLBody = body
on error resume next
jmail.Send ("[server unix]")
if err.number<>0 then
response.write("non spedito a "&email&"<br>")
else
response.write("spedito a "&email&"<br>")
end if
err.clear
set jmail=nothing

rs.movenext
loop
rs.close
set rs=nothing%>

Allora l'smtp non si inchioda , ho messaggi in coda sempre, non è un problema di timeout.. bo