Ir para conteúdo
Fórum Script Brasil
  • 0

Enviar Form Para 2 Emails


crucifier

Pergunta

como eu faco pra enviar um form para 2 emails???

tipw ta assim no codigo:

Set Mail = Server.CreateObject("Persits.MailSender")
      Mail.Host = "localhost"                                                                          ' servidor de email da apcc-pa
      Mail.From = "contato@taltal.com.br"                                             ' email que servirá de remetente
      Mail.FromName = "Contato Formulário"            
      Mail.AddAddress "maykow@centropaulista.com.br"                                                        ' email receptor do formulário
      Mail.Subject = Request.form("assunto")                                                        ' assunto do email
          Mail.IsHTML = True
      Mail.Body = vHTML

Link para o comentário
Compartilhar em outros sites

6 respostass a esta questão

Posts Recomendados

  • 0

Você pode usar cdonts assim:

on error resume next
Set eObjMail = Server.CreateObject("CDONTS.NewMail")
eObjMail.to = ParaEmail
eObjMail.from = NomeEmail & "<" & Email & ">"
eObjMail.subject = Assunto
eObjMail.Importance = 1
eObjMail.BodyFormat = 0
eObjMail.MailFormat = 0
eObjMail.body = Mensagem  
eObjMail.send
Set eObjMail = nothing

Set eObjMail = Server.CreateObject("CDONTS.NewMail")
eObjMail.to = NomeEmail & "<" & Email & ">"
eObjMail.from = ParaEmail
eObjMail.subject = "Seu contato"
eObjMail.Importance = 1
eObjMail.BodyFormat = 0
eObjMail.MailFormat = 0
eObjMail.body = Resposta
eObjMail.send
Set eObjMail = nothing

é uma idéia ok, usei isso no meu e funciona sem problema, basta adapta-lo a sua realidade

ps.: Veja se o seu servidor aceita o componente cdonts

Link para o comentário
Compartilhar em outros sites

  • 0

não sei se entendi sua duvida, mas não seria isso:

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

    Mail.Host = "localhost"          ' servidor de email da apcc-pa

    Mail.From = "contato@taltal.com.br"    ' email que servirá de remetente

    Mail.FromName = "Contato Formulário"           

    Mail.AddAddress "maykow@centropaulista.com.br ;fulano@fulano.com.br"      ' email receptor do formulário

    Mail.Subject = Request.form("assunto")      ' assunto do email

    Mail.IsHTML = True

    Mail.Body = vHTML

Link para o comentário
Compartilhar em outros sites

  • 0
Guest - Marco -

É só inserir

Mail.AddCC "outroemail@servidor.com", "Nome opcional" ' com cópia

ou

Mail.AddBcc "outroemail@servidor.com", "Nome opcional" ' com cópia oculta

Abraços

Marco

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,8k
×
×
  • Criar Novo...