Orçamento
E-mail enviado com sucesso!
Em breve um representante entrará em contato.
ATENÇÃO
O campo "Nome completo" está em branco.
ATENÇÃO
O campo "(DDD) + Telefone fixo" está em branco.
ATENÇÃO
O campo "E-mail" está em branco.
ATENÇÃO
O formato do e-mail está incorreto.
ATENÇÃO
O campo "Mensagem" está em branco.
ATENÇÃO
O campo "(DDD) + Celular" está em branco.
ATENÇÃO
O campo "Instituição de ensino" está em branco.
ATENÇÃO
O campo "Campus" está em branco.
ATENÇÃO
O campo "Curso" está em branco.
ATENÇÃO
O campo "Ano de conclusão" está em branco.
ATENÇÃO
O campo "Estado" está em branco.
ATENÇÃO
O campo "Cidade" está em branco.
ATENÇÃO
O campo "Nº de formandos" está em branco.
Mensagem
<% enviar = request("enviar") if enviar <> empty then texto = "Nome completo: " & request("nome") texto = texto & "
DDD/Telefone: " & request("telefone") texto = texto & "
DDD/Celular: " & request("celular") texto = texto & "
E-mail: " & request("email_from") texto = texto & "
Instituição de ensino: " & request("instituicao") texto = texto & "
Campus: " & request("campus") texto = texto & "
Curso: " & request("curso") texto = texto & "
Ano de conclusão: " & request("ano") texto = texto & "
Estado: " & request("estado") texto = texto & "
Cidade: " & request("cidade") texto = texto & "
Nº de formandos: " & request("formandos") texto = texto & "
Mensagem: " & request("mensagem") Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.RemoteHost = "192.168.0.3" Mailer.ContentType = "text/html" Mailer.Encoding = 2 Mailer.CharSet = 1 Mailer.FromName = request("nome") Mailer.FromAddress = request("email_from") Mailer.AddRecipient "", "eliete@grupopotenciall.com.br" Mailer.Subject = "Orçamento - Site Potenciall" Mailer.BodyText = texto Mailer.SendMail %> <% end if %>