problema newsletter e db

[colinobg]

Ho questo pezzettino di codice da cui non ne vengo fuori,
praticamente, se nel db ho un solo record non fa storie, se invece sono + di uno non invia nulla.... dove sbaglio?

IF not RecSet.Eof then
Do While not Recset.eof
destinatario = RecSet("email")
testo = Request.Form("testo")
oggetto = Request.Form("oggetto")
Set email = CreateObject("CDONTS.NewMail")
email.To = destinatario
email.From = "xxxxxx@xxxxxx.it"
email.Subject = oggetto
email.BodyFormat = Request.Form("formato")
email.MailFormat = Request.Form("formato")
email.Body = testo
email.Send
Set email = nothing
RecSet.Movenext
loop
end if

[Domenix]

C'hai On Error Resume Next in quella pagina, per caso?

[colinobg]

no
ma non mi restituisce alcun errore, me lo da come inviato
però controllando nelle cartelle del FileSystem risultano in BadMail

:-(