<% 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 - A World Without Frontiers :::



  Home
  Team
  Services
  Quotations
  Portfolio
  Contact Us
 
   Contact Us

 


Feel free to send us any questions or suggestions via e-mail.

To request a price quotation, fill in the on-line form or contact us via e-mail: bianca@mundotexto.com


We will always be pleased to help you.