Uso del componente de servidor CDONTS en ASP para el envío de correo electrónico con el servidor. Ejemplo de script para que los visitantes puedan recomendar la página a un amigo.
Este es un ejemplo completo y sencillísimo de cómo enviar un correo usando el componente CDONTS de IIS. Dicho componente está presente en muchas de las versiones de Windows en su modo servidor, como Windows NT 4 o Windows 2000 , pero no así en Windows 98, por no disponer de un servidor de envío de correo (SMTP). Atención, que en Windows NT y 2000 habría que tener el servidor SMTP correctamente configurado y los usuarios de Windows XP, que no disponen de esa herramienta desde el principio, aunque podrían obtenerla desde otro sistema Windows Script para recomendar a un amigo El ejercicio siguiente es un script que permite mandar un email desde nuestra página a un amigo del visitante que lo desee. Es uno de los típicos sistemas de «recomienda a un amigo». Los datos para rellenar el mail, los ponemos a mano. Si se quiere enviar los datos de un formulario sólo tenemos que recogerlos con instrucciones tan sencillas como estas: cBody = Request.Form(«Body») Y ahora el ejemplo, en el que se muestra como enviar a un amigo, una copia y una copia oculta, lo común. <%@ Language=VBScript%>
Dim cBody, n For Each n In Request.Form Set oCDO = Server.CreateObject(«CDONTS.NewMail») ‘Asignamos las propiedades al objeto oCDO.Send Set oCDO = Nothing ‘Liberar… %> Bueno, amigos, espero que les pueda servir, como ven, hay poco que programar.
|
Leave A Comment