E-mail: webmaster@redem.org
<%
If request("submit") <> "" THEN
Set objEMail = Server.CreateObject("CDO.Message")
Set objConfig = Server.CreateObject("CDO.Configuration")
Set Confi = objConfig.Fields
Confi("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1
Confi("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory") = "C:\inetpub\mailroot\pickup"
Confi.Update
Set objEMail.Configuration = objConfig
objEMail.To = "contactar@redem.org"
objEMail.Bcc= "martinporrassalvador@yahoo.es"
objEMail.From = Request("from")
objEMail.Subject = Request("subject")
objEMail.TextBody = Request("message")
objEMail.Send
Set objEMail = Nothing
Response.Write("SU SOLICITUD HA SIDO ENVIADA SATISFACTORIAMENTE; EN BREVE ESTAREMOS CONTACTANDO CON SU INSTITUCIÓN EDUCATIVA")
Else
%>
En el sigueinte formulario puede solicitar la afiliación de su institución educativa:
La afiliación es completamente gratuita gracias a lo donativos y auspicios de empresas, corporaciones y sobretodo de instituciones educativas que apadrinan a otras escuelas con menores recursos económicos, ya sean escuelas públicas o privadas.
TRABAJA CON NOSOTROS UNETE A LA RED DE VOLUNTARIOS DE REDEM
