Mail queing

Hej eksperter,

jeg har lige et hurtig spørgsmål. Jeg vil gerne sende en masse emails ud, så derfor benytter jeg mig af Jmail's mulighed for at sætte mailsene i kø. Mit script ser sådan ud:

mails = "Select * FROM nyhedsbrev WHERE gruppe = 1 order by id ASC"
Set mails = Conn.Execute(mails)
Do While Not mails.EoF
id=mails("id")
'***********Mailsenderen********************
set Message = Server.CreateObject( "JMail.Message" )
Message.From = "test@test.dk"
Message.Subject = "test"&mails("id")
Message.Body = "This is a test mail"
Message.AddRecipient "bruger@vip.cybercity.dk","mig"
Message.MSPickupDirectory = "c:\inetpub\mailroot\pickup\"
Message.nq
Message.Close
'**********mailsender slut*******************

mails.MoveNext
Loop

er det den rigtige måde at sende en masse emails fra en db på??

/Uneerup