none
email usando Server.CreateObject("Persits.MailSender") RRS feed

  • Pergunta

  • como faço para acessar uma lista de email e colocar uma condição se tiver um email inválido salta para próximo.

    codigo

     

     

    For j = 0 to  ubound(matriz,2)

    Set Mail = Server.CreateObject("Persits.MailSender") 

     

    If Mail.Send Then

    reponse.write "email ocm sucesso!"

    Else

    reponse.write "email com erro!"

    End if

     

    Set Mail = Nothing

     

    next

     

     

    terça-feira, 22 de fevereiro de 2011 01:50

Todas as Respostas

  • Olá,

    bom... o que vou dizer é uma pratica condenada, quando usada sem comtrole. Mas....
    você pode utilizar o:

    on error resume next
      'tentafazer isso

    if Err.number <> 0 then
        'deu erro, faz isso
    end if

     

    Espero ter ajudado


    Michel Guilherme Ferreira http://www.lehcim.com
    quinta-feira, 24 de fevereiro de 2011 00:17