Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

skywards

Envio de e-mail

Por , em ASP Clássico

Recommended Posts

skywards    1

skywards
Postado

OOlá pessoal

 

Estou tentando mandar e-mails com um arquivo que achei aqui mesmo no imasters, só que estou tendo o seguinte problema, no codigo original o endereço de e-mail está colocado diretamente na variavel var_to e funciona normalmente, só que fiz uma página onde dependendo da escolha do visitante o e-mail é direcionado para um endereço de e-mail diferente, e assim sendo a variavel var_to receberá o seguinte valor

 

var_to = Request.Form("endereço")

 

entretanto a variavel não está recebendo o valor passado, se alguém poder me ajudar serei grato pela ajuda. Abaixo segue o código:

 

<%

Option Explicit

 

Dim var_nome, var_mail, var_assunto, var_comentario, var_to, EnviarMail, MsgBody

 

var_nome = Request.Form("nome")

var_mail = Request.Form("email")

var_assunto = Request.Form("assunto")

var_comentario = Request.Form("comentario")

var_email = Request.Form("email_vereador")

var_to = "exemplo@exemplo.com.br"

 

Set EnviarMail = Server.CreateObject("CDONTS.NewMail")

EnviarMail.To = var_to

EnviarMail.From = var_mail

EnviarMail.Subject = var_assunto

MsgBody = "<html>" _

& "<head>" _

& "</head>" _

& "<body bgcolor=""#FFFFFF"">" _

& "<p align=""center""><font face=""Verdana, Arial, Helvetica, sans-serif"" size=""2"">Você recebeu uma mensagem de <b>" & var_nome & "</b>, email <b>" & var_mail & "</b> e fez o seguinte comentário:</font></p><p align=""center""><font face=""Verdana, Arial, Helvetica, sans-serif"" size=""2""><b>" & var_comentario & "</b></font></p>" _

& "</body>" _

& "</html>"

EnviarMail.Body = MsgBody

EnviarMail.Importance = 2

EnviarMail.BodyFormat = 0

EnviarMail.MailFormat = 0

EnviarMail.Send

 

Set EnviarMail = Nothing

 

Response.redirect "obrigado.htm"

%>

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito