Enviar por email - fale conosco

[Rafael C. Silva]

Pessoal tenho uma pagina "fale conosco" que atualmente quando alguém pergunta fica registrado no sistem, gostaria de enviar também para meu email, alguém pode me ajudar.

[Geasi Marcos]

Pessoal tenho uma pagina "fale conosco" que atualmente quando alguém pergunta fica registrado no sistem, gostaria de enviar também para meu email, alguém pode me ajudar.

Boa tarde Rafael, tudo bom?

Bom, pra enviar e-mail é tranquilo. Vamos lá.

Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = 'SERVIDOR SMTP DO LOCAL ONDE O SITE ESTÁ HOSPEDADO
Mail.From = 'E-MAIL DO USUÁRIO QUE ENVIOU O FORMULÁRIO
Mail.FromName = 'NOME DESSE USUÁRIO
Mail.AddAddress 'E-MAIL QUE VAI  RECEBER A MENSAGEM

Mail.AddBCC 'DESTINATÁRIOS OCULTOS, NÃO OBRIGATORIO

Mail.Subject = 'ASSUNTO DO E-MAIL

Mail.Body = 'CORPO DO E-MAIL / MENSAGEM DO USUÁRIO

Mail.IsHTML = True

On Error Resume Next

Mail.Send

Se não funcionar tem que instalar um componente no servidor, ai qualquer coisa eu te mando, ok??

Abs!!