Cita:
Empezado por rretamar
Te envío el código fuente de toda la aplicación (es un programa muy simple -y el código fuente es bastante "sucio"- que permite consultar el estado de una base de datos, mostrando una alarma si no se encontraron nuevos registros. La alarma se ve en el monitor y opcionalmente se envía un correo-e). Junto al ejecutable se deben distribuir dos bibliotecas para la encriptación SSL que podrás encontrar en el mismo directorio de las fuentes. El envío de correo-e lo hago desde el archivo PRINCIPAL.PAS
Para envío por Gmail uso los siguientes parámetros:
- Servidor SMTP: smtp.gmail.com
- Usuario: nombre@gmail.com
- Port: 465
- Usar TSL
En el código fuente podrás ver cómo hago el envío y en los formularios están las propiedades de los componentes.
http://www.sendspace.com/file/0fxx92
Espero que te sirva. Está escrito y compilado en Delphi 2007 (utilizando los componentes JEDI, lo que ahora veo como un error, ya que son muy dependientes de Windows), que actualmente no utilizo más, porque lo reemplacé por Lazarus. |
Gracias rretamar!!!!
Ahora consigo conectar, pero a la hora de enviar el mail se queda literalmente muerto.
Ya no sé si es por el ssl o por otra cosa
Aaaahh!!! Esto es desesperante!!! He quitado el antivirus por si acaso, he desactivado el firewall de Windows, he cargado el proyecto en otro equipo..... y no va.
Gracias por la ayuda. Si se os ocurre algo más os escucharé encantados.
Un saludo.
EDITO: Lo curioso es que si pongo un usuario que no existe o la contraseña no es correcta, ¡¡se conecta igualmente!!, debería de dar la excepción, ¿no?.