Jmail nyhedsbrev-mailer går i kaos...
Jeg har forsøgt at sende et nyhedsbrev ud fra et website hos azero med følgende kode:Set objMail = Server.CreateObject("JMail.SMTPMail")
objMail.Silent = True
objMail.ServerAddress = sa
objMail.Sender = se
objMail.SenderName = sn
objMail.Subject = strSubject
objMail.Body = strMessage
For num = 0 to Ubound(arrEmail,2)
objMail.addrecipient arrEmail(0, num)
If Not objMail.Execute Then
Response.Write("ERROR MESSAGE: " & objMail.ErrorMessage & "<br>" & vbCrLf)
Response.Write("ERROR SOURCE: " & objMail.ErrorSource & "<br>" & vbCrLf)
Response.Write("LOG: <pre>" & objMail.Log & "</pre>" & vbCrLf)
Else
objMail.clearrecipients
Response.Write "<font color=green>" & arrEmail(0, num) & " (" & num & ") OK</font><br>"
End If
If CInt(num/20) = num/20 Then objMail.Close
Next
Set objMail = Nothing
Emailadresserne bliver trukket fra en mySql.
Men ikke alle på listen fik, og resten fik et sted mellem 36 og 85 stk. - alle med alt mulig andet i deres 'til'-felt foruden deres egen adresse:
<501 5.5.4 Invalid Address>; <421 Too many errors on this connection---closing>; <500 5.3.3 Unrecognized command>; <500 5.3.3 Unrecognized command>; <500 5.3.3 Unrecognized command>; <500 5.3.3 Unrecognized command>; <500 5.3.3Unrecognized command>; <552 5.5.3 Too many recipients>; osv...
Prøvede efterfølgende at teste med adresser fra en anden tabel (som kun blev sendt til mig), men her fik jeg ingen fejl - dog modtog jeg ca. 80 helt tomme mails (ingen modtager/afsender/emne/indhold) umiddelbart efter.
Gør jeg noget helt galt, eller kan mailserveren have fundet på numre?
Selv kan jeg umiddelbart få øje på cint(i/num) = i/num som lidt mærkelig, men den er taget herfra: http://azero.dk/?/support/programmering/asp/jmail/ - hvis ellers den lukker (hvad den vist slet ikke gør) - hvordan åbner jeg så igen.
Og kan man ikke på en eller anden måde sikre sig, at modtagerne får en og kun en mail - samt evt. lave noget error handling?
Håber på lidt hjælp - har allerede fået sendt de tilmeldte alt for magne fejlmails :(
