<% if request("sw") = "1" then sw = 1 if request.Form<>"" then On error resume next If request("nombre")="" OR request("email")="" OR request("sugerencia")="" then sw = 1 else sw = 2 Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "smtp.ecodes.org" Mail.From = request("email") Mail.FromName = request("nombre") Mail.AddAddress "consumoresponsable@ecodes.org" Mail.AddBCC "susana.ortega@ecodes.org" Mail.AddBCC "ciro.artigot@ecodes.org" Mail.AddReplyTo request("email") Mail.Subject = "Sugerencia www.consumoresponsable.org" Mail.Body = request("sugerencia") Mail.Send end if end if today = Date() %> Consumo Responsable : buzón de sugerencias

    Estás en: inicio » buzón de sugerencias  
 
 

Buzón de sugerencias

<%if sw<2 then%>

 
  Si quieres hacernos llegar alguna propuesta, idea o comentario puedes hacerlo a través del siguiente formulario.
Nombre:
Email:
Sugerencia:
 

<%else%>
   
  Muchas gracias por tu colaboración, te contestaremos a la mayor brevedad posible.





<%end if%>



 
 
Ecología y desarrollo