%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim Submit Submit = request("enviar") if Submit = "Enviar" then body = "############ CADASTRO DE CLIENTES ############" & vbcrlf & "Nome: " & Request("a1") & vbcrlf & "E-mail: " & Request("a2")& vbcrlf & "Assunto: " & Request("a3") & vbcrlf & "Telefone: " & Request("a4") & vbcrlf & "Mensagem: " & Request("a5") &"####################################################" Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "mail.lequiqui.com.br" Mail.From = "contato@lequiqui.com.br" Mail.FromName = "Contato Site Lequiqui" Mail.AddAddress "contato@lequiqui.com.br","Lequiqui" Mail.Subject = "Contato do Site Lequiqui" Mail.IsHTML = false Mail.Body = body Mail.Send response.redirect "contato2.asp" end if %>