Código PHP:
<%
Origen = Request.Form("txtEmail")
Destino = Request.Form("txtEmail_2")
Asunto = "Un amigo te recomienda MG"
Mensaje = Request.Form("txtComent")
Copiaa = "[email protected]"
Set ObjetoCDO = Server.CreateObject("CDONTS.NewMail")
ObjetoCDO.From = Origen
ObjetoCDO.To = Destino
ObjetoCDO.Subject = Asunto
ObjetoCDO.Body = Mensaje
ObjetoCDO.Cc = Copiaa
ObjetoCDO.Send
Set ObjetoCDO = Nothing
response.write "Email enviado con éxito"
response.write ("<a href=javascript:window.close()>Cierre esta ventana</a>")
%>
Si quereis ver el formulario está aquí:
http://a.domaindlx.com/knarfy/recomienda.htm