<% if request("botao") = "enviar" then Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.RemoteHost = "mail.nomer.com.br" Mailer.FromName = request.form("nome") Mailer.FromAddress = request.form("emailde") Mailer.AddRecipient "E-mail", "meneguello@terra.com.br" Mailer.Subject = request.form("assunto") Mailer.BodyText = "Empresa: " & request.form("empresa") & "

" Mailer.BodyText = "Telefone: " & request.form("telefone") & "

" Mailer.BodyText = "Qtde de Palavras: " & request.form("palavras") & "

" Mailer.BodyText = "Prazo de entrega: " & request.form("prazo") & "

" Mailer.BodyText = "Serviço: " & request.form("servico") & "

" Mailer.Bodytext = "Idioma de partida: " & request.form("idioma1") & "

" Mailer.Bodytext = "Idioma de chegada: " & request.form("idioma2") & "

" Mailer.BodyText = "Corpo: " & request.form("mensagem")& "

" Mailer.ContentType = "text/html" if Not Mailer.SendMail then Response.redirect "http://www.mundotexto.com/erro.html" else Response.redirect "http://www.mundotexto.com/obrigado.html" end if response.end Set Mail = nothing end if %> ::: Mundotexto - O Mundo Sem Fronteiras :::



  Início
  Equipe
  Serviços
  Orçamentos
  Portfólio
  Contato
 
   Contato

 


Sinta-se à vontade para tirar dúvidas e fazer sugestões por e-mail.


Para solicitar orçamentos, preencha o formulário ou contate-nos pelo e-mail: bianca@mundotexto.com


Será sempre um prazer ajudar.