Sende mange emails via web

if Request.Form("submit") = "send" then
Response.write("0")
Response.Flush
set jMail = server.createobject("JMAIL.SMTPMail")
jMail.sendername = Request.Form("sfor")
jMail.sender = Request.Form("email")
jMail.Subject = Request.Form("subj")
jMail.ServerAddress = "10.0.0.3"
jMail.Body = Request.Form("bodytext")
jMail.Priority = 3
'jMail.AddRecipient = Request.Form("modtagere")
'jMail.AddRecipient "xxx@xxx.dk"
Response.write("1")
Response.Flush

str = Request.Form("modtagere")
myarray = split(str,",")

for i = 0 to uBound(myArray)
    jMail.AddRecipient myarray(i)
next
Response.write("2")
Response.Flush
Response.Write("her")
jMail.Execute
'jMail.Send("10.0.0.3")
Response.write("3")
Response.Flush

Det vigtige i denne/smarte er

str = Request.Form("modtagere")
myarray = split(str,",")

som gennemløber dine modtager.......

Den skulle da gerne kunne sende til over 1000

ellers skal du ind og lege med timeout men det tror jeg sagtens den kan klare.

Håber det gav lidt inspiration

celinder << ligner et helt normalt Jmail script men jeg har behov for at være 110% sikker på at SMTP på denne måde kan håndtere f.eks. 10.000 emails

lukketid