<% ' change to address of your own SMTP server strHost = "mail.opio.com.br" If Request("Send") <> "" Then Set Mail = Server.CreateObject("Persits.MailSender") ' enter valid SMTP host Mail.Host = strHost Mail.From = Request("From") Mail.AddAddress Request("To") Mail.AddAddress Request("Nome") Mail.Body = Request("Body") Mail.Subject = "Contato OPIO.COM.BR" strErr = "" bSuccess = False On Error Resume Next ' catch errors Mail.Send ' send message If Err <> 0 Then ' error occurred strErr = Err.Description else bSuccess = True End If End If %> <!--#include file="../include/sub_titulo.inc" -->
 


Para postar seus textos, poesias, crônicas ou qualquer outro material, você precisa ter um login e senha cadastrados. Isso é por segurança e privacidade do seu perfil e das suas obras.

Veja como é fácil criar um perfil: basta seguir os passos de cadastramento abaixo e pronto! Sem nenhuma complicação seu perfil será iniciado, sem burocracia, censura ou mediação. O registro é completo, mas você pode prencher somente os campos mínimos, caso queira manter anonimato!

 

leia atentamente os termos de uso ao lado. É a sua garantia de serviço, e a nossa forma de evitar eventuais problemas.      

 

Seu nome:       
E-mail:       
Sua localização:           
Escolaridade:       
Como conheceu o Ópio: