<% else Set oMail = Server.CreateObject("Persits.MailSender") oMail.Host = "mail.acaonutri.com" oMail.From = "contatosite@acaonutri.com" oMail.PassWord = "contatosite123" oMail.FromName = Request.Form("nome") oMail.AddAddress "contatosite@acaonutri.com", "Página de contato" oMail.AddReplyTo Request.Form("email"), Request.Form("nome") oMail.Subject = "Contato pelo site" oMail.Body = Request.Form ("mensagem") oMail.Send If Err <> 0 Then Response.Write "