Newsletter locaweb!

[Gustav Silv 0]

Olá pessoal!

Sempre enviei newsletter da seguinte forma:

ASP

SET SENDNEWS = DB.EXECUTE ("SELECT * FROM REGTEST")

vEMAIL = SENDNEWS ("EMAIL")

vBODY1 = SENDNEWS ("vBODY1")

 

WHILE NOT SENDNEWS.EOF

 

        Set objEmail = Server.CreateObject("CDO.Message")

        Set conf = Server.CreateObject("CDO.Configuration")

        Set param = conf.Fields

                       

        param("http://schemas.microsoft.com/cdo/configuration/sendusing")  = 2

        param("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"

        param.Update

                       

        objEmail.To =  vEMAIL

     objEmail.Subject = "Mensagem de natal..."

        objEmail.From = "Empresa <contato@empresa.com.br>"

                objEmail.HTMLBody = objEmail.HTMLBody & vBODY1

        ON ERROR RESUME NEXT

          objEmail.Send

        ON ERROR RESUME NEXT

                Set objEmail = Nothing

       

        SENDNEWS.MOVENEXT

        WEND

Só que quando envio um teste para 100 cadastros "meunome@empresa.com.br" vai numa boa, mas quando pego o banco com cadastro (só 100!!!) ele não envia!!! Alguém sabe o motivo?

Tem o ON ERROR RESUME NEXT!!!

[jrcardozo 4]

retire o on error resume next

 

outra coisa, os emails que tem no banco são válidos?

[Gustav Silv 0]

retire o on error resume next

 

outra coisa, os emails que tem no banco são válidos?

Pode ser que nem todos são válidos, Jonathandj. Tirei o On Error e mesmo assim envia, mas não chega quando pego 49 emails cadastrados + o com meu domínio (que é o último).