En aplicaciones que he desarrollado he tenido que implementar una funcionalidad para enviar correo, esto lo resolvía haciéndolo a través de la misma máquina que funcionaba como servidor de la aplicación (LOCALHOST), el problema era que si el destinatario era una cuenta de Yahoo!, los correos llegaban a la carpeta de spam (pero llegaban...); pero si el destinatario era una cuenta de Hotmail, los correos se perdían en el ciber espacio y nunca llegaban, ni por lo menos a la carpeta de correo no deseado.
Afortunadamente ahora existe
¡Gmail para todos!. Antes de pasar al script debo mencionar los requerimientos:
1. Tener una cuenta de correo con
gmail2.
Habilitar el acceso POP3. Servidor con windows que soporte CDOSYS. Si tu servidor no tiene la librería la puedes
descargar4. El código para enviar correo
Bien, no voy a entrar en detalle sobre los puntos 1, 2 y 3, debido a que las ligas que estoy colocando son muy claras sobre el proceso a realizar. Entonces pasemos al punto 4.
EL CÓDIGOLa página ASP se va a llamar enviar_gmail.asp y para empezar vamos a definir las variables y a inicializarlas.
(enviar_gmail.asp)
<%
'Variables generales
Dim Correos, CorreoTitulo, CorreoFrom, myMail, myConf, ConfURL
Dim GCuenta, GClave
'Definimos nuestra cuenta en gmail
CorreoFrom = "Tu Nombre <tu_cuenta_gmail@gmail.com>"
'Definimos el título para el correo
CorreoTitulo = "Ejemplo de envío de correo"
'Definimos los cuentas a las que vamos a enviar el correo
Correos = "Ejemplo Cuenta Yahoo <nombre_cuenta@yahoo.com>; "& _
"Otra Cuenta Gmail <nombre_cuenta@gmail.com>; "& _
"Cuenta en Hotmail <nombre_cuenta@hotmail.com>"
%>
Es importante notar la sintáxis que estoy ocupando para declarar las cuentas de correo, es importante respetarla ya que nos ayudará para que el correo no sea considerado como spam. En general la sintáxis es la siguiente:
Nombre Completo Persona <usuario@domino.ext>
Si queremos añadir más de una dirección, tenemos que separarlas mediante (;) punto y coma.Ahora vamos a definir la cuenta y password de gmail que vamos a ocupar para enviar el correo
<%
'La cuenta es el usuario seleccionado para el correo, sin incluir @gmail.com
GCuenta = "tu_cuenta_gmail"
'La contraseña es la seleccionada cuando se creó la cuenta de correo
GClave = "clave_de_la_cuenta_gmail"
%>
Listo, en la siguiente línea vamos a agregar las cuentas destinatarias de nuestro correo.
Ahora vamos a crear los objetos CDO necesarios para manipular correo electrónico
Ya que tenemos declarados los objetos, ahora vamos a configurar como vamos a realizar el envío del correo.
A continuación vamos a manipular nuestro objeto myMail y enviar el correo
Ahora vamos a añadir el contenido del correo, para esto tenemos algunas opciones, podremos ocupar la que mas nos convenga.
**Agregar texto plano sin formato
**Agregar contenido formateado en HTML
**Agregar una página desde sitio Web
**Agregar una página desde una carpeta en nuestra PC
También la librería CDOSYS nos permite adjuntar archivos, para hacer esto debemos ocupar el siguiente código:
En este punto del script ya tenemos definidas las configuraciones, asi que, lo que sigue es asociarlas al correo
Ahora enviamos nuestro correo y terminamos el script:
Ahora veamos todo el script junto:
(enviar_gmail.asp)
Aqui terminamos con el código, ahora lo que resta es hacer las pruebas.
3.- haydee