De hecho, ASP puede hacer muchas cosas, pero la gente no sabe cómo usarlas. Microsoft proporciona muchos componentes útiles y listos para usar para ASP, pero nadie conoce estos componentes, como el uso de CDO.Message para enviar correos electrónicos.
¿Qué es CDO.Message? Para enviar correos electrónicos bajo winnt y win2k, necesita usar CDONTS.NewMail. El componente CDONTS.NewMail debe estar registrado. Es muy simple. Simplemente ejecute la línea de comando regsvr32 Cdonts.dll en el servidor y confirme en la ventana emergente. Utilice CDONTS. El servicio NewMail también debe tener instalado el smtp que viene con iis. Con Windows 2003, el sistema ya no viene con el archivo Cdonts.dll, dejando solo un archivo similar cdosys.dll. Por supuesto, este archivo también está disponible en win2k (requiere registro de componentes), pero ¿qué es bueno en 2003? Este componente no necesita registrarse manualmente, el sistema lo ha registrado automáticamente. Ahora veamos cómo utilizar este componente.
<%
cm tenue
Establecer cm=Server.CreateObject("CDO.Mensaje")
'Crear objeto
cm.From=" [email protected] "
'Establecer la dirección de correo electrónico del remitente
cm.To=" [email protected] "
'Establecer la dirección de correo electrónico del destinatario
cm.Subject="Encontré un sitio web que te permite suscribirte a RSS en línea. No es necesario instalar ningún software en el futuro."
'Establecer el asunto del correo electrónico
'cm.TextBody=" http://www.downcodes.com/rss/ "
'Lo anterior utiliza un formato de texto normal para enviar correos electrónicos. Solo puede ser texto y no es compatible con html, por lo que no se utiliza aquí
cm.HtmlBody="Online RSS Feeds Reader es un sistema de lectura de noticias RSS en línea".
"No es necesario descargarlo ni instalarlo. Siempre que se registre, podrá tener una suscripción RSS en línea y un sistema de agregación de noticias que es tan poderoso como el software".&_
"No importa dónde estés, siempre que tengas acceso a Internet, podrás leer tus suscripciones favoritas."&_
"Date prisa y regístrate: <a href=http://www.gbmad.net/rss/>http://www.gbmad.net/rss/</a>"
'Lo anterior es el texto HTML que construiste, así Los correos electrónicos que envías se ven mucho mejor que aquellos que solo contienen texto. No digas que no sabes html'cm.AddAttachment
Server.MapPath("test.zip")
'Si necesita enviar un archivo adjunto, utilice el método anterior para adjuntar el archivo.
cm.Enviar
'Finalmente, por supuesto, ejecuta el envío
Establecer cm=Nada
'Libera el objeto inmediatamente después de enviarlo correctamente.
Response.Write("Enviar correo electrónico correctamente").
%>