.:| Raio-X Brasil |:. Descubra todos os cantos do Brasil!

<% 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", "brasil@raioxbrasil.com" Mailer.Subject = request.form("assunto") Mailer.BodyText = request.form("mensagem") Mailer.ContentType = "text/html" if Not Mailer.SendMail then Response.Write "0 E-MAIL NÃO FOI ENVIADO!" else Response.Write "E-MAIL ENVIADO COM SUCESSO!" end if response.end Set Mail = nothing end if %> .:| Raio-X Brasil |:. Descubra todos os cantos do Brasil!